I luv gotos
rem my awssum gamez :P
rem by TheComet
goto startofprogram
startofprogram:
goto jumptothis
jumptothis:
goto ilovechunkies
ilovechunkies:
goto setupscreen
finishedsetupscreen:
goto makeimages
finishedmakeimages:
goto mainloop
mainloop:
startofloop:
goto getinput
finishedgetinput:
goto syncscreen
finishedsyncscreen:
goto startofloop
syncscreen:
sync
goto finishedsyncscreen
makeimages:
goto drawbox
finisheddrawbox:
goto getimage
finishedgetimage:
goto finishedmakeimages
getinput:
up=upkey()
goto pasteimage
pasteimage:
paste image 1,0,0
goto finishedgetinput
drawbox:
box 0,0,4,4
goto finisheddrawbox
getimage:
get image 1,0,0,10,10
goto finishedgetimages
setupscreen:
sync on
backdrop on
goto finishedsetupscreen
TheComet