@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} HE |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 2.?}D2:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uL !"`i33>=<==><\DRAWTODRAWTURNTOTURNGOTOF^}ILLTOFILLGOPENCLEARQUITREDYELLOWBLUEERASEUPONOFF&ժԭ ܦ7%HQ]mOWެ)_}\`յle|s3 6ŹK] YLN  ( 0 :`P4Ll `} 3#4@W$L%L zLԥ Lݥ} Lᥩ`Lצȱ 8A iiȽkȱBȱ ()$a}(ȱ3(L ȱ$+ H hhLצ 􄡢>B ų` ݩ ٽ/b}0@L ȱP/FFLųT կ  ;鈩` (" )* /0o}LLl )L쥒60HHHޥ ^ M FhHhhh`H h` r 2. p}) ST L` )楒䄬`E e ɛ ɛ eL@ + q} Cď w  `  `  F MLx  ө`) F,r} F,`  I ڳB ڳ` L4-J> ųN: ų}} q΅ 4 N L` ;х8eЅ t(`ͅe8Ѕ t(`̅Ѕ̱̤~}а̥(`0 c4Lc8Ѕ`JB ųNFLų`8壑ȄĤ棤R% }`qȥq`0 T 2 iR2 c(VR ϳX ϳT Z0 ϳR 0 0LV2 ϳZR ϳ2 2T X2 }RT ԑȥՑ҈``҅ȱ҅բR2 c)VR ϳT Z0 ϳV 0T XR ϳL V2 ϳZR ϳ2 2T X2 ϳRT} L0ڪ֑۰`ڪ$eۅeۅوٱ֑`'فـ`IIš`}yy`8`6yyƣ&L`Ll ? +} ?66ƣ&&! c 8奥 ? ?` յ`8`0 u`uց` c') c " p }p p p`bLϳbLϳbLbLc- Ӷ8L?ĥ3 z,H& & &e}heeLӶ` ' ?- opq0Q'# 0Q Q0Q o 0 o`'d }0:8`/`A[8``` H zhš``ȱ ` *`ȱ Ll ,ɛ[` =`ȱ },`ȱ `ȱɛ`6 ϳ T\ oȱȱ o` Ȅ`4`HLlh`ȱ`Lo oLo}2ҩҢѝѝST` ʸ @膑 ʸ L`Ll - ʸiL?( )`}? ҅ ҅ )𽦑𷥸膑`iʵ   8`Lpqp @%@}# $ oL[HH hh hh8 L[hhB SL[qp v_ v`" 楔 饔} ` 򥔅LA" @ ȼ i Ž ȼ f ŽL r LA S`Ll8 } TE`a 8岅ڥ峅ۥ֥ w`T}L< *iiS"LJ> ϳD }p LA ϳG p> ݻD ݻ%L׻L>DH)Ω hH)3OΩϠN ϳHNl L ٽJ D 7 sL{> ݻ> S < 7}`'H0P ph ƨ ph HЅƨ ph  0 ph Hh`` r ?0? A h}8`h$hr' յ򥢅``iPU80T`T> ݻH> hL0`r Z}! c  ⥣)ZL  ZL!W,L) ! ?` $(,15:>BGKOSX\`dhlptx|}Ʀƥ&&eee &&L`ee}e`͕ѩֹ͕؅٥ԅբ &&&ՐeօΥeׅϥe؅Хeم &&&L `!҅ӹ} ? х R&&&&ơ&& c 8奣  ?N`8΅ΩυϩЅЩх`*LI*LS`}STT0)ѩ`yrlf`[UQLHD@<952/-*)Bɛ oL `` `  ``[an}}[aaaaaaaaaREADYWHAT'S THAT?IMMEDIATE ONLYDIVIDE BY 0OOPSI/O ERROR *** NO ROOMWHERE?U: TOO DEEPLINE #?TO}O MANY I/OS--> ATARI PILOT (C) COPYRIGHT ATARI 1980xhxEREFFID:D DAOL   өj ` pB5 J:*TITLEPAGE10 *MENU15 GR:QUIT20 C:@B16=6425 C:@B53774=6430 GR:PEN ERASE;GOTO 0,0;DRAW -1;GOTO -50,47;PEN BLUE;DRAWTO }-50,-31;PEN ERASE35 C:@B16=6440 C:@B53774=6445 C:#X=050 *COLOR155 GR:GOTO -35,37;PEN RED60 GR:TURNTO #X;DRAW 565 C:#X= }#X+4570 J(#X<370):*COLOR175 C:#X=080 *COLOR285 GR:GOTO -5,37;PEN RED90 GR:TURNTO #X;DRAW 595 C:#X=#X+45100 J(#X<370):* }COLOR2105 C:#X=0110 *COLOR3115 GR:GOTO 25,37;PEN RED120 GR:TURNTO #X;DRAW 5125 C:#X=#X+45130 J(#X<370):*COLOR3135 C:#X }=0140 *COLOR4145 GR:GOTO 55,37;PEN YELLOW150 GR:TURNTO #X;DRAW 5155 C:#X=#X+45160 J(#X<370):*COLOR4165 GR:GOTO -40,27;T }URNTO 90;PEN BLUE;3(DRAW 10;TURN 90);FILL 10170 GR:GOTO -5,27;DRAWTO 0,17;TURNTO 270;DRAW 10;FILLTO -5,26175 GR:GOTO 20,27; }TURNTO 90;PEN BLUE;3(DRAW 10;TURN 90);FILL 10180 GR:GOTO 50,27;TURNTO 90;PEN BLUE;3(DRAW 10;TURN 90);FILL 10185 GR:PEN YELL }OW;GOTO -38,12;TURNTO 180;DRAW 9;TURN 180;DRAW 5;TURNTO 90;DRAW 6;TURN 90;DRAW 5;TURN 180;DRAW 9190 GR:GOTO -8,12;PEN YELLOW };TURNTO 180;DRAW 9;TURN 180;DRAW 5;TURNTO 90;DRAW 6;TURN 90;DRAW 5;TURN 180;DRAW 9195 GR:GOTO 22,12;TURNTO 180;DRAW 9;TURNTO } 90;DRAW 6200 GR:GOTO 52,12;PEN YELLOW;TURNTO 180;DRAW 9;TURN 180;DRAW 5;TURNTO 90;DRAW 6;TURN 90;DRAW 5;TURN 180;DRAW 9205 } GR:PEN RED;GOTO -34,-1;TURNTO 135;DRAW 7;TURNTO 270;DRAW 10;FILLTO -35,-2210 GR:PEN YELLOW;GOTO -30,-7;TURNTO 180;DRAW 5;TU }RN 90;DRAW 8;TURN 90;FILL 5;PEN BLUE;GOTO -33,-9215 GR:TURNTO 180;DRAW 3;TURN 90;DRAW 1;TURN 90;DRAW 3220 GR:PEN YELLOW;GOT }O -6,-1;TURNTO 90;19(TURN 10;DRAW 1);TURN 180;DRAW 1;TURNTO 45;4(FILL 3;TURN -22)225 GR:PEN YELLOW;GOTO 23,-1;TURNTO 90;19(T }URN 10;DRAW 1);TURN 180;DRAW 1;TURNTO 45;4(FILL 3;TURN -22)230 GR:PEN YELLOW;GOTO 53,-1;TURNTO 90;19(TURN 10;DRAW 1);TURN 18 }0;DRAW 1;TURNTO 45;4(FILL 3;TURN -22)235 GR:PEN RED;GOTO -41,-25;TURNTO 90;DRAW 12;TURNTO 0;DRAW 1;TURNTO 270;DRAW 12;TURNTO } 0;DRAW 1;TURN 90;DRAW 12240 GR:GOTO -37,-22;TURNTO 90;DRAW 7;TURNTO 0;PEN ERASE;DRAW 1;TURNTO 270;PEN RED;DRAW 7245 GR:PEN } BLUE;GOTO -39,-26;TURNTO 90;DRAW 1;PEN ERASE;DRAW 6;PEN BLUE;DRAW2250 GR:PEN YELLOW;GOTO -42,-25;GOTO -28,-25255 GR:PEN RE }D;GOTO -3,-21;TURNTO90;9(DRAW 1;TURN20);DRAW 2;10(FILL 1;TURN 20);PEN YELLOW;GOTO -3,-20260 GR:GOTO -4,-19;GOTO -6,-24;GOTO }-6,-23;GOTO -5,-22;GOTO -5,-25265 GR:PEN YELLOW;GOTO17,-25;TURNTO 90;DRAW 15;TURNTO 0;DRAW 1;TURNTO270;DRAW 15;TURNTO 0;DRAW } 1;TURN 90;DRAW 15270 GR:GOTO 19,-22;DRAW 1;3(PEN BLUE;DRAW 2;PEN YELLOW;DRAW2)275 GR:GOTO 19,-21;DRAW 1;3(PEN BLUE;DRAW 2; }PEN YELLOW;DRAW2)280 GR:GOTO 19,-20;DRAW 13;PEN BLUE;GOTO 19,-26;DRAW 1;GOTO 30,-26;DRAW 1;PEN RED;GOTO 16,-25285 GR:GOTO 4 }7,-25;TURNTO 90;DRAW 15;TURNTO 0;DRAW 1;TURNTO270;DRAW 15;GOTO 47,-23;TURNTO 90;DRAW6;TURNTO 0290 GR:DRAW 1;TURNTO 270;DRAW }4;TURNTO 0;DRAW 1;TURNTO 90;DRAW 4295 GR:PEN BLUE;GOTO 49,-26;DRAW 1;GOTO 60,-26;DRAW 1300 *SELECT305 T:310 : } and or JOYSTICK and TRIGGER315 C:#L=37320 *TAG325 GR:PEN Y }ELLOW330 U:*ARROW335 J:*CONSOLEBUTTONS340 *ARROW345 GR:GOTO -75,#L350 GR:TURNTO 90;DRAW 18;TURNTO -45;DRAW 5;TURN180;DRA }W 5;TURNTO 225;DRAW 5355 E:360 *CONSOLEBUTTONS365 C:@B16=64370 C:@B53774=64375 C:@B53279=8380 J(@B53279=3):*MACHINESUBR }OUTINE385 J(@B53279=6):*STARTPRESSED390 J(@B53279=5):*INCREMENT395 J(%T8):*STARTPRESSED400 J(%J0=#N):*DECREMENT405 J(%J0 }=#S):*INCREMENT410 PA:15415 J:*CONSOLEBUTTONS420 *INCREMENT425 GR:PEN ERASE430 PA:30435 U:*ARROW440 C:#L=#L-15445 C(# }L<-31):#L=37450 J:*TAG455 *DECREMENT460 GR:PEN ERASE465 PA:30470 U:*ARROW475 C:#L=#L+15480 C(#L>40):#L=-23485 J:*TAG }490 *STARTPRESSED495 C(#L=37):$PROGRAMNAME=COLORS500 J(#L=37):*MERGEIT505 C(#L=22):$PROGRAMNAME=SHAPES510 J(#L=22):*MERGE }IT515 C(#L=7):$PROGRAMNAME=LETTERS520 J(#L=7):*MERGEIT525 C(#L=-8):$PROGRAMNAME=OBJECTS530 J(#L=-8):*MERGEIT535 C(#L=-23 }):$PROGRAMNAME=CLASSES540 J(#L=-23):*MERGEIT545 J:*CONSOLEBUTTONS550 *MERGEIT555 J(#L=#Y):*TAG2556 GR:CLEAR560 C:@B708= }26561 C:@B709=150565 C:#Y=#L570 C:@B710=1575 GR:PEN ERASE;GOTO-62,8;PENRED;TURNTO180;DRAW5;TURNTO90;DRAW9;TURNTO19;PENYEL }LOW;GO 8;TURNTO202;DRAW4580 GR:TURNTO180;DRAW4;TURNTO270;DRAW2;TURN90;FILL5;TURNTO335;FILL4;TURNTO157;PEN RED;GO 9;TURNTO90; }DRAW1585 GR:TURNTO180;DRAW6;TURNTO270;DRAW22;TURNTO0;FILL10;TURNTO135;DRAW2;PEN YELLOW;TURNTO90;DRAW3;GO3;DRAW3590 GR:TURN9 }0;DRAW1;TURN90;DRAW3;GO3;DRAW2;TURN-90;DRAW1;TURN-90;DRAW2;GO3;DRAW3;TURNTO145;GO11;TURNTO 0595 GR:DRAW2;TURN 45;DRAW1;TURN }90;4(DRAW2;TURN 90);4(DRAW1;TURN 90)600 GR:TURNTO57;GO7;TURNTO135;DRAW7;TURN180;DRAW7;TURNTO155;DRAW6;TURN180;DRAW6;TURNTO17 }0;DRAW5605 GR:TURNTO270;GO22;TURNTO0;DRAW2;TURN180; 6(DRAW3;TURN200);TURNTO200;DRAW1;TURNTO292;GO4;PENRED610 GR:TURNTO270;D }RAW4615 T: All Aboard! We're going to load $PROGRAMNAME...620 PA:115625 SO:25630 PA:60635 S }O:0640 PA:3645 SO:25650 PA:60655 SO:0660 PA:10665 C:#X=@560670 C:#I=0675 C:#X=#X+4680 C:#J=@#X685 *LOOP690 SO:0,0, }0,0695 C:#J=#J-1700 C:@#X=#J705 C:#I=#I+1710 J(#I=7):*LOOPTWO715 J(#I=14):*LOOPTWO720 PA(#I<14):7725 J(#I<7):*LOOP730 } *LOOPTWO735 GR(#I=7):GOTO 79,-2;TURNTO 0;DRAW5;GOTO 59,-2;FILL5;PEN YELLOW;GOTO 75,-1;TURNTO 180740 GR(#I=7):6(DRAW3;TURN2 }00);DRAW2;TURNTO180;DRAW2;TURN-90;DRAW1745 GR(#I=7):GOTO 62,-1;TURNTO180;6(DRAW3;TURN200);DRAW2;TURNTO180;DRAW2;TURN-90;DRAW }1;PEN RED750 J(#I<14):*LOOP755 GR(#I=14):GOTO 55,-2;TURNTO 0;DRAW7;GOTO 35,-2;FILL7;GOTO52,-2;TURNTO0;DRAW 9;GOTO 45,-1;FIL }L 8760 GR(#I=14):PEN YELLOW;GOTO 50,-1;TURNTO180765 GR(#I=14):6(DRAW3;TURN200);DRAW2;TURNTO180;DRAW2;TURN-90;DRAW1770 GR(# }I=14):GOTO 39,-1;TURNTO180;6(DRAW3;TURN200);DRAW2;TURNTO180;DRAW2;TURN-90;DRAW1775 GR(#I=14):GOTO 38,3;TURNTO90;DRAW2;GO2;DR }AW2;GO 2;DRAW2;GO2;DRAW2;TURNTO0;DRAW 1;TURNTO270;DRAW2;GO2;DRAW2780 GR(#I=14):GO2;DRAW2;GO2;DRAW2;PENRED785 J(#I<30):*LOOP }790 GR:GOTO 0,40;TURNTO110;18(DRAW1;TURN 9);TURNTO270;FILL1;TURNTO50;4(FILL3;TURN-20);FILL1;GOTO20,20793 GR:GOTO10,15;GOTO }-56,47;GOTO-32,32;GOTO-5,26;GOTO40,29;GOTO56,39;GOTO60,41;GOTO-72,40;GOTO-65,20;GOTO59,23794 GR:GOTO-25,10;GOTO-15,35;GOTO25 },43795 C:@B709=128796 T:797 T:798 T:800 T:LOAD D:$PROGRAMNAME805 C:@B842=13810 E:815 *TAG2820 C:@B842=12825 GR:Q }UIT830 GR:CLEAR835 C:@B512=67840 C:@B513=6845 C:#X=@560850 C:#X=#X+84855 C:@B#X=141860 C:@B54286=192865 J:*SETUP870 }R:  ŠŠ 890 *TITLEPAGE891 C:@B16=64892 C:@B53774=64900 GR:QUIT910 C:@B16=64920 C:@B53774=64930 C:@ }B580=1940 C:@1373=32950 C:@1374=2 [LARGE LETTERSS960 WRITE:S,}970 POS:4,1980 WRITE:S, * 990 POS:3,41000 WRITE: }S,I'M DIFFERENT!1010 POS:2,71020 WRITE:S, ě1030 POS:3,81040 WRITE:S, 蠛1050 POS:3,101060 WRITE:S, }Ԡ1070 U:*ALLISONSTHEME1080 SO:01090 C:#X=01100 *SPIN1110 C:#X=#X+11120 POS:10,11130 WRITE:S, x1140 PA:6 }1150 POS:10,11160 WRITE:S, *1170 PA:81180 J(#X<3):*SPIN1190 CLOSE:S1200 GR:PEN ERASE1210 GR:GOTO 0,01220 GR:DRAW 1123 }0 GR:GOTO -60,81240 U:*JOYSTICK1250 GR:GOTO -32,191260 U:*TRIGGER1270 GR:GOTO 20,81280 U:*JOYSTICK1290 GR:GOTO 35,19 }1300 U:*TRIGGER1310 U:*MUSIC1320 *HANDEDNESS1330 C:@B16=641340 C:@B53774=641350 C:@B764=2551360 T:Do you want to play w }ith the fire button for left or right handed players? Press or .1370 *CHECK7641380 J(@B764=40):*RSTICK1390 J(@B764=0):* }LSTICK1400 J:*CHECK7641410 *RSTICK1420 C:#N=11430 C:#A=91440 C:#E=81450 C:#B=101460 C:#S=21470 C:#C=61480 C:#W=4149 }0 C:#D=51500 J:*MENU1510 *LSTICK1520 C:#E=11530 C:#B=91540 C:#S=81550 C:#C=101560 C:#W=21570 C:#D=61580 C:#N=41590 }C:#A=51600 J:*MENU1610 *JOYSTICK1620 GR:PEN BLUE;TURNTO 01630 GR:TURN 90;DRAW 25;TURN 90;DRAW 5;TURN 90;DRAW 25;TURN 901 }640 GR:FILL 51650 GR:TURN45;DRAW20;TURN45;DRAW25;TURN90;DRAW5;TURN45;DRAW20;TURN1351660 GR:FILL 5;TURN 45;FILL 191670 GR: }TURNTO 250; GO 19;TURNTO 01680 GR:DRAW 15;TURN -90;DRAW 1;TURN -90;DRAW 15;TURN -90;DRAW 2;TURN -90;DRAW 151690 E:1700 *TR }IGGER1710 GR:PEN RED1720 GR:TURNTO 45;4(DRAW 2;TURN 90);2(DRAW 1;TURN 90);TURN180;DRAW11730 E:1740 *ALLISONSTHEME1750 C: }@B16=641760 C:@B53774=641770 SO:81780 PA:401790 SO:0,01800 PA:11810 SO:81820 PA:161830 SO:101840 PA:121850 SO:1218 }60 PA:241870 SO:131880 PA:241890 SO:151900 PA:641910 SO:01920 PA:11930 SO:151940 PA:241950 SO:171960 PA:241970 SO: }151980 PA:121990 SO:132000 PA:242010 SO:152020 PA:242030 SO:02040 PA:12050 SO:152060 PA:642070 SO:02080 PA:12090 }SO:152100 PA:242110 SO:172120 PA:242130 SO:152140 PA:122150 SO:132160 PA:242170 SO:152180 PA:242190 SO:132200 PA:2 }42210 SO:122220 PA:162230 SO:102240 PA:482250 E:2270 *MUSIC2280 C:@B16=642290 C:@B53774=642300 SO:102310 PA:322320 } SO:82330 PA:242340 SO:102350 PA:122360 SO:122370 PA:162380 SO:132390 PA:322400 SO:122410 PA:242420 SO:102430 PA:3 }22440 SO:82450 PA:242460 SO:02470 PA:12480 SO:82490 PA:642500 SO:02510 E:4000 R:ĠƠŠĠ͠4010 * }ASKFORANSWER4020 GR:GOTO 0,84030 T: I'm different - draw to me. } returns to Menu.4040 *MOVE4050 C:@B16=644060 C:@B53774=644070 J(@B53279=5):*MENU4080 J(%T8):*ANSWER4090 GR:PEN BLUE41 }00 J(%J0=0):*MOVE4110 GR(%J0=#N):TURNTO 04120 GR(%J0=#A):TURNTO 454130 GR(%J0=#E):TURNTO 904140 GR(%J0=#B):TURNTO 135415 }0 GR(%J0=#S):TURNTO 1804160 GR(%J0=#C):TURNTO 2254170 GR(%J0=#W):TURNTO 2704180 GR(%J0=#D):TURNTO 3154190 GR:DRAW 14200 }SO:0,0,0,04210 R:ŠҠҠś4220 C:#F=04230 C(%Y=47):#F=134240 C(%X=-79):#F=134250 C(%X=79):#F=134260 C }(%Y=-31):#F=134270 J(#F=0):*MOVE4280 SO:134290 PA:14300 GR:DRAW -14310 SO:04320 PA:104330 J:*MOVE4340 *ANSWER4350 C: }#M=04360 J(%X<-8):*LTOPORBTM4370 J(%X>8):*RTOPORBTM4380 J:*MOVE4390 *RTOPORBTM4400 C(%Y>11):#M=24410 C(%Y<3):#M=44420 }J(#M>0):*CHECKANSWER4430 J:*MOVE4440 *LTOPORBTM4450 C(%Y>11):#M=14460 C(%Y<3):#M=3[ͽ؛4470 J(#M>0):*CHECKANSWER4480 J }:*MOVE4490 *CHECKANSWER4500 J(#M=#R):*CORRECT4510 SO:124520 PA:44530 SO:14540 PA:84550 SO:04560 PA:204570 J:*MOVE45 }80 E:4600 *CORRECT4610 C:@B16=644620 C:@B53774=644630 T: [ROLL OLD } OUT4640 T: **** CORRECT ****4650 C:#X=04660 *ANOTHERNOTE4670 C:#J=?\84680 SO(#J=0):134690 C(#J=0):@B709=64700 } SO(#J=1):154710 C(#J=1):@B709=144720 SO(#J=2):174730 C(#J=2):@B709=1964740 SO(#J=3):184750 C(#J=3):@B709=1004760 SO(#J }=4):204770 C(#J=4):@B709=564780 SO(#J=5):224790 C(#J=5):@B709=1484800 SO(#J=6):244810 C(#J=6):@B709=704820 SO(#J=7):25 }4830 C(#J=7):@B709=264840 PA:?\2*44850 C:#X=#X+14860 J(#X<12):*ANOTHERNOTE4870 PA:324880 SO:04890 J:*SETUP4900 E:4910 } *MACHINESUBROUTINE4920 GR:QUIT4930 C:@B752=14940 T:Set the color and hue so that each band on the screen is different. } returns you to the Menu.4950 C:@B710=04960 CALL:15364970 C:@B752=04980 J:*MENU;DRAW -1;GOTO -50,47;PEN BLUE;DRAWTO X10 *DIFFERENT20 C:@B16=6430 C:@B53774=6440 C:@B580=150 C:#A=153660 *READ READ:D:DIFRTN.DAT,#C70 C:@B#A=#C80 C:#A=#A+1}90 J(@B228=1):*READ100 CLOSE:D:DIFRTN.DAT110 C:@B16=64120 C:@B53774=64130 C:@B580=1140 C:@B1630=8 [NUMBER OF COLOR BARS}150 C:@B1631=32 [START AT LINE 32160 C:@B1632=18 [WIDTH OF BARS170 C:@B1633=6 [COLORS180 C:@B1634=14190 C:@B1635=26200 }C:@B1636=56210 C:@B1637=70220 C:@B1638=100230 C:@B1639=148240 C:@B1640=196250 GR:CLEAR260 C:@B712=4270 C:@B710=0280 C}:@B709=28290 C:@B708=54300 C:@B16=64310 C:@B53774=64320 C:@B580=1330 GR:PENERASE;DRAW1;TURN180;DRAW2;GOTO-79,26;PENRED;D}RAWTO0,26;TURNTO180;DRAW4;TURN90;DRAW1;TURN90;DRAW4340 GR:TURN180;DRAW4;TURN90;DRAW2;TURN-90;DRAW55;TURNTO270;DRAW5;TURN903}50 GR:FILL55;TURNTO270;DRAW70;TURNTO0;FILL4;GOTO-71,26;TURNTO180;DRAW65;TURN90;DRAW4;TURN90;FILL65360 GR:GOTO-39,27;PENYELLO}W;TURNTO90;DRAW4;18(TURN-10;DRAW1);TURNTO45;DRAW2;GOTO-39,27;TURNTO270;DRAW7370 GR:18(TURN10;FILL1);TURNTO315;FILL2 [EN}DOF BOWL START OF FISH380 GR:GOTO-35,32;PENRED;TURNTO-90;DRAW4;TURNTO315;DRAW4;TURNTO157;6(DRAW1;TURN9)390 GR:TURNTO45;DRAW}3;TURNTO45;8(DRAW1;TURN10);TURNTO270;PENBLUE;DRAW1;PENRED;DRAW3;TURN180;GO3;TURNTO135400 GR:DRAW2;TURNTO270;DRAW5;TURNTO0;DR}AW2;TURNTO45;DRAW2;TURNTO90;DRAW3;TURNTO180;GO4;TURNTO270;DRAW3 [Ġț410 GR:TURN180;PENYELLOW;GO5;TURNTO0;DRAW3;TURNTO27}0;PENRED;DRAW1;TURNTO225;PENBLUE;DRAW2420 GR:GOTO0,30;PENBLUE;TURNTO90;6(DRAW1;TURN15);TURNTO157;DRAW5;DRAWTO1,22;TURNTO0;FI}LL5;TURN-90;DRAW5430 GR:TURNTO0;6(TURN18;FILL1);TURNTO175;DRAW8;TURNTO90;DRAW5;TURN90;DRAW5;TURNTO292;FILL6;TURNTO0;FILL444}0 GR:TURNTO90;DRAW5;TURNTO0;8(TURN12;DRAW1);TURNTO0;DRAW1;TURNTO315;DRAW5;TURNTO10;DRAW3450 GR:TURNTO90;DRAW4;TURNTO0;DRAW2;}TURN45;DRAW2;TURNTO90;DRAW5;TURNTO15;DRAW5;TURN135;DRAW7460 GR:TURN-20;9(DRAW1;TURN10);TURNTO202;DRAW5;TURNTO145;30(DRAW1;TU}RN2);TURNTO170;17(DRAW1;TURN-5)470 GR:TURNTO225;DRAW2;TURNTO270;19(FILL1;TURN4);TURNTO222;9(DRAW1;TURN-7);TURNTO225;DRAW9;3(}TURN20;DRAW1)[ԛ480 GR:TURNTO315;FILL2;TURNTO45;FILL8;TURNTO310;10(FILL1;TURN8);PENERASE;TURNTO90;DRAW7;TURN180;GO7;PENBLU}E490 GR:DRAW8;TURNTO312;FILL7;DRAW3;TURNTO0;DRAW4;TURNTO45;DRAW1;TURNTO90;DRAW2;TURNTO135;DRAW1;TURNTO180;DRAW2500 GR:TURNT}O135;DRAW6;TURNTO270;DRAW5;TURNTO312;FILL2;TURNTO0;FILL5;TURNTO130;DRAW3;TURNTO130510 GR:GO4;PENBLUE;DRAW1;TURNTO180;DRAW2;T}URN180;FILL2;TURNTO22;9(FILL1;TURN9);TURNTO337;FILL12;TURNTO0;FILL9520 GR:TURNTO90;FILL3;TURNTO22;FILL3;TURNTO315;FILL5;TURN}TO0;FILL1;TURNTO90;DRAW5;TURNTO0;FILL3;TURNTO45530 GR:FILL2;TURNTO90;DRAW6;TURNTO20;FILL3540 GR:TURNTO 235;GO9;TURNTO270;PE}NYELLOW;DRAW1550 GR:TURNTO195;GO7;PENRED;TURNTO105;DRAW12560 T: Hang in there!570 :580 : "I'M DIFFERENT!" is }loading.590 LOAD D:TITLEPG.DIF600 E:J:*DIFFERENT0=150 C:#A=153660 *READ READ:D:DIFRTN.DAT,#C70 C:@B#A=#C80 C:#A=#A+1416901412420814126208173112122059562082401411021217294618596614124208325761362082441690141}24208141102121731521241642402461733120820152082009617496620214210212208250967216901412420 }816910141232081046400000000000000000021217294618596614124208325761362082441690141?890 *SETUP900 C:@B77=0910 R:נĠ920 GR:CLEAR930 C:#X=0940 R:Š͠Ԡ9 }50 C:#R=?\4+1 [DIFFERENT BOX960 C:#Q=?\8 [SAME COLOR970 *CHECK980 C:#P=?\8 [DIFFERENT COLOR990 J(#Q=#P):*CHECK1000 * }COLORQ [SAME COLOR B7081010 C(#Q=0):@B708=@B16351020 C(#Q=1):@B708=@B16371030 C(#Q=2):@B708=@B16391040 C(#Q=3):@B708=@B1 }6361050 C(#Q=4):@B708=@B16381060 C(#Q=5):@B708=@B16401070 C(#Q=6):@B708=@B16331080 C(#Q=7):@B708=@B16341090 *COLORP [DI}FF COLOR B7091100 C(#P=0):@B709=@B16351110 C(#P=1):@B709=@B16371120 C(#P=2):@B709=@B16391130 C(#P=3):@B709=@B16361140 C(}#P=4):@B709=@B16381150 C(#P=5):@B709=@B16401160 C(#P=6):@B709=@B16331170 C(#P=7):@B709=@B16341180 *BOX11190 C:#Z=1 [THIS} IS BOX 11200 GR:PEN ERASE1210 GR:GOTO -39,261220 GR(#Z=#R):PEN YELLOW1230 GR(#Z<>#R):PEN RED1240 GR:TURNTO #X1250 GR:D}RAW 151260 C:#X=#X+101270 J(#X<370):*BOX11280 C:#X=01290 *BOX21300 C:#Z=2 [THIS IS BOX 21310 GR:PEN ERASE1320 GR:GOTO }39,261330 GR(#Z=#R):PEN YELLOW1340 GR(#Z<>#R):PEN RED1350 GR:TURNTO #X1360 GR:DRAW 151370 C:#X=#X+101380 J(#X<370):*BOX}21390 C:#X=01400 *BOX31410 C:#Z=3 [THIS IS BOX 31420 GR:PEN ERASE1430 GR:GOTO -39,-101440 GR(#Z=#R):PEN YELLOW1450 GR(}#Z<>#R):PEN RED1460 GR:TURNTO #X1470 GR:DRAW 151480 C:#X=#X+101490 J(#X<370):*BOX31500 C:#X=01510 *BOX41520 C:#Z=4 [TH}IS IS BOX 41530 GR:PEN ERASE1540 GR:GOTO 39,-101550 GR(#Z=#R):PEN YELLOW1560 GR(#Z<>#R):PEN RED1570 GR:TURNTO #X1580 GR}:DRAW 151590 C:#X=#X+101600 J(#X<370):*BOX41610 J:*ASKFORANSWERT:J:*TAG20940 R:Š͠Ԡ9T890 *SETUP900 C:@B77=0910 R:נĠ920 GR:CLEAR930 R:Š͠Ԡ940 C:#R=?\4}+1 [DIFFERENT BOX950 C:#Q=?\8 [SAME SHAPE960 *CHECK970 C:#P=?\8 [DIFFERENT SHAPE980 J(#Q=#P):*CHECK990 C:@B708=146 } [SAME SHAPE1000 C:@B709=146 [DIFFERENT SHAPE1010 C:$NUMBERQ=#Q1020 C:$NUMBERP=#P1030 C:$SHAPE=SHAPE1040 *BOX11050 C:}#Z=1 [THIS IS BOX 11060 GR:PEN ERASE1070 GR:GOTO -39,261080 GR(#Z=#R):PEN YELLOW1090 GR(#Z<>#R):PEN RED1100 U:*SHAPEFIND}ER1110 *BOX21120 C:#Z=2 [THIS IS BOX 21130 GR:PEN ERASE1140 GR:GOTO 39,261150 GR(#Z=#R):PEN YELLOW1160 GR(#Z<>#R):PEN R}ED1170 U:*SHAPEFINDER1180 *BOX31190 C:#Z=3 [THIS IS BOX 31200 GR:PEN ERASE1210 GR:GOTO -39,-101220 GR(#Z=#R):PEN YELLOW}1230 GR(#Z<>#R):PEN RED1240 U:*SHAPEFINDER1250 *BOX41260 C:#Z=4 [THIS IS BOX 41270 GR:PEN ERASE1280 GR:GOTO 39,-101290} GR(#Z=#R):PEN YELLOW1300 GR(#Z<>#R):PEN RED1310 U:*SHAPEFINDER1320 J:*ASKFORANSWER1330 R:ŠǠӠ}1340 *SHAPEFINDER1350 C(#Z=#R):$MATCH=$SHAPE$NUMBERP [MATCH FOR DIFFERENT SHAPE1360 C(#Z<>#R):$MATCH=$SHAPE$NUMBERQ [MATCH  }FOR SAME SHAPE1370 A:=$MATCH1380 *SHAPE0 [DRAWS A SQUARE1390 M:SHAPE0_1400 JN:*SHAPE11410 GR:TURNTO 0;GO 8;TURNTO 270!};GO 8;TURN 180;3(DRAW 16;TURN 90);FILL 161420 E:1430 *SHAPE11440 M:SHAPE1_1450 JN:*SHAPE2 [CIRCLE1460 GR:TURNTO 0;GO 8;"}TURNTO 90;30(DRAW 1;TURN 6);29(FILL 1;TURN 6)1470 E:1480 *SHAPE2 [TRIANGLE1490 M:SHAPE2_1500 JN:*SHAPE31510 GR:TURNT#}O 0;GO 8;TURNTO 157;DRAW 20;TURNTO 270;DRAW 16;TURNTO 22;FILL 191520 E:1530 *SHAPE3 [HEXAGON1540 M:SHAPE3_1550 JN:*$}SHAPE41560 GR:TURNTO 0;GO 8;TURNTO 90;3(DRAW 9;TURN 60);3(FILL 9;TURN 60)1570 E:1580 *SHAPE4 [INVERTER TRIANGLE1590%} M:SHAPE4_1600 JN:*SHAPE51610 GR:TURNTO 0;GO 8;TURNTO 90;DRAW 8;TURNTO 202;DRAW 20;TURNTO 335;FILL19;DRAW 1;TURNTO 90;DRAW &}81620 E:1630 *SHAPE5 [DIAMOND1640 M:SHAPE5_1650 JN:*SHAPE61660 GR:TURNTO 0;GO 8;TURNTO 135;DRAW 13;TURN 90;DRAW 13'};TURN 90;FILL 13;TURN 90;FILL 121670 E:1680 *SHAPE6 [OVAL1690 M:SHAPE6_1700 JN:*SHAPE71710 GR:TURNTO 0;GO 7;TURNTO(} 90;DRAW 6;20(DRAW 1;TURN 9);DRAW 6;19(FILL1;TURN 9)1720 E:1730 *SHAPE7 [RECTANGLE1740 M:SHAPE7_1750 JN:*SHAPE0176)}0 GR:TURNTO 0;GO 8;TURNTO 90;DRAW 12;TURN 90;DRAW 14;TURN 90;DRAW 24;TURN 90;FILL 141770 E:T:J:*TAG2940 C:#R=?\4n890 *SETUP900 C:@B77=0910 R:נĠ920 GR:CLEAR930 R:Š͠Ԡ940 C:#R=?\4!+}+1 [DIFFERENT BOX950 C:#Q=?\26 [SAME LETTER960 *CHECK970 C:#P=?\26 [DIFFERENT LETTER980 J(#Q=#P):*CHECK990 C:@B708=15 !,} [SAME LETTER1000 C:@B709=15 [DIFFERENT LETTER1010 C:$NUMBERQ=#Q1020 C:$NUMBERP=#P1030 C:$LETTER=LETTER1040 *BOX11!-}050 C:#Z=1 [THIS IS BOX 11060 GR:PEN ERASE1070 GR:GOTO -39,261080 GR(#Z=#R):PEN YELLOW1090 GR(#Z<>#R):PEN RED1100 U:*SHA!.}PEFINDER1110 *BOX21120 C:#Z=2 [THIS IS BOX 21130 GR:PEN ERASE1140 GR:GOTO 39,261150 GR(#Z=#R):PEN YELLOW1160 GR(#Z<>#R)!/}:PEN RED1170 U:*SHAPEFINDER1180 *BOX31190 C:#Z=3 [THIS IS BOX 31200 GR:PEN ERASE1210 GR:GOTO -39,-101220 GR(#Z=#R):PEN !0}YELLOW1230 GR(#Z<>#R):PEN RED1240 U:*SHAPEFINDER1250 *BOX41260 C:#Z=4 [THIS IS BOX 41270 GR:PEN ERASE1280 GR:GOTO 39,-1!1}01290 GR(#Z=#R):PEN YELLOW1300 GR(#Z<>#R):PEN RED1310 U:*SHAPEFINDER1320 R:ĠƠŠŠ1330 J:*ASKFORANSWER!2}1340 R:ŠǠӠ1350 *SHAPEFINDER1360 C(#Z=#R):$MATCH=$LETTER$NUMBERP [MATCH FOR DIFFERENT SHAPE1370 !3}C(#Z<>#R):$MATCH=$LETTER$NUMBERQ [MATCH FOR SAME LETTER1380 A:=$MATCH1390 *LETTER0 [1400 M:LETTER0_1410!4} JN:*LETTER11420 GR:TURNTO 225;GO 9;TURNTO 22;DRAW 17;TURNTO 157;DRAW 17;TURN 180;DRAW 7;TURNTO 270;DRAW 71430 E:1440 *LET!5}TER1 [ 1450 M:LETTER1_1460 JN:*LETTER21470 GR:TURNTO 225;GO 9;TURNTO 0;DRAW 14;TURN 90;DRAW6;3(TURN45;DRAW!6}3);TURN 45;DRAW 6;TURN180;DRAW 61480 GR:2(TURN45;DRAW4);TURN45;DRAW 2;TURN45;DRAW7;TURN90;DRAW 11490 E:1500 *LETTER2 [!7}à1510 M:LETTER2_1520 JN:*LETTER31530 GR:TURNTO225;PEN ERASE;DRAW1;TURN180;DRAW 4;TURNTO -301540 GR(#Z=#R):PEN!8} YELLOW1550 GR(#Z<>#R):PEN RED1560 GR:TURN 180;DRAW 1;TURN180;DRAW2;TURN-30;4(DRAW 2;TURN-30);DRAW8;6(DRAW 2;TURN-30)1570 !9}E:1580 *LETTER3 [Ġ1590 M:LETTER3_1600 JN:*LETTER41610 GR:TURNTO45;PEN ERASE;DRAW 1;TURN180;DRAW 101620 G!:}R(#Z=#R):PEN YELLOW1630 GR(#Z<>#R):PEN RED1640 GR:TURNTO0;DRAW 14;TURN90;3(DRAW3;TURN30);DRAW 5;3(TURN30;DRAW3)1650 E:166!;}0 *LETTER4 [Ƞ1670 M:LETTER4_1680 JN:*LETTER51690 GR:TURNTO270;DRAW 5;TURNTO0;DRAW 7;TURN180;DRAW 14;TU!<}RN180;DRAW 7;TURN90;DRAW10;TURN-90;DRAW7;TURN180;DRAW141700 E:1710 *LETTER5 [ɠ1720 M:LETTER5_1730 JN:*!=}LETTER61740 GR:TURNTO 0;DRAW7;TURN90;DRAW2;TURN180;DRAW4;TURN180;DRAW2;TURN90;DRAW14;TURN90;DRAW2;TURN180;DRAW41750 E:1760!>} *LETTER6 [Š1770 M:LETTER6_1780 JN:*LETTER71790 GR:TURNTO90;DRAW3;TURN180;DRAW8;TURN90;DRAW7;TURN90;DRA!?}W 10;TURN180;DRAW10;TURN-90;DRAW14;TURN-90;DRAW101800 E:1810 *LETTER7 [Ơ1820 M:LETTER7_1830 JN:*LETTER!@}81840 GR:TURNTO90;DRAW3;TURN180;DRAW8;TURN90;DRAW7;TURN90;DRAW 10;TURN180;DRAW10;TURN-90;DRAW141850 E:1860 *LETTER8 [!A}Ԡ1870 M:LETTER8_1880 JN:*LETTER91890 GR:TURNTO 0;DRAW7;TURN 90;DRAW5;TURN180;DRAW10;TURN180;DRAW 5;TURN90;DR!B}AW141900 E:1910 *LETTER9 [٠1920 M:LETTER9_1930 JN:*LETTER101940 GR:TURNTO45;DRAW9;TURN180;DRAW9;TURNT!C}O315;DRAW9;TURN180;DRAW 9;TURNTO180;DRAW71950 E:1960 *LETTER10 [Л1970 M:LETTER10_1980 JN:*LETTER111990 GR:TURNTO 220;GO!D}10;TURNTO 0;DRAW 15;TURN 90;DRAW6;3(TURN45;DRAW3);TURN 45;DRAW 62000 E:2010 *LETTER11 [ϛ2020 M:LETTER11_2030 JN:*LETTER1!E}22040 GR:TURNTO255;PEN ERASE;DRAW1;TURN180;DRAW 62050 GR(#Z=#R):PEN YELLOW2060 GR(#Z<>#R):PEN RED2070 GR:TURNTO 0;DRAW 2;!F}TURN 5;5(TURN-30;DRAW2);DRAW1;TURNTO180;DRAW7;3(DRAW2;TURN-30);DRAW1;3(DRAW2;TURN-30)2080 GR:DRAW72090 E:2100 *LETTER12 [!G}ћ2110 M:LETTER12_2120 JN:*LETTER132130 GR:TURNTO255;PEN ERASE;DRAW1;TURN180;DRAW 62140 GR(#Z=#R):PEN YELLOW2150 GR(#Z<>#!H}R):PEN RED2160 GR:TURNTO 0;DRAW 2;TURN 5;5(TURN-30;DRAW2);DRAW1;TURNTO180;DRAW7;3(DRAW2;TURN-30);DRAW1;3(DRAW2;TURN-30)2170!I} GR:DRAW7;TURNTO202;GO8;TURNTO150;DRAW62180 E:2190 *LETTER13 [қ2200 M:LETTER13_2210 JN:*LETTER142220 GR:TURNTO 220;GO1!J}0;TURNTO 0;DRAW 15;TURN 90;DRAW6;3(TURN45;DRAW3);TURN45;DRAW6;TURN180;DRAW4;TURNTO1482230 GR:DRAW92240 E:2250 *LETTER14 !K} [ʠ2260 M:LETTER14_2270 JN:*LETTER152280 GR:TURNTO 0;DRAW7;TURN90;DRAW2;TURN180;DRAW4;TURN180;DRAW2;TURN90;DRAW10;6(DRA!L}W2;TURN30)2290 E:2300 *LETTER15 [̠2310 M:LETTER15_2320 JN:*LETTER162330 GR:TURNTO45;PEN ERASE;DRAW 1;TURN180;DRAW 22!M}340 GR(#Z=#R):PEN YELLOW2350 GR(#Z<>#R):PEN RED2360 GR:TURNTO 225;GO 9;TURNTO 0;DRAW 14;TURN180;DRAW14;TURN-90;DRAW82370 E!N}:2380 *LETTER16 [ؠ2390 M:LETTER16_2400 JN:*LETTER172410 GR:TURNTO-35;DRAW9;TURN180;DRAW18;TURN180;DRAW9;TURNTO35;DR!O}AW 9;TURN180;DRAW182420 E:2430 *LETTER17 [Ǜ2440 M:LETTER17_2450 JN:*LETTER182460 GR:TURNTO225;PEN ERASE;DRAW1;TURN180;!P}DRAW 8;TURNTO -302470 GR(#Z=#R):PEN YELLOW2480 GR(#Z<>#R):PEN RED2490 GR:TURN 180;DRAW 1;TURN180;DRAW2;TURN-30;4(DRAW 2;TU!Q}RN-30);DRAW8;6(DRAW 2;TURN-30);TURNTO0;DRAW42500 GR:TURNTO90;DRAW1;TURN180;DRAW32510 E:2520 *LETTER18 [˛2530 M:LETTER18!R}_2540 JN:*LETTER192550 GR:TURNTO45;PEN ERASE;DRAW 1;TURN180;DRAW 22560 GR(#Z=#R):PEN YELLOW2570 GR(#Z<>#R):PEN RED2580 G!S}R:TURNTO 225;GO 9;TURNTO 0;DRAW 14;TURN180;DRAW9;TURNTO40;DRAW12;TURN180;DRAW 8;TURNTO145;DRAW102590 E:2600 *LETTER19 [͠!T}2610 M:LETTER19_2620 JN:*LETTER202630 GR:TURNTO-30;DRAW9;TURNTO270;DRAW1;TURNTO180;DRAW14;TURNTO90;GO10;TURNTO0;DRAW14;TUR!U}NTO210;DRAW92640 E:2650 *LETTER20 [N2660 M:LETTER20_2670 JN:*LETTER212680 GR:TURNTO 225;GO 9;TURNTO 0;DRAW 14;TURNTO1!V}40;DRAW18;TURNTO0;DRAW142690 E:2700 *LETTER21 [Z2710 M:LETTER21_2720 JN:*LETTER222730 GR:TURNTO 315;GO 9;TURNTO90;DRA!W}W 10;TURNTO 212;DRAW18;TURNTO90;DRAW102740 E:2750 *LETTER22 [נ2760 M:LETTER22_2770 JN:*LETTER232780 GR:TURNTO210;DRAW!X}9;TURNTO-7;DRAW15;TURNTO90;GO13;TURNTO187;DRAW15;TURNTO-30;DRAW92790 E:2800 *LETTER23 [V2810 M:LETTER23_2820 JN:*LETTE!Y}R242830 GR:TURNTO90;PEN ERASE;DRAW 1;TURN180;DRAW 22840 GR(#Z=#R):PEN YELLOW2850 GR(#Z<>#R):PEN RED2860 GR:TURNTO 315;GO !Z}9;TURNTO157;DRAW 18;TURNTO 25;DRAW182870 E:2880 *LETTER24 [U2890 M:LETTER24_2900 JN:*LETTER252910 GR:TURNTO-90;PEN ER![}ASE;DRAW 1;TURN180;DRAW 22920 GR(#Z=#R):PEN YELLOW2930 GR(#Z<>#R):PEN RED2940 GR:TURNTO 315;GO 9;TURNTO180;DRAW 11;6(TURN-!\}20;DRAW2);TURNTO45;DRAW1;TURNTO0;DRAW132950 E:2960 *LETTER25 [S2970 M:LETTER25_2980 JN:*LETTER262990 GR:TURNTO-90;!]}16(DRAW1;TURN15);TURN180;15(TURN-15;DRAW1);TURNTO90;16(DRAW1;TURN 15)3000 E:T:J:*TAG2͠Ԡ940 C:#R=?\4 _890 *SETUP900 C:@B77=0910 C:@B708=70920 C:@B709=26930 C:@B710=148940 GR:CLEAR950 C:#R=?\4+1960 C:#Q=?\15970 *CHECK98%_}0 C:#P=?\15990 J(#Q=#P):*CHECK1000 C:$NUMBERQ=#Q1010 C:$NUMBERP=#P1020 C:$OBJECT=OBJECT1030 *BOX11040 C:#Z=11050 C:@B2%`}38=01060 C:@B241=01070 GR:PEN ERASE1080 GR:GOTO -39,261090 U:*SHAPEFINDER1100 *BOX21110 C:#Z=21120 C:@B238=01130 C:@B%a}241=01140 GR:PEN ERASE1150 GR:GOTO 39,261160 U:*SHAPEFINDER1170 *BOX31180 C:#Z=31190 C:@B238=01200 C:@B241=01210 GR:P%b}EN ERASE1220 GR:GOTO -39,-101230 U:*SHAPEFINDER1240 *BOX41250 C:@B238=01260 C:@B241=01270 C:#Z=41280 GR:PEN ERASE1290%c} GR:GOTO 39,-101300 U:*SHAPEFINDER1310 J:*ASKFORANSWER1320 *SHAPEFINDER1330 C(#Z=#R):$MATCH=$OBJECT$NUMBERP1340 C(#Z<>#R%d}):$MATCH=$OBJECT$NUMBERQ1350 A:=$MATCH1360 *OBJECT0 [қ1370 M:OBJECT0_1380 JN:*OBJECT11390 GR:TURNTO90;PEN RED;DRAW12%e};PEN BLUE;DRAW1;PEN RED;TURN180;DRAW24;PEN BLUE;DRAW1;PEN RED;TURNTO45;DRAW11400 GR:TURNTO90;DRAW22;TURNTO315;DRAW2;TURNTO27%f}0;DRAW20;TURN90;DRAW1;TURN90;DRAW20;TURNTO300;DRAW1;TURNTO2701410 GR:DRAW 2;PEN BLUE;DRAW4;PEN RED;DRAW2;PEN BLUE;DRAW4;PEN %g}RED;DRAW1;TURN90;DRAW1;TURN90;PEN BLUE1420 GR:DRAW4;PEN RED;DRAW2;PEN BLUE;DRAW4;PEN RED;DRAW3;TURN-90;DRAW1;TURN-90;DRAW13;%q}B'DOS SYSB*+DUP SYSBCUAUTORUN SYSBXTITLEPG DIFBDIFFERENT BDIFRTN DATB COLORS BSHAPES B4*LETTERS B4^OBJECTS BECLASSES BDISKNAMEDATTURN-90;DRAW6;PEN BLUE1430 GR:DRAW 1;TURNTO270;DRAW2;TURN180;GO13;DRAW21440 E:1450 *OBJECT1 [қ1460 M:OBJECT1_1470 J%r}N:*OBJECT21480 GR:PEN YELLOW;TURNTO270;GO12;TURN180;5(DRAW24;TURN144)1490 E:1500 *OBJECT2 [ś1510 M:OBJECT2_1520 JN:%s}*OBJECT31530 GR:TURNTO90;PEN BLUE;DRAW10;TURN180;DRAW 10;TURNTO22;GO10;TURNTO90;DRAW31540 GR:TURNTO-110;8(DRAW1;TURN-18);TU%t}RNTO108;28(DRAW1;TURN6);TURNTO270;DRAW4;27(FILL1;TURN6);TURNTO901550 GR:9(FILL1;TURN-18);TURNTO-90;DRAW21560 E:1570 *OBJEC%u}T3 [Λ1580 M:OBJECT3_1590 JN:*OBJECT41600 GR:PEN ERASE;DRAW 1;TURN180;DRAW2;TURNTO335;GO131610 GR:TURNTO 70;PEN YELLO%v}W;38(DRAW1;TURN5);TURNTO50;5(TURN-20;FILL5);TURNTO270;PENERASE;DRAW31620 GR:TURN180;DRAW3;PENYELLOW;TURNTO150;GO11;TURNTO270%w};DRAW3;TURNTO45;FILL3;TURNTO180;PENERASE1630 GR:GO6;TURNTO60;DRAW6;TURNTO340;GO6;TURNTO270;DRAW11640 E:1650 *OBJECT4 [%x}ԛ1660 M:OBJECT4_1670 JN:*OBJECT51680 GR:PEN ERASE;TURNTO0;DRAW1;TURN180;DRAW2;TURN180;GO12;TURNTO 90;PEN RED;36(DRAW1;TUR%y}N5);36(FILL1;TURN5)1690 GR:PEN YELLOW;TURNTO118;GO14;DRAW3;TURNTO230;32(DRAW1;TURN2);TURNTO80;DRAW3;TURNTO 0;GO11700 GR:TUR%z}NTO260;DRAW4;TURN-20;DRAW4;TURNTO125;44(DRAW1;TURN-2);TURNTO0;DRAW1;TURNTO292;DRAW3;TURNTO270;DRAW51710 E:1720 *OBJECT5 [%{}˛1730 M:OBJECT5_1740 JN:*OBJECT61750 GR:TURNTO90;PEN RED;DRAW14;TURN180;DRAW28;PEN BLUE;DRAW1;PEN RED;TURNTO45;DRAW1;TUR%|}NTO90;DRAW281760 GR:TURN-90;DRAW1;TURN-90;PENYELLOW;DRAW22;PENRED;DRAW6;TURN90;DRAW1;TURN90;DRAW5;PENYELLOW;DRAW23;TURN-901%}}770 GR:DRAW1;TURN-90;DRAW22;PEN RED;DRAW6;TURN90;DRAW1;TURN90;DRAW5;PENYELLOW;DRAW231780 GR:TURN-90;DRAW1;TURN-90;DRAW22;TUR%~}N-90;PENBLUE;GO7;TURN90;DRAW1;GO4;DRAW1;TURN180;GO8;DRAW1;GO 14;DRAW11790 GR:GO2;DRAW11800 E:1810 *OBJECT6[ś1820 M:OB%}JECT6_1830 JN:*OBJECT71840 GR:PENYELLOW;TURNTO90;DRAW8;2(TURN90;DRAW8);DRAW8;TURN90;FILL81850 GR:PENRED;TURNTO47;GO12;TURN%}TO135;DRAW12;TURNTO270;DRAW18;TURNTO45;FILL12;TURN180;GO8;TURNTO01860 GR:PENBLUE;DRAW4;TURN90;DRAW1;TURN90;DRAW3;TURNTO157;G%}O13;TURNTO0;DRAW4;TURN90;DRAW1;TURN90;DRAW41870 E:1880 *OBJECT7 [қ1890 M:OBJECT7_1900 JN:*OBJECT81910 GR:PENYELLOW;%}TURNTO180;DRAW16;TURN180;DRAW1;TURNTO270;10(DRAW1;TURN9);TURN90;10(DRAW1;TURN9);TURNTO01920 GR:DRAW18;PENRED;6(DRAW5;TURN60)%};TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60)1930 GR:TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60);T%}URN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60)1940 E:1950 *OBJECT8 [ԛ1960 M:OBJECT8_1970 JN:*OBJECT91980 GR:TURNTO180;D%}RAW2;TURNTO90;PENBLUE;DRAW10;TURNTO225;DRAW1;TURNTO270;DRAW18;TURNTO130;DRAW2;TURNTO90;DRAW151990 GR:TURN-90;DRAW2;TURN-90;D%}RAW18;PENERASE;TURNTO30;GO20;PENYELLOW;TURNTO150;DRAW18;TURNTO270;DRAW182000 GR:TURNTO30;FILL17;GO1;TURNTO180;PENRED;DRAW15%}2010 E:2020 *OBJECT9 [Л2030 M:OBJECT9_2040 JN:*OBJECT102050 GR:PENRED;TURNTO180;DRAW9;TURN90;PENYELLOW;DRAW1;TURN90;D%}RAW92060 GR:TURNTO90;PENRED;DRAW1;14(TURN-7;DRAW1);TURNTO-45;DRAW4;TURN-90;DRAW4;TURN180;FILL3;TURN180;GO3;TURN902070 GR:DR%}AW4;TURN-90;DRAW4;TURN180;FILL3;TURN180;DRAW3;TURN90;DRAW4;TURNTO210;DRAW4;TURN180;FILL32080 GR:TURN180;DRAW4;TURNTO180;14(D%}RAW1;TURN-7);TURN-90;DRAW1;TURN-90;13(TURN7;FILL1);TURNTO45;FILL22090 GR:TURNTO90;DRAW16;TURNTO180;DRAW1;13(TURN7;DRAW1);TUR%}NTO180;GO12;TURNTO275;PENYELLOW;10(DRAW1;TURN9);TURN902100 GR:10(DRAW 1;TURN9);TURNTO90;10(DRAW1;TURN-9);TURNTO270;10(DRAW1;%}TURN-9)2110 E:2120 *OBJECT10 [͛2130 M:OBJECT10_2140 JN:*OBJECT112150 GR:TURNTO0;PENERASE;DRAW1;TURN180;DRAW2;PENR%}ED;TURNTO0;GO9;TURNTO902160 GR:9(DRAW1;TURN 6);TURN-15;DRAW6;TURNTO225;PENYELLOW;12(DRAW2;TURN5)2170 GR:TURNTO 45;8(TURN 3;%}DRAW2);DRAW1;3(TURN15;DRAW2);TURNTO235;DRAW8;TURNTO180;DRAW7;TURN 90;DRAW1;TURN902180 GR:DRAW10;TURN180;DRAW4;TURNTO270;DRAW%}1;TURN-90;DRAW6;TURN180;DRAW6;TURNTO-45;DRAW5;TURN180;DRAW42190 GR:TURNTO250;DRAW8;PENRED;TURNTO-45;GO2;TURNTO0;FILL2;TURNTO%}20;FILL6;7(TURN 6;FILL1)2200 E:2210 *OBJECT11 [ś2220 M:OBJECT11_2230 JN:*OBJECT122240 GR:PENERASE;DRAW1;TURN180;DRAW%}22250 GR:TURNTO0;GO7;PENYELLOW;TURNTO22;DRAW5;TURN180;DRAW4;TURN140;8(DRAW1;TURN-10);TURN-902260 GR:8(DRAW1;TURN-10);PENRED%};TURNTO90;20(DRAW1;TURN9);DRAW3;20(FILL1;TURN9);TURNTO202;GO32270 GR:PENYELLOW;TURNTO235;8(DRAW1;TURN-15)2280 E:2290 *OBJE%}CT12[қ2300 M:OBJECT12_2310 JN:*OBJECT132320 GR:PENERASE;DRAW1;TURN180;DRAW22330 GR:TURNTO0;GO7;PENYELLOW;TURNTO-22;DRA%}W5;TURN180;DRAW4;TURN-140;8(DRAW1;TURN10);TURN902340 GR:8(DRAW1;TURN10);TURNTO90;9(DRAW1;TURN12);TURNTO112;17(DRAW1;TURN9)2%}350 GR:DRAW1;TURNTO270;DRAW4;17(FILL1;TURN 9);TURNTO0;7(FILL1;TURN9)2360 E:2370 *OBJECT13 [ś2380 M:OBJECT13_2390%} JN:*OBJECT142400 GR:PENERASE;DRAW1;TURN180;DRAW22410 GR:TURNTO0;GO7;PENYELLOW;TURNTO-22;DRAW2;TURN180;DRAW22420 GR:TURNTO%}90;20(DRAW1;TURN9);DRAW2;20(FILL1;TURN9);TURNTO202;GO32430 GR:PENRED;TURNTO225;9(DRAW1;TURN-11)2440 E:2450 *OBJECT14 [%}2460 M:OBJECT14_2470 JN:*OBJECT152480 GR:PEN ERASE;DRAW 1;TURN180;DRAW2;TURNTO 22;GO132490 GR:TURNTO109;PEN YELLOW;38%}(DRAW1;TURN5);TURNTO90;FILL3;2(TURN-20;FILL5);TURN-10;2(TURN-20;FILL5);TURN-252500 GR:FILL4;PENRED;DRAW3;PENYELLOW;TURNTO180%};GO2;DRAW5;TURNTO177;15(DRAW1;TURN5);TURNTO235;DRAW42510 E:T:J:*TAG2LEAR950 C:#R=?\4+1960 C:#Q=?\15970 *CHECK98$N890 *SETUP900 C:@B77=0910 C:@B708=70920 C:@B709=26930 C:@B710=148940 GR:CLEAR950 C:#R=?\4+1 [DIFFERENT BOX960 C:#Q=?)}\6 [SAME970 *CHECK980 C:#P=?\6 [DIFFERENT990 J(#Q=#P):*CHECK1000 C:$NUMBERQ=#Q1010 C:$NUMBERP=#P1020 C:$OBJECT=OBJECT)}1030 C:$CLASSIFY=CLASSIFY1040 *BOX11050 C:#Z=1 [ڽؠ1060 C:@B238=01070 C:@B241=01080 GR:PEN ERASE1090 GR:GOTO -39,2)}61100 U:*SHAPEFINDER1110 *BOX21120 C:@B238=01130 C:@B241=01140 C:#Z=21150 GR:PEN ERASE1160 GR:GOTO 39,261170 U:*SHAPE)}FINDER1180 *BOX31190 C:@B238=01200 C:@B241=01210 C:#Z=31220 GR:PEN ERASE1230 GR:GOTO -39,-101240 U:*SHAPEFINDER1250 *)}BOX41260 C:#Z=41270 C:@B238=01280 C:@B241=01290 GR:PEN ERASE1300 GR:GOTO 39,-101310 U:*SHAPEFINDER1320 J:*ASKFORANSWER)}1330 *SHAPEFINDER1340 C(#Z=#R):$MATCH=$CLASSIFY$NUMBERP1350 C(#Z<>#R):$MATCH=$CLASSIFY$NUMBERQ1360 A:=$MATCH1370 *CLASSI)}FY0 [٠Ӡ1380 M:CLASSIFY0_1390 JN:*CLASSIFY11400 C:#I=?\31410 C:$NUMBERI=#I1420 C:$MATCH2=$OBJECT$NUMBERI1)}430 A:=$MATCH21440 *OBJECT0 [қ1450 M:OBJECT0_1460 JN:*OBJECT11470 GR:PEN YELLOW;TURNTO270;GO12;TURN180;5(DRAW24;TURN)}144)1480 E:1490 *OBJECT1 [Λ1500 M:OBJECT1_1510 JN:*OBJECT21520 GR:PEN ERASE;DRAW 1;TURN180;DRAW2;TURNTO335;GO13153)}0 GR:TURNTO 70;PEN YELLOW;38(DRAW1;TURN5);TURNTO50;5(TURN-20;FILL5);TURNTO270;PENERASE;DRAW31540 GR:TURN180;DRAW3;PENYELLOW;)}TURNTO150;GO11;TURNTO270;DRAW3;TURNTO45;FILL3;TURNTO180;PENERASE1550 GR:GO6;TURNTO60;DRAW6;TURNTO340;GO6;TURNTO270;DRAW1156)}0 E:1570 *OBJECT2 [ԛ1580 M:OBJECT2_1590 JN:*OBJECT01600 GR:PEN ERASE;TURNTO0;DRAW1;TURN180;DRAW2;TURN180;GO12;T)}URNTO 90;PEN RED;36(DRAW1;TURN5);36(FILL1;TURN5)1610 GR:PEN YELLOW;TURNTO118;GO14;DRAW3;TURNTO230;32(DRAW1;TURN2);TURNTO80;D)}RAW3;TURNTO 0;GO11620 GR:TURNTO260;DRAW4;TURN-20;DRAW4;TURNTO125;44(DRAW1;TURN-2);TURNTO0;DRAW1;TURNTO292;DRAW3;TURNTO270;DR)}AW51630 E:1640 *CLASSIFY1 [ӛ1650 M:CLASSIFY1_1660 JN:*CLASSIFY21670 C:#J=?\3+201680 C:$NUMBERJ=#J1690 C:$MAT)}CH3=$OBJECT$NUMBERJ1700 A:=$MATCH31710 *OBJECT20 [˛1720 M:OBJECT20_1730 JN:*OBJECT211740 GR:TURNTO90;PEN RED;DRA)}W14;TURN180;DRAW28;PEN BLUE;DRAW1;PEN RED;TURNTO45;DRAW1;TURNTO90;DRAW281750 GR:TURN-90;DRAW1;TURN-90;PENYELLOW;DRAW22;PENRE)}D;DRAW6;TURN90;DRAW1;TURN90;DRAW5;PENYELLOW;DRAW23;TURN-901760 GR:DRAW1;TURN-90;DRAW22;PEN RED;DRAW6;TURN90;DRAW1;TURN90;DRA)}W5;PENYELLOW;DRAW231770 GR:TURN-90;DRAW1;TURN-90;DRAW22;TURN-90;PENBLUE;GO7;TURN90;DRAW1;GO4;DRAW1;TURN180;GO8;DRAW1;GO 14;D)}RAW11780 GR:GO2;DRAW11790 E:1800 *OBJECT21 [ԛ1810 M:OBJECT21_1820 JN:*OBJECT221830 GR:TURNTO180;DRAW2;TURNTO90;P)}ENBLUE;DRAW10;TURNTO225;DRAW1;TURNTO270;DRAW18;TURNTO130;DRAW2;TURNTO90;DRAW151840 GR:TURN-90;DRAW2;TURN-90;DRAW18;PENERASE;)}TURNTO30;GO20;PENYELLOW;TURNTO150;DRAW18;TURNTO270;DRAW181850 GR:TURNTO30;FILL17;GO1;TURNTO180;PENRED;DRAW151860 E:1870 *O)}BJECT22 [қ1880 M:OBJECT22_1890 JN:*OBJECT201900 GR:TURNTO90;PEN RED;DRAW12;PEN BLUE;DRAW1;PEN RED;TURN180;DRAW24;PEN BL)}UE;DRAW1;PEN RED;TURNTO45;DRAW11910 GR:TURNTO90;DRAW22;TURNTO315;DRAW2;TURNTO270;DRAW20;TURN90;DRAW1;TURN90;DRAW20;TURNTO300)};DRAW1;TURNTO2701920 GR:DRAW 2;PEN BLUE;DRAW4;PEN RED;DRAW2;PEN BLUE;DRAW4;PEN RED;DRAW1;TURN90;DRAW1;TURN90;PEN BLUE1930 G)}R:DRAW4;PEN RED;DRAW2;PEN BLUE;DRAW4;PEN RED;DRAW3;TURN-90;DRAW1;TURN-90;DRAW13;TURN-90;DRAW6;PEN BLUE1940 GR:DRAW 1;TURNTO2)}70;DRAW2;TURN180;GO13;DRAW21950 E:1960 *CLASSIFY2 [ӛ1970 M:CLASSIFY2_1980 JN:*CLASSIFY31990 C:#K=?\6+302000 C:$NU)}MBERK=#K2010 C:$MATCH3=$OBJECT$NUMBERK2020 GR:PEN YELLOW2030 A:=$MATCH32040 *OBJECT30 [ț2050 M:OBJECT30_2060 JN:*OBJEC)}T312070 GR:TURNTO270;DRAW 5;TURNTO0;DRAW 7;TURN180;DRAW 14;TURN180;DRAW 7;TURN90;DRAW10;TURN-90;DRAW7;TURN180;DRAW142080 E:)}2090 *OBJECT31 [ɛ2100 M:OBJECT31_2110 JN:*OBJECT322120 GR:TURNTO 0;DRAW7;TURN90;DRAW2;TURN180;DRAW4;TURN180;DRAW2;TURN90)};DRAW14;TURN90;DRAW2;TURN180;DRAW42130 E:2140 *OBJECT32 [ś2150 M:OBJECT32_2160 JN:*OBJECT332170 GR:TURNTO90;DRAW3;TURN1)}80;DRAW8;TURN90;DRAW7;TURN90;DRAW 10;TURN180;DRAW10;TURN-90;DRAW14;TURN-90;DRAW102180 E:2190 *OBJECT33 [ƛ2200 M:OBJECT33_)}2210 JN:*OBJECT342220 GR:TURNTO90;DRAW3;TURN180;DRAW8;TURN90;DRAW7;TURN90;DRAW 10;TURN180;DRAW10;TURN-90;DRAW142230 E:224)}0 *OBJECT34 [ԛ2250 M:OBJECT34_2260 JN:*OBJECT352270 GR:TURNTO 0;DRAW7;TURN 90;DRAW5;TURN180;DRAW10;TURN180;DRAW 5;TURN90;)}DRAW142280 E:2290 *OBJECT35 [ٛ2300 M:OBJECT35_2310 JN:*OBJECT362320 GR:TURNTO45;DRAW9;TURN180;DRAW9;TURNTO315;DRAW9;TUR)}N180;DRAW 9;TURNTO180;DRAW72330 E:2340 *CLASSIFY3 [ӛ2350 M:CLASSIFY3_2360 JN:*CLASSIFY42370 C:#O=?\3+402380 C:$NUM)}BERO=#O2390 C:$MATCH4=$OBJECT$NUMBERO2400 A:=$MATCH42410 *OBJECT40 [қ2420 M:OBJECT40_2430 JN:*OBJECT412440 GR:PEN)}YELLOW;TURNTO180;DRAW16;TURN180;DRAW1;TURNTO270;10(DRAW1;TURN9);TURN90;10(DRAW1;TURN9);TURNTO02450 GR:DRAW18;PENRED;6(DRAW5;)}TURN60);TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60)2460 GR:TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TU)}RN60);TURN45;6(DRAW5;TURN60);TURN45;6(DRAW5;TURN60)2470 E:2480 *OBJECT41 [Л2490 M:OBJECT41_2500 JN:*OBJECT422510 GR:)}PENRED;TURNTO180;DRAW9;TURN90;PENYELLOW;DRAW1;TURN90;DRAW92520 GR:TURNTO90;PENRED;DRAW1;14(TURN-7;DRAW1);TURNTO-45;DRAW4;TUR)}N-90;DRAW4;TURN180;FILL3;TURN180;GO3;TURN902530 GR:DRAW4;TURN-90;DRAW4;TURN180;FILL3;TURN180;DRAW3;TURN90;DRAW4;TURNTO210;DR)}AW4;TURN180;FILL32540 GR:TURN180;DRAW4;TURNTO180;14(DRAW1;TURN-7);TURN-90;DRAW1;TURN-90;13(TURN7;FILL1);TURNTO45;FILL22550 )}GR:TURNTO90;DRAW16;TURNTO180;DRAW1;13(TURN7;DRAW1);TURNTO180;GO12;TURNTO275;PENYELLOW;10(DRAW1;TURN9);TURN902560 GR:10(DRAW )}1;TURN9);TURNTO90;10(DRAW1;TURN-9);TURNTO270;10(DRAW1;TURN-9)2570 E:2580 *OBJECT42 [͛2590 M:OBJECT42_2600 JN:*OBJE)}CT432610 GR:TURNTO0;PENERASE;DRAW1;TURN180;DRAW2;PENRED;TURNTO0;GO9;TURNTO902620 GR:9(DRAW1;TURN 6);TURN-15;DRAW6;TURNTO225)};PENYELLOW;12(DRAW2;TURN5)2630 GR:TURNTO 45;8(TURN 3;DRAW2);DRAW1;3(TURN15;DRAW2);TURNTO235;DRAW8;TURNTO180;DRAW7;TURN 90;DR)}AW1;TURN902640 GR:DRAW10;TURN180;DRAW4;TURNTO270;DRAW1;TURN-90;DRAW6;TURN180;DRAW6;TURNTO-45;DRAW5;TURN180;DRAW42650 GR:TUR)}NTO250;DRAW8;PENRED;TURNTO-45;GO2;TURNTO0;FILL2;TURNTO20;FILL6;7(TURN 6;FILL1)2660 E:2670 *CLASSIFY4 [ӛ2680 M:CLASSI)}FY4_2690 JN:*CLASSIFY52700 C:#T=?\5+502710 C:$NUMBERT=#T2720 C:$MATCH5=$OBJECT$NUMBERT2730 GR:PEN YELLOW2740 A:=$MATCH5)}2750 *OBJECT50 [2760 M:OBJECT50_2770 JN:*OBJECT512780 GR:TURNTO0;DRAW 7;TURNTO225;DRAW 3;TURN180;DRAW 3;TURNTO180;DRAW1)}4;TURN90;DRAW 2;TURN180;DRAW42790 E:2800 *OBJECT51 [2810 M:OBJECT51_2820 JN:*OBJECT522830 GR:TURNTO90;24(DRAW1;TURN-15)});24(DRAW1;TURN15)2840 E:2850 GR:TURNTO90;24(DRAW1;TURN-15);24(DRAW1;TURN15)2860 *OBJECT52 [2870 M:OBJECT52_2880 JN:*OB)}JECT532890 GR:TURNTO90;16(DRAW1;TURN-15);TURN180;16(TURN15;DRAW1);TURNTO90;16(DRAW1;TURN15)2900 E:2910 *OBJECT53 [2920 M)}:OBJECT53_2930 JN:*OBJECT542940 GR:TURNTO270;6(DRAW1;TURN-15);TURN180;22(TURN15;DRAW1);13(DRAW1;TURN 7);4(DRAW1;TURN15)295)}0 E:2960 *OBJECT54 [2970 M:OBJECT54_2980 JN:*OBJECT552990 GR:TURNTO 90;16(DRAW1;TURN 15);TURN180;16(TURN-15;DRAW1);TURNT)}O270;DRAW3;TURN90;DRAW7;TURN90;DRAW73000 E:3010 *CLASSIFY5 [ԛ3020 M:CLASSIFY5_3030 JN:*CLASSIFY63040 C:#G=?\4+60305)}0 C:$NUMBERG=#G3060 C:$MATCH6=$OBJECT$NUMBERG3070 A:=$MATCH63080 *OBJECT60 [ś3090 M:OBJECT60_3100 JN:*OBJECT613)}110 GR:PENERASE;DRAW1;TURN180;DRAW23120 GR:TURNTO0;GO7;PENYELLOW;TURNTO22;DRAW5;TURN180;DRAW4;TURN140;8(DRAW1;TURN-10);TURN-)}903130 GR:8(DRAW1;TURN-10);PENRED;TURNTO90;20(DRAW1;TURN9);DRAW3;20(FILL1;TURN9);TURNTO202;GO33140 GR:PENYELLOW;TURNTO235;8)}(DRAW1;TURN-15)3150 E:3160 *OBJECT61 [қ3170 M:OBJECT61_3180 JN:*OBJECT623190 GR:PENERASE;DRAW1;TURN180;DRAW23200)} GR:TURNTO0;GO7;PENYELLOW;TURNTO-22;DRAW5;TURN180;DRAW4;TURN-140;8(DRAW1;TURN10);TURN903210 GR:8(DRAW1;TURN10);TURNTO90;9(DR)}AW1;TURN12);TURNTO112;17(DRAW1;TURN9)3220 GR:DRAW1;TURNTO270;DRAW4;17(FILL1;TURN 9);TURNTO0;7(FILL1;TURN9)3230 E:3240 *OBJ)}ECT62 [ś3250 M:OBJECT62_3260 JN:*OBJECT633270 GR:PENERASE;DRAW1;TURN180;DRAW23280 GR:TURNTO0;GO7;PENYELLOW;TURNT)}O-22;DRAW2;TURN180;DRAW23290 GR:TURNTO90;20(DRAW1;TURN9);DRAW2;20(FILL1;TURN9);TURNTO202;GO33300 GR:PENRED;TURNTO225;9(DRAW)}1;TURN-11)3310 E:3320 *OBJECT63 [3330 M:OBJECT63_3340 JN:*OBJECT643350 GR:PEN ERASE;DRAW 1;TURN180;DRAW2;TURNTO )}22;GO133360 GR:TURNTO109;PEN YELLOW;38(DRAW1;TURN5);TURNTO90;FILL3;2(TURN-20;FILL5);TURN-10;2(TURN-20;FILL5);TURN-253370 GR)}:FILL4;PENRED;DRAW3;PENYELLOW;TURNTO180;GO2;DRAW5;TURNTO177;15(DRAW1;TURN5);TURNTO235;DRAW43380 E:T:J:*TAG20 C:#Q=?(uAPX-20183I'M DIFFERENTKATHY & PHIL BERGH11/17/820TO177;15(DRAW1;TURN5);TURNTO235;DRAW43380 E:T:J:*TAG20 C:#Q=?,6