A ZX81 BASIC version of person running with moving sky.
PROG : 16509
D-FILE: 17194
VARS : 17987
E-LINE: 17988
STKBOT: 17988
STKEND: 17988
9999 means line number
PRINT means treat as KEYWORD P
10 REM **RUN TEST***SLR/2022**
20 DIM A$(4,9)
30 LET A$(1)="·²ôñõ öòô"
40 LET A$(2)="·² òõñ·´ "
50 LET A$(3)="·² ÷ ÷ "
60 LET A$(4)="·² òõñ·´ "
70 LET B$=" ³ ·÷ô
òôò ö ³±²
ñóóó ôù!!ù· "
80 PRINT AT 3,2;" ";AT 7,0;"óó
óóóóóóóóóóóóóóóóóóóóóóóóóóóóóó"
90 FOR R=1 TO 4
100 PRINT AT 0,0;B$( TO 32);AT
1,0;B$(41 TO 72);AT 4,1;A$(R,
TO 3);AT 5,1;A$(R,4 TO 6);AT 6,
1;A$(R,7 TO )
110 LET B$( TO 40)=B$(2 TO 40)+
B$(1)
120 LET B$(41 TO )=B$(42 TO 80)
+B$(41)
130 NEXT R
140 GOTO 90
200 SAVE "RUNTEST"
210 RUN