Draws a unique graphic.
Appears on
One of a series of library tapes. Programs on these tapes were renamed to a number series. This tape contained programs 20001 to 20050. These tapes were compiled by Tony Willing.
Gallery
Source Code
1 REM "GRAPHIC ?"
2 REM By John Copps
4 LLIST : LPRINT
5 LET a=5: LET b=75
6 INK 2
7 PRINT AT 2,6;"a=";a
8 PRINT AT 2,20;"b=";b
10 PLOT 225,90
20 DRAW a,b
30 DRAW a,-b
35 INK 4
40 DRAW -a,-b
50 DRAW -a,b
60 LET a=a-1
70 LET b=b-1
80 INK 4: PAUSE 15
90 GO TO 6
100 COPY