2078 BASIC 64 V1.02 lL Xd깗9kx'̼g|     $ + 3 : D K T Z ` g s     J v  a  7 B v x/&6LWbP_z ';]n~'B?L`tt{ ת:JDb>ALn:e LS F  Gȱ H` F  Iȱ J` F G ȥH `GIHJ`   L F  L F  L @GʥHʆ@`@HG@`@JI@` L :  F HG` :  F JI` :  F GHL :  F  L F L F L F LԻ bHcG` bJcI` @eʥdʥcʥf %bʥa@`L5@af bcdep@`@in jklm@` F W Lg F W Ls Ls L. hi9hi: . l9 : a F f bc F dep`L^ hi9hi: ^ l9 : i F n jk F lm` F E  ȱ ȱ E` F HH mhhL F  W83ȱ X4WX WȩWE X W W83X4WXW W`L hi9hi:  l9 : E9:E9u9:i:`99`:`9Kȱ99i9K`:K` : x4GaȄpbf b7X` : H h  x4f %bbaG7X` : e x4GȱGHG7X` : GHHH e  hHhGx4GIȥHI7X` : j GHx4 y 7X` : H mhLE : H h j GHx4 7X`G&H`GIHJG&HGeIGHeJH`GIHJG&HG&HLv WFHfG eIeJI&JWGH` ȱ/KȥG8/ȥH/Ȑ)LE/ȅIY/ȅJZX X8IYJZ v K` Gq/GȥHq/H`8IGGJHH`JEHWJ 8IIJJH XY&X&Y8XGYHXY&I&JIGJHW 8XYL`G%IGH%JH`GIGHJH`GIGHIH`8GGHH`G8IHJ0ELI8GJH08?G8IHJ04)I8GJH0'HJ!GIHJ GI p GH`pGH` =0 =0 = =0 =0 =¥n %jjiL[nEfoaLjnEfoaL+nEfoaL    `K_ EI8e34 8\]8-.K K_LL5_\ \3]4 _`EKʵKEuO EVʈ _EW X X We Z [ [ `LXHHEG`EH78GuG`HGEuI8u`LH GEHHJI舘ueGƥG`3\4]13 248\ ]7X`8x43 W4X8   Yȱ ZȥYKL-YK^I8e ELc8 K^eWeXڥ^L8334Y3Zȑ383K34KL 3 3ZYeWYȱYeXYLEʵVEWZZ X[ WZ``` 00' 0"' 0 0  GH`GH`EʆEGH` HXG EȔ E` 83-G4.H`EʆEGH`GGH`8 GH` GH`LH ^q]$ h E E `EʆEк"#L穦EʆE"#L ߽ȹ E ELG 21LEL ` 1324/V8YWKZX4xWXKW7XE΅@<LGLLhi9hi: l9 F 9i ȥ:i F 9:`L^] W L F #@HH   hh@ʘʥ9ʥ:ʩ*ʆ@` F #@HH hh8@L L W LcL(hi9hi: (l9Lhi9hi: l9Lhi9hi: l9Lhi9hi: l9L F #@L0@ K= W @8 @ nK L  c =EK0`@8@:9` iG ȱ iH 8GHPI`@8LK@WXΐ@WX`KK0'i,i X W  ` L-iXп`GL GH ;E`ABz{`Lhi9hi: l99:z{,    F 9:`G  ,z{`Lhi9hi: l9 y l s yL,LLf["# $9:L?REDO FROM START  L2 Ez{LLhi9hi: l9 Lg E y l sz{" s", sL s0 mzA{B`   L;E"#L$8$8 G( ` ;8 8 IiL^hi9hi: ^l9 F @K9ʥ:ʩʆ@K9:`Lhh l9 #K0Lਆ@9:` F 9:`GHLLF  K+, K`L.-.hhIJIGȱIHlG -.+L E IGGL  E G\ GI\ `L.LXhi9hi: Xl9 FLLvhi9hi: vl9 ( La : KG`HG 9ȱ9`K e99:i:` HLHGI` /Aȱ/B`Lhi9hi: l9 F @9ʥ:ʆ@ ȅ9 ȅ: iiLc LL-hi9hi: -l9@:9@`LGHL0 HJLHGJII GHL> : K KiAȩ(j8i(Lc EH83-4. hE` : 8Lr : H hLq\ 8\`Lhi9hi: l9 : K9zeK9:{i:^ _` /H0H/-H.H-.083H34H42H?2@ HL?^_ h2h4h3h.h-h0h/E` +L`h8hm6hh  +LDӍ/0/9ȱ/ȅ:/1ȱ/2 B pl9hhl9hi9hi:L ~99: $ % L $ % L LShi9hi: F Xl9 F   {^`΅@9: l9LnEfoLSnEfobL{ Ly Lg  LW f MaɁbc(ɉiabcfb8a f*fbfc` 鼅pfHf8GGHbGcabL=aGb `ac&b`a`GH`GGH`K YKl +4LH ǻa8Ji(iag ʻ\ W gag`9GH9%`9IJ9`9GH9`:`GHLLF : EE` : H mhL : L 8L{6`7xztȄx`6`wqȄu` DLHH|H7l4h@w  'Jiepe>[lv o;gSK4  ֠ ," "," "," (",",X)"," "," "," #"," "," "," "," (","),Y"," ",",X "," ",",Y "," ",",X "," "," "," ",",Y "," (",") ",BRK,9,ORA,1,0,0,0,ORA,2,ASL,2,0,PHP,9,ORA,3,ASL,9,0,0,ORA,4,ASL,4,0,BPL,0,ORA,5,0,0,0,ORA,6,ASL,6,0,CLC,9,ORA,7,0,0,0,ORA,8,ASL,8,0,JSR,4,AND,1,0,0,BIT,2,AND,2,ROL,2,0,PLP,9,AND,3,ROL,9,0,BIT,4,AND,4,ROL,4,0,BMI,0,AND,5,0,0,0,AND,6,ROL,6,0,SEC,9,AND,7,0,0,0,AND,8,ROL,8,0,RTI,9,EOR,1,0,0,0,EOR,2,LSR,2,0,PHA,9,EOR,3,LSR,9,0,JMP,4,EOR,4,LSR,4,0,BVC,0,EOR,5,0,0,0,EOR,6,LSR,6,0,CLI,9,EOR,7,0,0,0,EOR,8,LSR,8,0,RTS,9,ADC,1,0,0,0,ADC,2,ROR,2,0,PLA,9,ADC,3,ROR,9,0,JMP,11,ADC,4,ROR,4,0,BVS,0,ADC,5,0,0,0,ADC,6,ROR,6,0,SEI,9,ADC,7,0,0,0,ADC,8,ROR,8,0,0,STA,1,0,0,STY,2,STA,2,STX,2,0,DEY,9,0,TXA,9,0,STY,4,STA,4,STX,4,0,BCC,0,STA,5,0,0,STY,6,STA,6,STX,A,0,TYA,9,STA,7,TXS,9,0,0,STA,8,0,0,LDY,3,LDA,1,LDX,3,0,LDY,2,LDA,2,LDX,2,0,TAY,9,LDA,3,TAX,9,0,LDY,4,LDA,4,LDX,4,0,BCS,0,LDA,5,0,0,LDY,6,LDA,6,LDX,A,0,CLV,9,LDA,7,TSX,9,0,LDY,8,LDA,8,LDX,7,0,CPY,3,CMP,1,0,0,CPY,2,CMP,2,DEC,2,0,INY,9,CMP,3,DEX,9,0,CPY,4,CMP,4,DEC,4,0,BNE,0,CMP,5,0,0,0,CMP,6,DEC,6,0,CLD,9,CMP,7,0,0,0,CMP,8,DEC,8,0,CPX,3,SBC,1,0,0,CPX,2,SBC,2,INC,2,0,INX,9,SBC,3,NOP,9,0,CPX,4,SBC,4,INC,4,0,BEQ,0,SBC,5,0,0,0,SBC,6,INC,6,0,SED,9,SBC, ,0,0,0,SBC,8,INC,8,0,BUFFER, $0200,BASIC INPUT BUFFER,ACPTR , $FFA5,BUS ACCEPTER,CHKIN , $FFC6,SET FILE STD INPUT,CHKOUT, $FFC9,SET FILE STD OUTPUT,CHRIN , $FFCF,STANDARD INPUTUT,CHROUT, $FFD2,STANDARD OUTPUT,CIOUT , $FFA8,BUS OUTPUTCHANNELS,CLALL , $FFE7,CLOSE ALL CHANNELS,CLOSE , $FFC3,CLOSE FILE,CLRCHN, $FFCC,RESET STD I/O,IOBASE, $FFF3,BASE OF I/O,LISTEN, $FFB1,MAKE DEVICES LISTEN,LOAD , $FFD5,FILE LOAD,MEMBOT, $FF9C,READ/SET MEM BOTTOM,MEMHI , $FF99,READ/SET MEMTOP,OPEN , $FFC0,OPEN FILE,PLOT , $FFF0,READ/SET CURSOR,RDTIM , $FFDE,READ REAL TIME CLOCK,READST, $FFB7,READ STATUS,RESTOR, $FF8A,RESTORE I/O VECTORS,SAVE , $FFD8,SAME FILE,SCNKEY, $FF9F,SCAN KEYBOARD,SCREEN, $FFED,DESCRIBE SCREEN,SECOND, $FF93,SET SA AFTER LISTEN,SETLFS, $FFBA,SET FILE PARAMS,SETMSG, $FF90,CONTROL KER MESSAGES,SETNAM, $FFBD,SET FILE NAME,SETTIM, $FFDB,SET REAL TIME CLOCK,SETTMO, $FFA2,CONTROL KIMOUT,TESTOP, $FFE1,SCAN STOP KEY,TALK , $FFB4,COMMAND BUS DEV TO TALK,TKSA , $FF96,SEND SA AFTER TALK,UDTIM , $FFEA,BUMP CLOCK,UNTLK , $FFAB,MAKE BUS UNTALK,VECTOR, $FF8D,READ/SET VECTORS,QUIT,IPNT,TEMP,TABL,EPNT,ETMP,ETBL "(  !77 7READING DATArKZ'&KK%T'KmrKk''K2yTrK'&KK+&KK"Q"?T-mrK''K""M+'K"[N-T&KT+&KK-SrK''K"M+'K"N-T&KT7( <3=339o74?#(K (Kd(??="(KA7DISK`A(6d(=D\( &Km(K (K6,??*(F"(K"(K"(K"(K" +tK.K"9UxK777 PASS?7- GENERATING LABELS&K(K&K+tK7  &K&K(K7.KK)'}K&xKOK)&K(sK;HX7TABL`)FHX7TEMP`0)FHX7IPNT`D)F.nKK)3.KEFECl)7.BYTEK"(iK).dK< K.dK< l(iK"(_K'iK"Q'iK"QD'iK"QD'iK" QD)"(_K'dK",Q)7.BYTEK)K7.BYTEa)"(_Kw*'iK" Q)"(_Kw*"(ZK"(UK&_K+tUK84'UK"m%'PKT'ZKS(ZKxUK'iK"RO*'ZK"MA*.ZKE*C"S(ZK&ZK(ZK'K"S&ZKS(ZK'iK"Qw*&ZK(K7'xK"S'}KRw*&ZK(K7&K(KK.nK*&K(K*'K&_KS(KxKA7DISK`*&KK(K"(nK7 7SORTING LABELS&K(FK'FK2T(FK'FK"Qx+"(K'K&FKm+tK.K8+'K&FKS)8-Od+.K8(AK.K:7N.K'K&FKS)89.K'K&FKS):7;7'K&FKS)&AK9'K&FKS)N;7&K('#K"R.&dK(#KY_&K(K"(K'K"S(K-%&dKT'#KS(sK2_7 .WORD V7 ; .ASC 7"&#KK)c&dKK)c7"q_7 .WORD Vq7 ; .7ƃ7 7"&#KK)cq&dKK)c7"7"(#K7_C1'#K"R/f>'iK" R/"(_K7 b0"(ZK"(UK&_K+tUK.nK/84'UK"m%'PKT'ZKS(ZKxUK'iK"R/0'ZK"M!0.ZKE*C"S(ZK&ZK(ZK'K"S&ZKS(ZK&ZKnb'iK"RN0&ZK(sK2Vb0'ZK&KP'ZK&KOC0&ZK(K7'xK"S'}KR0\b0&ZK(sK;HbbX7 `0bbeYb0Y7 K.iKK{. K>Px K"(K"+tK{.K> .K< 70`3.K7.BYTE> .K70> 3{.K> xK"(K"d+tK{.K>.K<7QUIT`3'K"m(xK3{.K>.K>.K<V7.K&K9xKA7DISK`4.Kg(dK&dKnh74yzhh7Whhb(dKi@K74#(nKoA7DISK`Z4'K&UKS)g(PK&PKnk4yzkk7Wkkb(PKi@K4#(nKo}~(7x}KKX7BaKX7JaC78KX7BIT`78'iK" QKX7J`C<8"(Je8"(J'iK"Q'iK"QD'iK"QD'iK" QDe8"(J'K"S(K.K&ZK9.K.J;7'7K"Q>9"(UK&7K+tUK.UK82&KP.UK82&KOC 9.UK82(sK22q.UK:-<(X.UK:#nZW.UK:-<(X.UK:#nZWq7 = V77 = VxUK'-K" S(-Kq77&-KK)c&-KK)cq7;"(J&xK+tJ'xK"Q9.J<7`92q.J<(xKPe G9P XPo70:PW7,P,WW}~(D >xUKD}7 .ASC 7"7"q}7 .ASC 7"7"77"(K&#K(sK2_7 .BYTE Vq_7 .BYTE V&#KK(K'K"?Q>7 ; .BYTE 7".Kc7"q7 ; .BYTE7".Kc7"q72"(#K7_"(Ks