1 84 Dam Eaters 700 PRINT:PRINT 710 LOCATE 6,22:PRINT CHR$(24);"PRESS AN Y KEY TO START";CHR$(24) 720 IF INKEY$ <>"" THEN 720 730 IF INKEY$=""THEN 730 ELSE CLS 740 RETURN 750 REM 760 SC=0:B=0 770 N=1:C=0 780 FOR I=1 TO 3:Y(I)=INT(RND*20)+1:X(I) =29:NEXT 790 RETURN 800 SYMBOL AFTER 230 810 SYMBOL 231,119,119,0,221,221,0,119,1 19 820 SYMBOL 232,0,221,221,0,119,119,0,221 830 SYMBOL 233,221,0,119,119,0,221,221,0 840 SYMBOL 234,0,255,171,0,0,171,255,0 850 SYMBOL 235,28,39,255,255,255,255,0,0 860 SYMBOL 236,96,10,193,20,101,128,51,1 40 870 SYMBOL 237,194,40,67,24,130,40,67,16 880 SYMBOL 238,63,31,15,7,3,3,1,1 890 SYMBOL 239,2,196,40,23,232,16,231,24 900 FOR F=0 TO 20 STEP 3:LOCATE 3,F+1:PR INT CHR$(231);CHR$(231);CHR$(231):LOCATE 3,(F+2):PRINT CHR$(232);CHR$(232);CHR$( 232):LOCATE 3,(F+3):PRINT CHR$(233);CHR$ (233);CHR$(233):NEXT 910 PEN 2: FOR F=0 TO 20:LOCATE 1,F+1:PR INT"":NEXT:PEN 1 920 FOR F=0 TO 31:LOCATE F+1,22:PRINT"" :NEXT 930 LOCATE 8,1:PRINT CHR$(238);" ";C HR$(238);" ";CHR$(238) 940 LOCATE 22,1:PRINT"Score:0" 950 RETURN 960 RESTORE 970:FOR X=360 TO 366:READ A: POKE X,A:NEXT:RESTORE:RETURN 970 DATA 205,96,187,50,111,1,201