ZX81 Programs


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

ZX81 Program Listing

**FIZZBUZZ***SLR/2022** (fizzbuzz.p)


SYSTEM VARIABLES

PROG  : 16509
D-FILE: 16845
VARS  : 17638
E-LINE: 17639
STKBOT: 17639
STKEND: 17639


LEGEND

9999 means line number
PRINT means treat as KEYWORD P


PROGRAM LISTING

  10 REM **FIZZBUZZ***SLR/2022**
  20 FOR I=1 TO 100
  30 SCROLL
  40 LET FIZZ=NOT I-3*INT (I/3)
  50 LET BUZZ=NOT I-5*INT (I/5)
  60 IF FIZZ THEN PRINT "FIZZ";
  70 IF BUZZ THEN PRINT "BUZZ";
  80 IF NOT (FIZZ OR BUZZ) THEN
PRINT I;
  90 NEXT I
 100 LET T$="PI*PI+1"
 110 LET Z$="NOT PI"
 120 FOR P=1 TO 50
 130 PRINT AT VAL T$,VAL Z$;"FIZ
ZBUZZ"
 140 PRINT AT VAL T$,VAL Z$;"FIZ
ZBUZZ"
 150 NEXT P
 160 CLS
 170 RUN
 200 SAVE "FIZZBUZZ"
 210 RUN