Listing of file='DRAW.BAS;01' on disk='vmedia/games-sector.ccvf'
100 PLOT 2,63,63,255:COL= 23 110 PLOT 12 120 PLOT 16:POKE 33278,0 130 A= PEEK (33278) 140 IF A= 0GOTO 130 150 IF A< 24AND A> 15THEN COL= A:GOTO 120 160 PLOT 11,COL 170 IF A< 65OR A> 90GOTO 120 180 A$= CHR$ (A):INC= 0 190 IF A$= "X"THEN INC= 1:GOTO 280 200 IF A$= "W"THEN INC= 2:GOTO 280 210 IF A$= "A"THEN INC= 4:GOTO 280 220 IF A$= "Z"THEN INC= 5:GOTO 280 230 IF A$= "Q"THEN INC= 6:GOTO 280 240 IF A$= "D"THEN INC= 8:GOTO 280 250 IF A$= "C"THEN INC= 9:GOTO 280 260 IF A$= "E"THEN INC= 10:GOTO 280 270 IF A$= "S"GOTO 290 280 PLOT 2,251,INC,255:GOTO 120 290 PLOT 17,8 300 INPUT "ENTER FILE NAME > ";N$ 310 PLOT 16,8,11,27,4 320 PRINT "SAVE ";N$;".DSP 7000 1000" 330 PLOT 27,27