110 TEXT : HOME : PRINT "SURPRISE ATTACK!": PRINT "BY JEFF G. COX": PRINT "COPYRIGHT 1987 BY MICROSPARC, INC."
120 VTAB 6: PRINT "ENTER 'A' FOR ARCADE MODE": PRINT "OR 'C' FOR CONTINUOUS MODE: ";: POKE -16368,0: GET CH$: POKE -16368,0: PRINT CH$:V(0) = 1: IF CH$ = "A" OR CH$ = CHR$(99) THEN V(0) = 0
130 IF CH$ < >"A" AND CH$ < >"C" AND CH$ < > CHR$(97) AND CH$ < > CHR$(99) THEN 120
140 VTAB 9: PRINT "ENTER 'K' TO SELECT BASE WITH KEYBOARD": PRINT "OR A 'C' FOR COMPUTER CONTROL: ";: POKE -16368,0: GET CH$: PRINT CH$: POKE -16368,0:V(1) = 1: IF CH$ = "C" OR CH$ = CHR$(99) THEN V(1) = 0
150 IF CH$ < >"C" AND CH$ < >"K" AND CH$ < > CHR$(99) AND CH$ < > CHR$(107) THEN 140
160 VTAB 12: PRINT "ENTER STARTING LEVEL (1-9): ";: POKE -16368,0: GET CH$: POKE -16368,0: PRINT CH$:V(2) = VAL(CH$): IF V(2) <1 OR V(2) >9 THEN 160
170 VTAB 15: PRINT "ENTER PUSHBUTTON NUMBER (0-1): ";: POKE -16368,0: GET CH$: POKE -16368,0: PRINT CH$:V(3) = VAL(CH$): IF V(3) <0 OR V(3) >1 THEN 170
180 VTAB 18: PRINT "PAUSE AFTER SCORE? (Y/N): ";: POKE -16368,0: GET CH$: POKE -16368,0: PRINT CH$:V(4) = 0: IF CH$ = "Y" OR CH$ = CHR$(121) THEN V(4) = 1: REM PAUSE SELECT 0=NO PAUSE AFTER SCORE, 1=PAUSE
190 IF CH$ < >"N" AND CH$ < >"Y" AND CH$ < > CHR$(110) AND CH$ < > CHR$(121) THEN 180
200 VTAB 21: PRINT "ENTER 'K' TO AIM WITH KEYBOARD OR": PRINT "'J' FOR PADDLE/JOYSTICK: ";: POKE -16368,0: GET CH$:V(5) = 0: PRINT CH$: IF CH$ = "K" OR CH$ = CHR$(107) THEN V(5) = 1
210 IF CH$ < >"J" AND CH$ < >"K" AND CH$ < > CHR$(106) AND CH$ < > CHR$(107) THEN 200
220 V(6) = 0: REM LATERAL POLARITY 0=NORMAL, 1=REVERSED
230 V(7) = 0: REM VERTICAL POLARITY 0=NORMAL, 1=REVERSED
240 FOR X = 0 TO 7: POKE 768 +X,V(X): NEXT
250 PRINT CHR$(4)"RUN SURPRISE.ATTACK"
260 TEXT : HOME : PRINT CHR$(7): VTAB 7: PRINT "THE TWO FILES 'SURPRISE.ATTACK' AND ": PRINT "'SAFAST' MUST BOTH BE ON THE DISK FOR": PRINT "THIS PROGRAM TO RUN.": VTAB 22: END