ZX81 Programs


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

ZX81 Program Listing

truchet (truchet.p)


SYSTEM VARIABLES

PROG  : 16509
D-FILE: 16782
VARS  : 17575
E-LINE: 17576
STKBOT: 17576
STKEND: 17576


LEGEND

9999 means line number
PRINT means treat as KEYWORD P


PROGRAM LISTING

  10 REM **TRUCHET****SLR/2025**
  20 POKE 16418,0
  30 FOR X=0 TO 23 STEP 2
  40 FOR Y=0 TO 31 STEP 2
  50 LET R=INT (RND*2)
  60 IF R=0 THEN PRINT AT X,Y;"ö
 ";AT X+1,Y;" ö";
  70 IF R=1 THEN PRINT AT X,Y;" 
¶";AT X+1,Y;"¶ ";
  80 NEXT Y
  90 NEXT X
 100 GOTO 30
 200 SAVE "TRUCHET"
 210 RUN