ZX81 Programs


Read about, play, run, or list games, animations, and more. These are my programs from the ’80s to today.

ZX81 Program Listing

**NA**SLR/1985****** (na.p)


SYSTEM VARIABLES

PROG  : 16509
D-FILE: 17099
VARS  : 17892
E-LINE: 17893
STKBOT: 17893
STKEND: 17893


LEGEND

9999 means line number
PRINT means treat as KEYWORD P


PROGRAM LISTING

  10 REM **NA**SLR/1985******
  20 PRINT "NANANANANANANANANANA
NANANANANANA                    
            NANANANANANANANANANA
NANANANANANA"
  30 LET U$="N"
  40 FOR A=1 TO 100
  50 FOR G=0 TO 30
  60 PRINT AT 1,G;" >"
  70 LET L$=INKEY$
  80 IF L$="N" AND G/2=INT (G/2)
AND U$="A" THEN GOTO 130
  90 IF L$="A" AND G/2<>INT (G/2
) AND U$="N" THEN GOTO 130
 100 IF L$="N" OR L$="A" THEN
LET U$=L$
 110 NEXT G
 120 PRINT AT 3,0;"NA RUNNER HIT
,TOO BAD**";A;"**"
 125 GOTO 200
 130 NEXT A
 140 PRINT AT 3,0;"YOU BEAT THE 
NA RUNNER*CONGRATS*"
 200 PRINT AT 5,0;"PRESS ANY KEY
 TO CONTINUE......."
 210 PAUSE 4E4
 220 CLS
 230 RUN
 300 SAVE "NA"
 310 RUN