Sinclair ZX80 / ZX81 / Z88 Forums

Code: Select all

# DISPLAY EXAMPLE
# ><AVSNAP
# ®®®®®®®®®®®®®®®®®
# FIND IN ORDI-5 n2
# PAGE 29
# AUTHOR :
# ERIC WEINSTEIN.
# ®®®®®®®®®®®®®®®®®

     1  REM [HEX:\
0E,21,3E,06,C6,02,47,CD,\
18,09,CD,9B,09,12,FD,34,\
3A,2A,0C,40,23,16,06,ED,\
B1,15,20,FB,54,5D,ED,B1,\
C3,5D,0A,3D,3D ]

     7 POKE 16536,6
     8 POKE 16517,6
    10 LET I=1
    50 DIM N$(50,16)
    55 FOR A=1 TO 50
    60 LET N$(A)=CHR$ (A+127)+" HELLO "+CHR$ (A+127)
    70 NEXT A
    80 PRINT AT 5,0;"--------------------------------"
    85 PRINT AT 16,0;"--------------------------------"
    90 FOR I=1 TO 50
    96 RAND USR 16514
    98 PRINT N$(I);"(";I;")"
   100 NEXT I
  8999 STOP 
  9000 SAVE  "AUTO-SCROLl"