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