Set of Apple II Hard Drive Images/hard.hdv/HARD/TWOLINERS/TL.EYE.SCAN

Applesoft BASIC Source Code | 1992-02-02 | 170 b | 3 lines | [FC] Applesoft BASIC Program (0x0801)

0  REM STEVEN BLOCK--PASADENA,CA
1  POKE 233,3: POKE 232,2: FOR J = 1 TO 14: READ D: POKE 769 +J,D: NEXT : HGR2 : SCALE= 40: HCOLOR= 3
2  FOR R = 1 TO 64: ROT= R: XDRAW 1 AT 140,90: NEXT :I = I +10 * RND(I) *(I <254): POKE 776,I: RESTORE : GOTO 2: DATA 1,0,4,0,2,4,2,4,2,4,2,4,0,6