Set of Apple II Hard Drive Images/hard.hdv/HARD/TWOLINERS/TL.ROUND.ROBIN

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

0  REM JIM ROTH--SAN ANTONIO,TX
1  HGR2 : HCOLOR= 7: HPLOT 0,0 TO 279,0 TO 279,191 TO 0,191 TO 0,0
2 X1 =  INT(100 * RND(1) +60):Y1 =  INT(80 * RND(1) +20):X2 = 130 * SIN(A) +138:Y2 = 90 * COS(A) +95: HPLOT X1,Y1 TO X2,Y2:A = A +.1:C =  INT(7 * RND(1) +1): GOTO 2