start tok64 d64-WU1NLi
30 IFb=0THENb=1:LOAD"roofus.game",8,1
35 IFc=0THENc=1:LOAD"pset",8,1
40 PRINT"{clear}"
45 PRINT"{down*2}{right*8}{green}how to play 'roofus'"
50 PRINT"{down*3}{right*5}{156}avoid being hit by monsters"
55 PRINT"{down}{right*5}you will lose a gun when "
60 PRINT"{right*5}meter runs out
65 PRINT"{down}{right*5}monsters will be killed {light blue}only"
70 PRINT"{right*5}{156}by direct explosions"
75 PRINT"{down*3}{right*10}{white}enjoy. good luck"
80 PRINT"{down*2}{right*4}{yellow}<return> to start or re-start"
90 GETa$:IFa$=""THEN90
100 SYS 36029
stop tok64
(bastext 1.0)