Sinclair ZX80 / ZX81 / Z88 Forums

Code: Select all

10 FOR a=0 TO 0 STEP 0: PAUSE 1: BORDER 1: BORDER 2: BORDER 3: BORDER 4: BORDER 5: BORDER 6: BORDER 7: NEXT a
20 PAPER 0: INK 7
30 BORDER 0: CLS
40 FOR a=0 TO 10
50 FOR b=0 TO 7: PRINT PAPER b;”    ”;: NEXT b
60 FOR b=7 TO 0 STEP -1: PRINT PAPER b;”    ”;: NEXT b
70 NEXT a
80 PRINT AT 11,0;”Testing Testing  Testing Testing”
90 FOR b=0 TO 7: PRINT #0; PAPER b;”    ”;: NEXT b
100 FOR b=7 TO 1 STEP -1: PRINT #0; PAPER b;”    ”;: NEXT b
110 FOR a=0 TO 0 STEP 0
120 FOR b=0 TO 7
130 BORDER b: PAUSE 50
140 IF INKEY$=“” THEN NEXT b: NEXT a
150 GO TO 10

Note there are four spaces in between the quotes in lines 50, 60, 90 and 100.
And two spaces in between the two middle “Testing” words of line 80.

Use RUN 20 to start...