home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / hard.hdv / HARD / TWOLINERS / P.10.2.LINER..3 (.txt) < prev    next >
Encoding:
Applesoft BASIC Source Code  |  1992-02-02  |  205 b   |  3 lines  |  [FC] Applesoft BASIC Program (0x0801)
  1. 0  REM DAVID GERSHON-- SEAL BEACH, CA
  2. 1  POKE 232,255: POKE 233,255:X =  INT( RND(1) *120) +1:R =  INT( RND(1) *40): HGR2 : ROT= R: DRAW X AT 90,90:H =  INT( RND(1) *8): IF H = 0  OR H = 4  THEN H = 1
  3. 2  HCOLOR= H: XDRAW X AT 90,90: GOTO 1: REM TRY THIS EVERY NOW AND THEN JUST TO SEE WHAT'S GOING ON.