juiced.gs.txt

 10  HOME 
 20  GR 
 22  COLOR= 15
 24  FOR N = 0 TO 39
 26  HLIN 0,39 AT N
 28  NEXT 
 30  REM  APPLE
 35  REM  OUTLINE
 40  COLOR= 0
 50  HLIN 12,16 AT 33
 60  HLIN 20,27 AT 33
 70  HLIN 11,12 AT 32
 80  HLIN 16,20 AT 32
 90  HLIN 27,28 AT 32
 100  HLIN 10,11 AT 31
 110  HLIN 28,29 AT 31
 120  HLIN 9,10 AT 30
 130  HLIN 29,30 AT 30
 140  HLIN 8,9 AT 29
 150  HLIN 18,22 AT 29
 160  PLOT 30,29
 170  HLIN 7,8 AT 28
 180  HLIN 16,25 AT 28
 190  HLIN 30,31 AT 28
 200  HLIN 6,7 AT 27
 210  HLIN 14,26 AT 27
 220  HLIN 31,32 AT 27
 230  HLIN 5,6 AT 26
 240  HLIN 14,16 AT 26
 250  HLIN 26,27 AT 26
 260  PLOT 32,26
 270  PLOT 5,25
 280  HLIN 25,27 AT 25
 290  PLOT 32,25
 300  PLOT 5,24
 310  PLOT 32,24
 320  PLOT 5,23
 330  PLOT 32,23
 340  PLOT 5,22
 350  HLIN 9,17 AT 22
 360  HLIN 23,29 AT 22
 370  PLOT 32,22
 380  PLOT 5,21
 390  HLIN 8,18 AT 21
 400  HLIN 22,30 AT 21
 410  PLOT 32,21
 420  PLOT 5,20
 430  HLIN 7,19 AT 20
 440  HLIN 21,32 AT 20
 450  HLIN 5,32 AT 19
 460  HLIN 5,32 AT 18
 470  HLIN 6,7 AT 17
 480  HLIN 30,31 AT 17
 490  HLIN 7,8 AT 16
 500  HLIN 29,30 AT 16
 510  HLIN 8,11 AT 15
 520  HLIN 28,29 AT 15
 530  HLIN 11,12 AT 14
 540  HLIN 20,21 AT 14
 550  HLIN 27,28 AT 14
 560  HLIN 12,27 AT 13
 570  HLIN 19,22 AT 12
 580  HLIN 18,23 AT 11
 590  HLIN 18,23 AT 10
 600  HLIN 17,19 AT 9
 610  HLIN 21,23 AT 9
 620  HLIN 17,19 AT 8
 630  HLIN 21,24 AT 8
 640  HLIN 17,18 AT 7
 650  HLIN 22,24 AT 7
 660  HLIN 23,24 AT 6
 670  PLOT 24,5
 710  COLOR= 1
 720  HLIN 13,19 AT 14
 730  HLIN 22,26 AT 14
 740  HLIN 12,27 AT 15
 750  HLIN 9,28 AT 16
 760  HLIN 8,29 AT 17
 770  PLOT 6,20
 780  PLOT 20,20
 790  HLIN 6,7 AT 21
 800  HLIN 19,21 AT 21
 810  PLOT 31,21
 820  HLIN 6,8 AT 22
 830  HLIN 18,22 AT 22
 840  HLIN 30,31 AT 22
 850  HLIN 6,31 AT 23
 860  HLIN 6,31 AT 24
 870  HLIN 6,24 AT 25
 880  HLIN 28,31 AT 25
 890  HLIN 7,13 AT 26
 900  HLIN 17,25 AT 26
 1000  HLIN 28,31 AT 26
 1010  HLIN 8,13 AT 27
 1020  HLIN 27,30 AT 27
 1030  HLIN 9,15 AT 28
 1040  HLIN 26,29 AT 28
 1050  HLIN 10,17 AT 29
 1060  HLIN 23,29 AT 29
 1070  HLIN 11,28 AT 30
 1080  HLIN 12,27 AT 31
 1090  HLIN 13,15 AT 32
 1100  HLIN 21,26 AT 32
 2100  REM  DOTS
 2110  COLOR= 15
 2120  HLIN 12,13 AT 19
 2130  PLOT 10,21
 2140  PLOT 24,19
 2150  PLOT 24,21