6H© u¢˜~>F > Ò~ +x>Éd Ÿ156, 9 n Ÿ157, 0 x N=0 ‚ C=2 Œ B=0 – Ÿ 140,1   M=0 ª · ´ L=0 ¾% ƒ "A HIRES2 COLOR GRAPHICS EDITOR" È ƒ Ò ƒ "USE CURSOR KEYS TO MOVE" Ü ƒ æ( ƒ "SPACE BAR TOGGLES MODE DRAW/MOVE" ð% ƒ "C - TOGGLES COLOR WRITE ON/OFF" ú ƒ "E - ERASE MODE" & ƒ "P - PRINT SCREEN CP 80 PRINTER" / ƒ "S - SAVE DIAGRAM TO DISC ON FILE HIRES2" . ƒ "L - LOAD NEXT DIAGRAM FROM FILE HIRES2" "# ƒ "F - CHANGE FOREGROUND COLOR " ," ƒ "B - CHANGE BACKGROUND COLOR" 6 ƒ "ESC STOP PROGRAM" @ ƒ J Ÿ156, 2 T ƒ "HIT ANY KEY" ^ „ Þ$="" ‰ 350 h ¸2 r ’ 1120 | ’ 1440 † X=256:Z=128:Q=0:O=0  G=0 š ’ 1890 ¤ A1$=Þ$ ® „ G=1 ‰ L=0:Q=0 ¸ „ A1$=ß(4) ‰ 620  „ A1$=ß(19) ‰ 660 Ì „ A1$=ß(5) ‰ 700 Ö „ A1$=ß(24) ‰ 740 à „ A1$=" " ‰ 860 ê „ A1$="S" ‰ 810 ô „ A1$="L" ‰ 830 þ „ A1$="E" ‰ G=1:’ 1580:O=0  „ A1$=ß(27) ‰ æ 7:  „ A1$="P" ‰ 880 , „ A1$="F" ‰ C=C+1:’ 1300:„ C=16 ‰ C=0 &, „ A1$="B" ‰ B=B+1:’ 1300:„ B=16 ‰ B=0 0 „ A1$="C" ‰ 1800 : Ÿ156, C D Ÿ157, B N „ Q=0 ‰ ’ 1650:Q=1: 610 X ’ 1660:Q=0 b 420 l/ „ O=1 ‰ ’ 1650:„ X<510 ‰ X=X+1:’ 780: 420 v „ L=1 ‰ ’ 1650 ˆ ’ 1660 € „ X<510 ‰ X=X+1:’ 780: 420 Š ’ 780: 420 ”- „ O=1 ‰ ’ 1650:„ X>0 ‰ X=X-1:’ 780: 420 ž „ L=1 ‰ ’ 1650 ˆ ’ 1660 ¨ „ X>0 ‰ X=X-1:’ 780: 420 ² ’ 780: 420 ¼/ „ O=1 ‰ ’ 1650:„ Z<255 ‰ Z=Z+1:’ 780: 420 Æ „ L=1 ‰ ’ 1650 ˆ ’ 1660 Ð „ Z<255 ‰ Z=Z+1:’ 780: 420 Ú ’ 780: 420 ä- „ O=1 ‰ ’ 1650:„ Z>0 ‰ Z=Z-1:’ 780: 420 î „ L=1 ‰ ’ 1650 ˆ ’ 1660 ø „ Z>0 ‰ Z=Z-1:’ 780: 420  ’ 780: 420   „  (X,Z) ‰ L=1:•  L=0   • *# ’ 1660:å "O",6,"COLORTV":ã 6:æ 6 4 420 > „ M=0 ‰ å "I",7,"COLORTV":M=1 H à 1090:ä 7 R 420 \! G=0:„ O=0 ‰ O=1:’ 1440: 420 f O=0 :’ 1440: 420 p ’ 1660 z Ÿ 128,8: L #(1) „ ” 62,01,211,11 Ž) ” 96,105,14,128,229,6,8,203,34,126,161 ˜* ” 40,2,203,194,35,16,245,122,205,69,128 ¢& ” 225,203,57,48,233,62,0,211,11,201 ¬ ” -1 ¶ X=336:˜ 880 À “ Y:„ Y=-1 ‰ 980 Ê Ÿ X,Y:X=X+1: 960 Ô ‚ ß(27);"3";ß(21); Þ Š Y=0 ™ 15 è Š U=0 ™ 15 š 8 ò ‚ ß(27);"K";ß(0);ß(2); üO Š P=0™7: 28,P+128:Š X=0 ™ 7:C=¿(336,61440+U+16*¾(61440+Y*64+(X+P*8))):‹ X:‹P  ‚ ß(10);  ‹ U  ‹ Y $ ‚ ß(27);"2";ß(7) .  L #(1) Ž 8 420 B/ ·:ƒ "NO MORE DIAGRAMS":æ 7:å "I",7,"COLORTV" L A1$=Þ$:„ A1$="" ‰ 1100 V ¸2:’ 1120: 420 ` ˜ 1350 j Ÿ 162,30:Ÿ 163,128 t „ ¾(216)=17 ‰ 1170 ~ æ 7 ˆ Ÿ 216,17:A=¿(32769) ’ Š A=0 ™ 63 œ Ÿ 62464+A,32 ¦ ‹ A °   8,64 º Š A=0 ™ 63 Ä Ÿ 64512+A,138 Î „ A<46 ³ A>40 ‰ Ÿ 64512+A,13 Ø „ A<59 ³ A>55 ‰ Ÿ 64512+A,9 â ‹ A ì Š A=0 ™ 53 ö “ D  Ÿ 62464+A,D   ‹ A    8,64  ’ 1410 ( Ÿ 64533,(F*16):Ÿ 64543,(B*16) 2   8,0 < • F% ” 83,84,65,84,85,83,32,76,73,78,69 P( ” 32,32,67,79,76,79,82,32,70,32,32,32 Z" ” 67,79,76,79,82,32,66,32,32,32 d ” 32,32,77,79,68,69 n1 ” 32,32,32,32,32,32,32,32,32,32,67,79,76,79,82 x, ” 0,4,2,6,1,5,3,7,8,12,10,14,9,13,11,15,0 ‚ ˜ 1400:Š F1=0 ™ Í(C) Œ “ F:‹ F1 – •   „ O=1 ‰ ˜ 1500 ˆ 1510 ª Š F1=1 ™ 5 ´ “ F ¾ Ÿ 62504+¼(F1),F È ‹ F1 Ò • Ü ” 68,82,65,87,32 æ ˜ 1570 ð Š F1=1 ™ 4 ú “ F  Ÿ 62504+¼(F1),F  ‹ F1  • " ” 77,79,86,69 , ˜ 1640 6 Š F1=1 ™ 5 @ “ F J Ÿ 62504+¼(F1),F T ‹ F1 ^ • h ” 69,82,65,83,69 r ’ 1670:§ X,Z:’ 1740:• | ’ 1670:¨ X,Z:’ 1740:• †   8,64  I=X/8 š „ Z=255 ‰ H=0: 1710 ¤ H=(255-Z)/16 ® K=¾(63488+I+H*64) ¸   8,0  • Ì   8,64 Ö J=K à „ N=1 ‰ ’ 1410:J=F+(B*16) ê Ÿ 63488+I+H*64,J ô   8,0 þ •  „ N=1 ‰ 1840  N=1  ’ 1870 & 420 0 N=0 : ’ 1890 D 420 N# Ÿ 62520,79:Ÿ 62521,78:Ÿ 62522,32 X • b# Ÿ 62520,79:Ÿ 62521,70:Ÿ 62522,70 l • ÿÿ5RÁ@E€~œ COLORTV€DIAGRAMS€AMS€ !Ò•7É!Ï•