'
' sdlBasic PSP 0.5
'
' Name: PSPMag
' Purpose: To view psp magazines without using the image viewer
' Author: PSPHeaven/Acer5050
http://pspheaven.net [email protected]
' Licence: LGPL
'
'-----------------------------------------------------------------------------------------------------------------------------------------------------------------
prints("PSPHeaven's Magazine Viewer")
prints("Created In SDLBasic")
prints("Alpha 0.1")
prints("PSPHeaven.Net")
prints("Will Automaticaly Exit At End")
prints("Just as a test this has XMag #1 Included")
prints("Press [X] To start and to goto the next page")
waitkey(k_return)
cls
image=loadimage("media/001.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/002.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/003.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/004.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/005.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/006.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/007.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/008.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/009.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/010.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/012.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/013.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/014.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/015.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/016.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/017.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/018.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/019.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/020.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/021.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/022.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/023.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/024.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/025.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/026.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/027.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/028.jpg")
pastebob(0,0,image)
waitkey
cls
image=loadimage("media/029.jpg")
pastebob(0,0,image)
waitkey