10 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 100 DIM 110 VARNAME 120 NEXT 130 FOR 140 IF 150 NEXT 160 PRINT 170 SCROLL 180 CLS 190 REPEAT 20 REM ~ ~ 200 REM 210 SCREEN SWAP 220 DOKE 230 DOKE 240 DOKE 250 DOKE 260 DOKE 270 DOKE 280 DOKE 290 DOKE 30 REM ~ A HI-SCORE ~ 300 DOKE 310 DOKE 320 DOKE 330 DOKE 340 DOKE 350 GOTO 40 REM ~ ~ 50 REM ~ (c) Diamond Software 1993 ~ 51 REM ~ ~ 52 REM ~ Coded By Andrew Martin & Steven Jordan ~ 60 REM ~ ~ 70 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 80 CURS 90 WINDOPEN