ZX81 Programs


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

ZX81 Program Listing

**S.M.P.******SLR/1984* (smp.p)


SYSTEM VARIABLES

PROG  : 16509
D-FILE: 16967
VARS  : 17760
E-LINE: 17761
STKBOT: 17761
STKEND: 17761


LEGEND

A means INVERSE A
A means GRAPHICS A
PRINT means treat as KEYWORD P


PROGRAM LISTING

  10 REM **S.M.P.******SLR/1984*
  20 FAST
  30 PRINT AT 20,5;"SINCLAIR MEM
O PAD"
  40 SCROLL
  50 FOR A=0 TO 31
  60 PRINT AT 20,A;"A"
  70 PAUSE 4E4
  80 LET A$=INKEY$
  90 IF A$=CHR$ 118 THEN GOTO 13
0
 100 IF A$=CHR$ 119 THEN GOTO 17
0
 110 IF A$=CHR$ 115 THEN GOTO 20
0
 120 IF CODE A$<11 OR CODE A$>63
THEN GOTO 70
 130 IF A$=CHR$ 118 THEN LET A$=
" "
 140 PRINT AT 20,A;A$
 150 NEXT A
 160 GOTO 40
 170 LET A=A-(A>0)
 180 PRINT AT 20,A;"A "
 190 GOTO 70
 200 PRINT AT 20,A;" "
 210 GOTO 40
 300 SAVE "SMP"
 310 RUN