Atari 130XE - Page 93

449 REM ADD 6TH STAR EVER ... OTHER L I NE
45 91( =5+5 *1.4 : GOSUB 1.000
4 69 K=7
479 NEI(T I
599 REM IF KE ... HIT THEN STOP
51.9 IF PEEK(764)=255 THE N 51.9
51.5 REM OPEN TEI(T WINDOW WITHOUT CLEARING SCREEN
529 GRAPHICS 7+32
525 REM CHANGE COLORS BACK
539 SETCOLOR 9 .. 4 .. 4 : SETCOLOR 1. .. 9 .. 1.4
559 STOP
1.999 REM DRAW 1. S TAR CENTERED AT 1( .. ...
1.91.9 PLOT 1(-1. ..... : DRAWTO I( + 1. .....
1.929 PLOT 1( ..... -1.: PLOT 1( ..... +1.
1.930 RETURN
87