8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL L? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8RLnSOS BOOT 1.1 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!) >dLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@LPRO.BYTER ' PRO-BYTER  COPYRIGHT 1985  BERT KERSEY AND  JACK CASSIDY  BEAGLE BROS,INC  ^  &PRODOS:2 ! ?,BASIC.SYSTEM&(2 ! AFREEBIES: !HOME.MOVIES; ! ^  +BEAGLE.NEWS\Y!Y++BYTEZAP.PRO='7Y !{(BZAP.BINZY# !Rc3 (BZAP.VARj Y ![zc3 *CALL.BASICq  ! CALL.BASIC.BINz !@ (CATA.LOG|L  !8(DATE.SET= ! LIST.LOCK !'MEM.ZAP Y!?a/MESSAGE.DECODER !%NOTES m !{%QSORT-  !@Y/QSORT.EXTRA.VARt$/ !`$/ **QSORT.DEMO !/SCRAMBLED.BASIC ! 'STARTUPZ !{$TYPEZ!@kZAPY`{C! $ " " &#M8nf $ ) L! " " &J, )7(P0  ( @p !"0 *%"0"" &/) )"" &ЭL!)0I0 (Щ ߍ )f 8'  )ɀ)4,- U JNT)  !N)Gi/ "4 "" " " iL X%!L!ΠΠҠ`  !"#$"7"Y"/"ll"*# HQ$WON!-PB}OBiB ,m# m# J Qڨ)̰n]e мȱ ; ̀𩠙< iO P F V >Z SY ɘL` X _ [ V7 c L '0%O '8O JmO * ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ ͍B B(8`;YYZLYLYLY뿩 8!@8` MNЩUMܩ  L 5   8 0 8 `0 / x X$$%&%0`ŠӠЭԠŠҬîʎ1DžϠl&8f ZHH)hh8JhJJJJJ j&Hk&8H) 12 (j21 h!hH h %)Ђ12H)M0 h10200I20h2 |&`L($_l&j"L  <8# ȱ)ɀ  )t& ` (Xp< @t& )mt&t&.t&w& Mt&i  ``rȱȱȱȱ0]cȱeem(ȱ(ȱ((ȱ((ȱ( Y'( ' f'L&`L' 'L' Y' L& Y'L'8ei` ,$`ee` `( '( (` *( ' (`hh8`8`(݁(݉(`}(`e`H)hJJ?(0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <ꠙ,<ʆ>*=?BC8 é&'112`HB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`bLJCAB@=?<>=?<>CAB@?A` 1 L  <>` ڢF]PL8i m L   6< L  BLRAM' hLDLآ <B*IBGF08Lé'+8H <(h`@ڍL3،h@ihAiȱ@JJJJq@)@evȱ@Hȱ@Ah@@cee J) LxL LxJiB LxJ) GxNhHHHHL(  ްƠx@BEOD  ް(`( C)CJJJlBJ,~@~@}J@` ߩ%S @ ~`E hhhߺ0 h ߐ# ߐ ߐ ߐ 0 HϭߍLпllllhh8` QSTV'P0ōҍJJJJ ɺi) ɺiLD )?      `l@Hȱ@IױHXATȱH ɯȩ׍̞5H)/@a)_ .0 :A[8@`,뎞׮Б` L` @>_)I38Ypqם`K8`@Nȱ@O@ IiNȽבN)/ȩ/N`@[ WHJjjjhA <'KI؍0JHi 뎑`C8` @ 3N@) d莽 ⭺i`0 v0GF #0 W,0 ).H hȑNWȮّNW8`ٍّNθ0NN` G8`F@ 0 e LK8`F GI8`FHGH hGhF܌ բFܽܕF芝ܝ 밶FFGG H܅I mIIHHyHȘI Lܝ` @o@ w@Ю׍_)mי_ʈ@}ȱ@oȱ@y{|rZ[_)7_I0ܢܽ \'Q*ܩu 7pqFG (ST L܅I^ mQIH` } }Y0\F]G Q_HZF[G 밯ZF[G 밠S%܈P" X)Im'܅F(܅G)܍^*܍Q 4 䭐 $H %HFFHGHG 됨`R8`)` QH_` :R(5IHH__Ѝ_@`8 e ͙* ΙQ8`5IF܅G 됾`\܍]^ {8D`F` tlH)HFȍZHG[ $%܍&܍!ܢ8* J8` L ܝJ)I 'ܝF`R8i^F\G]`R5IH3H ( )ȱHθ`Κ8QeHI SBF0Y ٙWٙUFZSʈ {猺`8m0`,0H hi L荸Ƚθhٍ0GF8yאFG  `0 d01 E8`100 v$0ʩGF 밽 谸 谳`12)1`0`Ȏi 0U`)8`θ` )W G JA)H ܝʈh٭0٭)ܝ٭*ܝ٥F٥G٭'ܝ٭(ܝ`) 8ʈ` )0ٝ)i `8`R "ꍜ NمFمG < Μ0 FGL鮑0 ٭٭ٽ8`H8`  , "8`  `ٽJJJJ`H͜hn)NjNjNjN. dH͜ ;٭ *Nۙ۰ڙک `Z8` d# B` . . .8۰*J۩ ٰ`JJJJi LdH8`ͦ ٍ0  ` `ٍyٍiB0H0FG h0`שB5xED0C ް(`(8`ؑ@`M8`8@ؐʈI묒)8 L LةC8`؍)@ i)8zJ _ ؅F L) +&J(b ;FإGؐ/8` ;JHIH ILFFHGI ѭJjHIH;7IؙJJ g3HIHILJKJK`FHIG ( Ȣ؝؈JL)eKM`)` J Jͫ $0 ΚJFJL8`JGBJ a FإG`BH aFإG`H hHB؅F  ؅GxDE؍00C ް(`(8` L7J  G"L H  G 9ؙ` @ P8`B8` X؈_JJJJح}) ) )в|J8` GpF $ ᭔ع+ؠ HH  Jh8` 䮑ٽ ٬ؠ@` ( X )8`)i п` H h)N$% LL L L H  :pJ덯 )@፲NJOK HiKKήή IJί JФ̭JjHFIH HIGxKE ް((H hH h8`8@ȭ@LH쬒8NNO 8 ؍JL`RήʱLN.MOMEKP/MEKήLML-M O,p莭eNNO(`JNKOL H/  :P L8 gؑJ`L@ȱ@ `@Nȱ@O`؝}I轆ؐ` ~ؽ؝ ~ = ~؝؈` ` H  hh)N@ X; L  H$ )bJ s ) H LhL ) 8  )حJjIHIH؊  )PLEήʱNLMOMEKP%MEKήL< O,  PeNNO f(` R  F 8AJHIHI؊ HIHI`  ;` 8A H ع H ؙ؊ؠIhHIhH  iع `   عiعi` )؍0CGHFHBFG ުhFhG`@5͔ M @Bi ׭` &. J#ع؍0 v讑)`L@. i 8`L L )ܹ0 )p )@ )  ؝X0ZF[G 밝 \]Z[FG 嬒؍r؍s؝t ؝o _) _ )حYͦ `H@h`h``N8`  ) X⬒Ȣ؝@ݪ@ʈLf &KIJHȢݪ)Jn 8  ؍ ؍ xH8 ع)JJJJ Ȣ؝I؈ Hh(8H X &h(8Hh(`ؑ@`@ȱ@ ` B@8Z_ ~鮑ٍٍٍHٍ~8rhs_JJJJ_ )_@` %I -}) 0@_)N8` @LL =@ KȹP8` K@J5 s9X(K sXXK تKo`V8`no` < on sI9XX`)HJJJh`OeNeO࿰ s9XАO`@ȭ@` ON YNJKO`HHHHхhhhhILhH),dx8 (8`@Ae f!55s+aIJK,-NOPQRSuHUSTON!' @   !"#$Ԡ͠ˠĠԠLL`BLLޢޢޢޢޢޢޢޢޢޢޢޢޢޢޢCOPR. APPLE,1983LM Mh@8nЍLޭ 0J @,,L:,LP׽8H  ): e: y8鰕:Jjjj<)yאi8i;i(*=>hPם8`;Zx3QTTSRWVUHEVhEhH)IWHPHHHAHHHLaVEWLӿ ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+>*L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| 0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌18V%֌&8V֌֠)HV)hH)hHIhդD?DRIDQD)҅; ?JDQD]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8`` XʩXύX X A %  % ɍNH hɛɘɉɈ $ Lc :Lcې)ɮ۰ɺ'Ɲ Lc  : X i % $ɛ$ɘɉ ɈL :Lɍ)ې)ɮ۰ɺH h 'ĝL  LL L)'L L L'L  (L(L $ʩ $$ $L `ީ %  &@DEF   %LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ ƠϠ LG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"(0`6708" = ***)<JJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IzL%'()*+,-./0123456789YL 8!9 詍` "  à4"/pŠϠŠà͠ӠàԠŬH06172839h` v97L75v^a ?/( va?LLLɍ$?`?a ɍɥAH93827160hH46576879h`,C bL ɍ b w,S0 @ lLޭBDEF޾ p ޾ p($ذ v (0 ( L?ԦʚLeةީa s  lL b,FLg,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ B94 l% bʽ  ՚,S` H E$݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ]c־Jjjj `O>0O l POپھ p H־Ǿh۰8L־Jjjjɾ)Ⱦ8 ѱ OLӜ ĤLLX>(F`־ؾپھ׾` bɄ KDEF vLl v lL bKɍKL?` w  vLl@3 @LtJ)s@J b  l`a?sa?,E30ɍФ3 E3HD F3 Ʉ%h3 bM E  lLthɍLL3`3,A0s0% Ipn DpnI:L ؅303L8933LΞAAJL ةޘг uv $ 8LƞaЌ>?@`>?@`B8` K  춼LK ҟ ҟ ( KK`HJJJJ8`HK)` #hhLJپھ pHJh` D!hgt}~p `~t}p8n~ni}tpi~~tso8pinii>j?k̈́>~|p|Ii||̈́ l - `>i>?Ek?!>Q>>>̀ `` \> ̀ `e>>?́?>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?`|;}=:<~:<=;`||m};>:8o>oȑ>ppȑ>> :op`G DKpnG @p;G=po:i>?Ek?>Q>> L> \/ e>>?́?ޱ>ȥj>>m>` _m8injkiljo풼S 鸍긍$I2 U)VJ зT)`l8`a HbIJhjǾȾɾ p٭b=aIe f`8` P־ǾҾ,G0C f=W)_``\"׾پӾؾھ pD`־ǾY׾ؾOW)ݩȾɾʾ pD`8`W)CB) 5W) =)W)@! pZ}ȾȾ󰹩 p` ־ǾҾ,G 8`׾ؾ f p vۥs׾tؾE`  ( 8о(־Ǿ,G 8`_`W)H־Jjjjh p̭ fLᶢǾ ת..8 ۭ (8mȾȾmɾɾʾiʾ` Lpl8l:/,s̝sƬƀ#(ZZV4G_0=( A P FjL\5p-e9ABSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND6D(!쫂8ֵ#ح#׮2}q :IC@@ -!S    !C- !ABELSDFRV@@ !$(19@EüϠž(+@ABCDEFGHIKLMNPSV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~TLLwLLL) `8` ԠŬLLFREEBIESuHUSTON!:'  'ASCII.CHART :,ASCII.SWITCH ! :BAD.NEWS ! :+D.CODE.DEMO% ! :*MACHINE.ID ! :'OPCODES \ ! :HELLO.FREDLONG.TIMENO.SEEHOME.MOVIESuHUSTON!;'  '+APPLE.ALARM !;&WAGGER!;)ALARM.PIC !;*WAGGER.PIC !;,228673::255:(21):49166,0::9900f<8850:(4)"RESTOREBZAP.VAR":8900:D$"BLOADBZAP.BIN"rFPSLOT1HBMAX279JTMAX34LLFEED$""N24083,6Z(175)(176)TFTSĢ22:"BYTEZAP TOO BIG";:d24151:DR(48701):24084,DRA_ 20::Y::20:"D=READ DRIVE-1 DISK":E5((64435)6):20:"D=READ DRIVE-2 DISK":1890,222E 18:"ESC=QUIT";:EJ1890F((37)23):J,243:JA,227 21::5:"INSERT DISK":5:"AND SELECT: "H$;:230:21:Y:A$(27)Ā M$"A":K196(A$"D"):A<>?@ABCDEFGHIJKLMNOPQRSTUVWX$D$K132& A$(19)K147:12158 K130:1230H :"KEY";:n K(Q):KF220:QQ,0:A$(KF):v A$ A$" "((36)39(37)23)ĺA$; A$((A$)32(A$"_")): Z:22:23:Y::: 22::22)::22):22:: 300:860:310:S:% "300:" "H$;:230:S: ,C1(A$)B:C221C1B:X$" ":KAC1B:X$X$"_"::X$X$" ":14:C2:X$:C2:C1)::C2:C1)::C2:X$:C2:C1):16:C2A:A$;: 6QQ,0:IA666:(Q)FĂ @ JI(X1024)F:C1(I):C2IFC1F:J(C240):HC2J40B:VTC1AJ8: CH0:260:Z:PA:T0:TXTR:SXSE:BXBL:BL8:9000:BAA:BLB:9000:S:P((L)(LA)((LB)CRA)):PPZ44:840 *M$"A":7300:(L)(LA)(LB)6PA:CHA:A$"PASCAL DISK":S:280:< 4TR17:SE0:9000:(LC)CSE15:9000:S:24081,51:D:14:A$" DOS 3.3 DISK ":PZ14:850 9CHA:M$"A":7300:PA:BL24:BA0:9000:S:I09:(LTFI)229Ă:BAA:9000:S:A$"CP/M DISK":280: >BL0:9000:S:A$"NON-STANDARD FORMAT":280:H24081,80:S:A$" PRODOS DISK ":J(1281)176:JJ7(J9):JJ(J15)(J15):IAJ:K(1281I1):KK192(K191)F(K159K192):1281I1,K::A:20:BM(L41)(L42)TF1R:A$;::\0,99:A,50:24154:f0,99:A,C:24154:pJ16:870:N158:::+QQ,0::22::"BYTE VALUE ";:24:Pĺ"BLOCK PART "FPĺ"TRACK SECTOR "h:23:40:(24083);:Tİ3900:M$"A"M$"S"S2AS%(PZ):XS2:330:S1S212HBH(H5)(H9):S3S1A:1045M$"C"S2SC%(PZ):S1S2(M$"D"):S3S2(M$"D"M$"H"):10452PS1FI%(PZ):S3S1((S1F)173):S2S1:1045v (BA)S1CA%(PZ):S3S1((S1F)173)(PZ82PZ98):S2S1:1045S1CB%(PZ):S3S1((S1F)173):S2S1C1(S1):C2(S2):C3(S3):(Q)F1060]23::NPZTFPBA:N"($"(49PBA);:M0,PZ:M0A:")"A(N10)(N100)(NTF)):N(LPZTFBA):N;:M0,N:M08:D(N10));:2039,DR1762019,160(62E)(NFN160):2020,N:NNF(NF):1890,160:1891,160(62E)(N32):1892,NF(NF):JB$Rı(QI222:S1,I:S2,I:S3,I:IA40:(Q)FĂ:S1,C1:S2,C2:S3,C3:IA40:(Q)FĂVK(Q):KF1105:S1,C1:S2,C2:S3,C3:QQ,0:K136K193K139K149K218K138K186K1731200:GAD((P0)F):EGA:K186K173G5:K13613(K173)>[PZPZG(K136)GAZ(K193K139)G(K149)GAZ(K218K138):PZ0PZTF1020:OPZFF(PZFF):1020p`K172B(PZFF):PZPZTF(PZ):870:RA:3000KK32(K223):EKK64((P0)F)K216O0:9000:S:880:1005%K147İ260:"NEW SLOT:";:230:A$"0"A$"8"I(A$):A:C3(ICE):D$"VERIFYO,S"I",D"AC3:J6:9925{K160I(MM):I6518(I65)B(I83)7(I67)C(I72):M$(I):7300:R1020:K132K196RA((24083)CE):DRA(K132RA):D$"VERIFYO,S"(24083)",D"DR:J6:9960K175K186PZ((K177).125FF):PZPZ(PZ0):1020QK155ČS:A$"QUIT NOW? (Y/N):":290:A$"Y"1005:260:23:TXTR:SXSE:K212K2046000:K2111500:K2103500:K172K1743000:K1987000:K2088500:K1952000:K2058000:K1945000:K1514000:K2177700:K2147500:870:1005lSN0:BXBL:TXTR:SXSE:24125,682T:24081,5129P:270:"SEARCH ";:Tĺ"FILE FOR WHAT?":1530"DISK FOR WHAT?"NU0:9800:F$V$:(F$)1005J0:I(F$)BA:(F$,I,A)","Ă:15906V$(F$,(F$)I):F$(F$,I1):MTM(BMTM)P:9520:JV:PĹ24117,J(JTF)TF:24118,JTF:1580G(V$)1500a"PĹ24119,J:24120,0,24121,0:24122,0:24123,06(F$)20F$(F$,20)@24128,(F$):IA(F$):24128I,((F$,I))::1810T1770:240916(J0) ^(24124)84SNSNA:1670XhBLBX:TRTX:SESX:9000:S:22::22):A:"CAN'T FIND";:SNĺ":";:1660gr" MORE:";|20:210:22::Y:9000:S:1005 PZ(24121)(24122)TF:PBL(24117)(24118)TF:BA(PZTF):PZPZTF(PZFF):TTC(24123):BL(TSBTC)(TSBTCA)TFePTR(24119)(24120)TF:SE(24160):TTC(24123):TR(TSBTC):SE(TSBTCA)BXBL:TXTR:SXSE:S:Tİ3900XAS%(12(PZ12))12:330:I23VTA:I:13::"<-"::13:" ";::870:270:"MATCH #"SN:"SEARCH FURTHER? (Y/N):";::" "H$;:GM$"A"M$"S"1730:IA(F$):JPZIA:JFFJFFyS1AS%(J):C1(S1):S1,160:JA50::S1,C1:K(Q):KF1710:QQ,0:KKF32(K224):A$(K):A$"Y"1760:K32K160:RA:1220:R0:M$"A"M$"S"ĢVT:13::"<-"::24:201K78K13K271710:A:23):9000:S:1005N1810:1770:24094:1630eTĞ:23:31:"? ":270:22::"SEARCHING ";:Tĺ"FILE FOR":1800"DISK FOR"Q$F$Q$;:W:M$"A"M$"S"M$"A":7300\Z:P2080:TXTR:SXSE:NU0:260:23:"RETURN=CAT,D"DR" (OR ENTER PRODOS COMMAND)";:9800:A$(27)ČZC:S:1005y(V$)V$"CAT,D"(DR)X$(V$,7):(X$"CATALOG"X$"catalog")I(49048)B:(I(IB)B)ĺD$"PR#3"206021::Y:D$V$:2070  (21):(222)FF99009940:2150: SE15:LA,17:LB,15:::n*TR(LA):SE(LB):TRTRTMSE16İ9000:2110x42140+>I06:F$(I)""::F$(0)((131)(132)TF):I(F$(0)):J06:ICJ,35:ICJA,35J11:ICJB,80::I06:A$F$(I):(A$)2140:(A$)FF2130:J((A$,C)):KJ(J16)16<CX((A$,B))H(3210(JF))("TIA?B???S",KA,A)" "("00"(X),C)" "(A$,D,30)R:2090\TRTX:SESX:9000f210:(21)::ZC:S:1005 O0:T3100:P3050:QQ,0:K174TCTCA:TCTC(TCNS)! K172TCTCA:TC0TCNSL TR(TSBTC):SE(TSBTCA):9000:Sn K(Q):KFR3000:R0:1015 QQ,0:(BAAK174)(BA0K172)BA(K172):9000:S:3090 K174TCTCA:TCTC(TCNS) K172TCTCA:TC0TCNS$  BL(TSBTC)(TSBTCA)TF:BA(K174):9000:SF  K(Q):KFR3050:R0:1015R  P3160 & QQ,0:SESE(K174)(K172):SE15TRTRA:SE0 0 SE0SE15:TRTRA : TRTMTR0 D TR0TRTM N 9000:S:K(Q):KFR3110:R0:QQ,0:1005.!X QQ,0:(BAAK174)(BA0K172)BA(K172):9000:S:3200_!b BLBL(K172)(K174):BA(K174):BLBMBL0o!l BL0BLBM|!v 9000:S! K(Q):KFR3160:R0:QQ,0:1005! A$"READ WHICH ":X$"TRACK? ":MTM:PX$"BLOCK? ":MBM" TA$"TRACE WHICH ":MNSA:PX$"SECTOR? "!" 270:A$X$:" 9500:270:VM3500a"A$(13)A$(27)ĴT1005:VTCA"$TTCVA:TCTC(TC0):RA:1005:R0:P3030:K174:3080"8PBLV:BAA:3760"LTRV#`270:"READ TRACK "TR;:M0,TR:M08::"WHICH SECTOR? ";:M15:9500:A$(27)TRTX:10050#tA$(13)VSEC#VVMV03680L#SEVZ#T0:9000g#QQ,0:Sq#1005#<:22:24:"TRACE:"(FI$,11);:24:Pĺ"BLOCK ";#FPĺ"SECTOR ";#P31:10);:23:31:TCA" OF "NSA::'$24114:880:CS(24149)(24150)TFA$"CANNOT WRITE":9930i$Z:270:"TYPE "Q$"YES"Q$" TO"::"WRITE";::"-";:NU0:9800$V$"YES"Č240736P$I(ER):IJ8D(I43):9910$O0:ZC:TĴP3030:3090$1005$5180I%M$"H"M$"D"5040:260:23:"FOR ASCII BYTE-CHANGES,":"WANT HIGH-BIT SET? (Y/N):";:230:ZC:FXF(A$"Y"){%A$(27)A$(13)1005:A$"Y"A$"N"5010%OA:RA:1020:R0:XS2:330:JC(S1S2)(S1S3):XA:V0:M$"A"M$"S"JA%:HA(J3):VT(A)ĢVTA:J)5&VTAB(VT20):HA(JC):J):VT:H(JC)X:C1(S2X(JC)):&""H$;:0,99:A,A:24154:N140:(Q)FĂ:S2X(JC),C1:N140:(Q)FĂ:5070&K(Q):QQ,0:A$(KF):A$(27)5095&870:ZC:S:RA:1005:R0:T1005:P3040:K174:3090'A$" "A$H$İ860:5050E'JBĭA$"0"(A$"9"A$"A")A$"F"İ860:5050h'JCĭA$"0"A$"9"İ860:5050'A$H$ČS:PZPZ(PZ0XA):5040' XXA:A$'JCVV(A$)(10(BX)):VFFV0:S:860:5040(JBVV((A$)487(A$"9"))(16(AX))((AJV(A$)FXL(2XAJ5050:LPZ(TFBA),V:S:PZPZ(PZFF):5040v(<880:24111:CS(24149)(24150)TF:(pTXTR:SXSE:BXBL:K2046040:(TS)(TSA)A$"TRACE-FILE NOT LOADED":280:1005 )TT0:TM$"A":7300:CHA:3900:P3030:K174:3080!)22:24:W:S:1005)A$"LOADING ":PJ35((PZ11)35)11:J10TR(LJ):SE(LJA):TRTRTMSE16A$A$" SECTOR 1 ":300:FI$"":I029:FI$FI$((LJCI))::9000:6080B*PC3PZTFBA:J39((C3D)39)D:X(LJ19)(LJ20)TF:S3((LJ)16):S3136140:S33A$"FILE TOO LARGE":6150*PĭJC(LJ)BL(LJ17)(LJ18)TF:BL0BLBMA$A$" BLOCK 1 ":300:FI$"":K(LJ):KK(K16)16:IAK:FI$FI$((LJI))::9000:6080*6140+PKL12:TS,TR:TSA,SE:J0n+PKL:TS,BL(BLTF)TF:TSA,BLTF:J0:FI$FI$" ":AXĹTSB,0:TSC,0:JB:6130+PC1(KJB):C2(KTFJB):KJLFFĹTSJB,C1:TSJC,C2:16:27:AJB" ":JJB:(C1C2)6100:6130S,PC1(KJ):C2(KJA):KJLFFC1TMC216ĹTSJB,C1:TSJC,C2:16:28:AJ2" ":JJ2:(C1C2)6110:6130o,T0:TS,0:TSA,0:6140,T0:JJB:NSJB:TC0:6020,A$"NOT A FILE?":(PTRFF)(P(LJ))A$"DELETED",TRTX:SESX:BLBX:9000:S:280:1005,XZ^-nCHA:260:"FORMAT? A=ASC S=SCRN H=HEX D=DEC C=CA";:2039,212:8:230:A$(13)A$(27)7200-A$"H"A$"D"A$"A"A$"C"A$"S"7022:M$A$- 7300:22:23:Y:RA:1005:R0:S:TĴP3030:3090-*1005-M$"C"DF$M$.MM,(M$):AZ1223(M$"C")4(M$"C"P):S:.LZ:24:23:W:ILPZTFBA:PZ(FF)(BA)N(I)(IA)TF:" 2BYT:"N10000)N"($";:M0,NTF:M0A:M0,N(NTF)TF:M0A:2039(N1000)(N100)(N10),169/`23:23:" BITS: -----";:W:N(I):JN:K8AA:30K(K5):J(JB)BA;:J(JB):{/t22:24:W:N2347590:"TOKEN:";:NFĹ1774,NF:1773,16265(N32):1775,1622(N32):75900NN127:C132((N32)(N64)(N96)):I53455139(N32)136(N64)82(N96)53854:(I)FC1C1A:C1NKIA:I55555:JKK9:((J));:(J)FĂJ0I0M$"A"M$"S"XAS%(PZ):330:IAS%(PZ)12H2H(H5)(H9):J(I):I,JF64(J192):J(I1):I1,JF64(J192)022:38:210:ZC:S:TĴP3030:3090010051870:P1005:I2826239:(BAAPZIPZI9)(BA0PZI22PZI13)Ă:1010D1PZ37BAA((LD)16)1310101Z:24:23:W:23:W::24:"DATE TIME ";::F$"???JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC?????????":24:24:C1PZTFBA:I(LC1):J(LC1A):X(LC1B):K(LC1C)=2J199X99K99Iĺ"";:W:20:210:A$"Y"ČZC:S:1005w2(2023)188Ģ24:20:" DD-MMM-YY HH:MM";:Z:77303(C2I(I32)32:C3(J2):(48(C210))C2"-"(F$,3((I32)8(J(JB)B))A,C)"-"(48(C310))C3" "(48(K10))K":"(48(X10))X;:Z:20:210:X11ĺ":";33-A$"Y"ČZC:S:1005^32OA:5180:ZC:24:23:" ";:X0:X$""37C1(2023X):K(Q):KF77503<N140:(Q)FĂ:""H$;:0,99:A,A:24154::2023X,C1:N140:(Q)FĂ:773534FK(Q):QQ,0:K136XXXA(XC)(X7)(X10)(X13):36,23X:X07730:X$(X$,X):7735C4GK149KC1Z4HK155A$"":77254KA$(KF):((X2X6)(A$"0"A$"9"))((XAX7)(A$"A"A$"Z"))İ860:77354P(K);:XAX5ĺ"-";4RX8ĺ" ";4SX11ĺ":";G5UXXA(XA)(X5)(X8)(X11):X$X$A$:(X$,B)"31"İ860:H(36):A:A:X$;:W:24:H:77305ZX7āS1A(F$)C:(X$,C,C)(F$,S1,C)Ă:XC:X$(X$,B):36,23X:860:77355]X157735/6xXLPZTFBA:K(S1C):J((X$,6,B)):XA,JB(K7):X,32(K(K8)8)((X$,B)):XB,((X$,B)):XC,((X$,8,B)):A$"":7725V6@MPA::MM,77:S:(ER)39ė:8180v6^T8160:ITSB:8035:81606cIIB:(I)(IA)ı6hPJ(I)(IA)TF:D(J16):JJ(J16)16:18J(J7)6rPĢD(IA):C(I)6w:"*"::8035%7QQ,0:22::210:A$"P"Ė1:W:8500O7QQ,0:MM,(M$):9000:MP0::S:100574!A$"PRINT SCREEN NOW? (Y/N):":290:A$"Y"A$"y"85807\!MP8030:10057!A$"FIX PRINTER":300:A::D$"PR#"PS:LF$:LF$:D$"PR#0":S:MPTITSB:8035:8590 8!MPĹ2039,DR176$8!A:D$"PR#"PS:LF$8!IA24:I:J(40)(41)TF:I(I24):KJJ39:N(K):NN95(NFF):N159ĺ(N);:86408!NN64(N32)64(N95):(N95(N127NFF));8!:A:LF$:(Q)155Ă8!A:LF$:LF$:D$"PR#0":8180n9":20:5:32):A$"..........":I1931:I:5:" ";::A$A$A$;::" "::2:5:32):1156,28:1187,47:1492,47:1523,28:"5:13:":"14)":":13:" BYTEZAP.PRO ":13:":"14)":":::12:"COPYRIGHT (C) 1985":8:"BERT KERSEY & JACK CASSIDY":13:"BEAGLE BROS, INC."::"13:C:8910:1580,32:1611,32:124):8910:15:5:"<> BACK UP YOUR DISKS!":5:"ONE MISTAKE COULD RUIN YOUR DAY."::"IA36:"_";:::(#PĹU,BL(BLTF)TF:UA,BLTF:UB,66BA:UC,80:24064 ;<#PĹUB,TR:UA,0:U81,SE:UC,51:24070';F#(ER)39ġ:J8:99101;P#CHıp;U#M$DF$:AZ12:(PBLABL6)(PSETR17)M$"C":AZ35DP;Z#(MM)205ĹMM,(M$);d#;%NUA:9800;0%(V$)ı;:%(V$)36(V$)729770;?%(V$)1V0:V$"":@";&9940:1:J(222):A$"ERROR "((222))", LINE "((218)(219)TF):R0(>&J17ĭ(ER$(J))A$ER$(J)E>&3288:JFFK155:1250>&(1492)47PSĢ22:(7)"BZAP.BIN OR BZAP.VAR MISSING";:>&K147JCJ8Ĺ24083,I:K196:1230>&K132K1969960>&280::S:1005>&9900>&>&JCDRARA&?&24084,DRA:48701,DR:24151:800:1005L+RPAR %T` T TR %T T`RM^P i` i`^P^BRL\RRRi'RR(R(R8R*R$*R [RA RLRS RLRH sTLRD TLRC^P cWLR [LR(R'R(RLkRRC @V` S RR(R+LSRRR RA )VR$($R $$($ jSR(R+LhS$$($`$($iSHJJJJT$($h)T$($iS`(R^3 TLS TS %T T`(RS(R)RLSS(R8)R)R S mSSRY[\]^_`abcdefghmSRmS`$($`HJJJJT$($h)T$($`CTɠɀ TCT T TLrT TCT T T` S S R(RR+R$($ %TR(R+LT$($` S&R7USUSU 8U T R(RR+RU)I7UU 8UR(R+L6U$($` UUT7U)? TUT7U)? TUT7U)? T` UU UULUUT TUT TUT TUT T`dUUUUUͬUUUU8UUUUUULUUͮUUUU8UUUUUULUU UU8 UL VUU`R  RȘ `$ [$($$ [^Ph^U^U lU T^ TLV^ T^T TLV^ %T^ %T T!$ [R TLV TL W ^U ^U lU ^R R$ [_^UU lU_^R RL W`+CRjy-^]^LfA^ bifbi@fbifbi@fffE %+Ș@^ A^Q% L8g]^<^<^]^ f`8b@bbbbb^^<^`^P =^FLg^3 =^FLh^PL%hLXhbJmc5^mc6^b9^b):^5^^6^^b)A^LgB^`b9^:^b`^7^ ^8^ ^`^_^`b9^b):^b)Jmc;^ qhb)A^LWhB^`b9^:^bmc;^ qh`o;^ ^ ^ ^ȱ^_^`9^:^ci7^ci8^`^ci5^ci6^^P ci;^Lhci;^`o`0Lh`LiLiӠ^^ a^ ?kii i i i iPi iJi i i) i i i$ i [ i i" iL9i$ [i T j`i.i i ii TLiiii Ti͒iLi`Ӡ ^ ^_^ ^ imii i i8i i ii i iiPi \jiiPi \jiii i" iLj$ [i T j`[j i$ i [.i i ii TLjiii T i[j[jLaj`ĨŨj TiUiU lUj T iU iU lU`Өͩˠˠ X $ [j T$ [k T>k$>ki [ T>k %T T>k i %T T T T T>k %T T>k>kLsk$ ["k T$ [0k T>k$>k [ ()?($>k>kLk>k$>k [$($>k>kLl`˯حưư˯íӳŴõԶϷҸáġšӴŵöԷϸҹıűñ X$ [?l T$ [ T$ [hl T$ [l T$ [l T$ [ T $ [l T$ [l T>k$>ki [>k m Tm T%$>ki [>k m>k8m T8m T8m T>k>kLn>k$>k [()?('>k>kLln`K IJKC1C2S1S2S3ABC@DFFFTFP0@aM0$MM$ Q@QQ@TS^DDNDRER<$QHZ@CEHJL(*-/258;=@BEGJL(+,-./0123456789;>@CEHJLPRUWZ]`cehjmortPSTUVWXYZ[\]^_`acf "$  "$      "$(*-/258;=@BEGJL(+,-./0123456789;>@CEHJLPRUWZ]`cehjmortPSTUVWXYZ[\]^_`acfhkmprt  #      !"#$&(*,./0123456789:;<=>?@ABCDEFGHIJKLN(*,./0123456789:;<=>?@ABCDEFGHIJKLN(*,./0123456789:;<=>?@ABCDEFGHIJKLN(*,./0123456789:;<=>?@ABCDEFGHIJKLNPRTVWXYZ[\]^_`abcdefghijklmnopqrstvPRTVWXYZ[\]^_`abcdefghijklmnopqrstv            ()*+,-./0123()*+,-./0123()*+,-./0123()*+,-./0123PQRSTUVWXYZ[PQRSTUVWXYZ[PQRSTUVWXYZ[E:܅ͅHUH?DISK/DRIVE ERRORFILE/PATH NOT FOUNDWRITE-PROTECTEDNO DRIVE CONNECTEDILLEGAL NUMBER"A 10#THIS SPACE FOR RENT.)4 8000S255:(21)::::X14::9995:9999:((16384)173(16497)55(16819)89)ĺD$"BLOADCALL.BASIC.BIN,A$4000" DISPLAY MENU X10:11:CS::X:"D - DEMONSTRATE CALL.BASIC" :X:"E - ENTER A ONE-LINER"6 :X:"A - ASSEMBLE"Y :X:"L - LEAVE THIS PROGRAM" I03:122I:X::A$(I);:J030:9500:::X:A$(I)::1050  DEMO ::" CALL.BASIC DEMO:":1 234::"THIS SIMPLE 1-LINER AVERAGES 3 NUMBERS:"::prstuvwxy"1 PRINT "Q$"THE AVERAGE IS:"Q$";(A+B+C)/3": "AFTER ASSEMBLING THIS 1-LINER INTO A CALL.BASIC FILE ON DISK, YOU COULD USE IT LIKE THIS:" :"- BRUN AVERAGER,A16384 (OR ANY ADDRESS) - A=123: B=50: C=999 (ANY VALUES) - CALL 16384 (SAME NO.AS BRUN ADDRESS)"f :"CALL.BASIC ROUTINES CAN BE LOADED AND USED FROM WITHIN PROGRAMS TOO:" :" 100 AVG=16384":" 110 PRINT CHR$(4)"Q$"BRUN AVERAGER,A"Q$"AVG":" 200 A=12345: B=23456: C=34567":" 300 CALL AVG"# :"COMPLEX 1-LINERS WORK TOO.":"USE YOUR IMAGINATION!";. 10000J :" ANOTHER DEMO:":: "YOU CAN PRINT A STRING AS MANY TIMES AS YOU WANT, THANKS TO THIS 1-LINE ROUTINE THAT IS ACTUALLY IN MEMORY NOW AT 16544:";: " 1 FOR I=1 TO X: PRINT A$;: NEXT: PRINT"g *"HERE'S HOW YOU PRINT A STRING 13 TIMES: A$="Q$"-*-"Q$":X=13:CALL 16544"::A$"-*-":X13:16544: /:"OR WE KIND OF LIKE:":" A$="Q$" BEAGLE BROS "Q$":X=21:CALL 16544":A$" BEAGLE BROS "::X21:16544: H10000k\:" AND ANOTHER:":::"HERE'S A PROGRAM THAT DRAWS A HI-RES BOX. X AND Y ARE THE COORDINATES AND L IS THE LENGTH OF EACH SIDE:"p:" 1 HPLOT X,Y TO X + L,Y TO X + L ,Y + L TO X,Y + L TO X,Y"z::"HERE'S A SAMPLE APPLESOFT PROGRAM THAT CALLS THE ROUTINE ABOVE AT 16676:"h25002520:"IMPORTANT: ANY IF-STATEMENT MUST BE ON A SEPARATE LINE FROM THE CALL."23::"PRESS A KEY TO SEE IT WORK:";:A$:A$: :3:BOX16676:X10:Y50:L10 BOX XX10:YY3:LX:X1302510! :22:"TYPE "Q$"RUN"Q$" TO RESTART PROGRAM.":255:7 ENTER ROUTINE ^:::" TO ENTER YOUR ROUTINE:"::"1.REPLACE LINE 1 WITH YOUR ONE-LINER.":" (AVOID DOS COMMANDS, GOTO & GOSUB.)"A:"2.TEST YOUR ONE-LINER BY TYPING "Q$"RUN 1"Q$".";:34:"-----":"3.TYPE "Q$"RUN"Q$" AND SELECT A:ASSEMBLE.";:25::"A"::9:"---"I140:"-";::"CAUTION: DON'T CALL YOUR ROUTINE FROM WITHIN A FOR-NEXT LOOP OR FROM A LINE THAT CONTAINS AN IF STATEMENT.":I140:"-";::"REPLACE LINE 1 NOW:":34,17:2::23:o ASSEMBLE 4p::" ASSEMBLING:"::Z34,2::33,33:1:V(37)1:LV28Q0:C1:I4L:I:SB(40)(41)256: CALCULATE SCREEN BASE=JSBSB32:B(J):J,32:R020::J,B: SCANNING CURSORBJ1411I4Ă: SKIP THE LINE NUMBERTDB160Q1CC1:M1(49200):STC,B128: ADD ANOTHER CHARACTERyGB162Q1Q: TOGGLE QUOTE FLAGLV:10:"DRIVER LENGTH: 108"`V1:10:"YOUR ROUTINE : ";:C1100ĺ" ";eC110ĺ" ";jC1" "; oV2:10:"------------------"6tV3:10:"TOTAL BYTES : "C109" "b::ENSTC1:EN,0::33,40:A16384:A34,0:V4::"YOUR ROUTINE IS NOW INSTALLED IN MEMORY.TO TEST IT, CALL 16384. ----------"X:"TO SAVE YOUR ROUTINE ON DISK, TYPE:":" BSAVE ANYNAME........,A16384,E"EN:" ------------------------------------":"IF YOU MIGHT WANT TO EDIT YOUR 1-LINER LATER, SAVE THIS ENTIRE PROGRAM NOW. ------------------------";:(37)5:? ERROR @EL(219)256(218):ER(222)%JER6EL64006410lOER8ĺBP$:" CHECK THE DRIVE AND PRESS ANY KEY":KP,128:KR,0:TER6ĉ::8:BP$:"THE FILE "Q$"CALL.BASIC.BIN"Q$" IS MISSING.":^216,0:'# GET KEYPRESS %KEY(KP):KEY128ı&%:KR,0:KEY224KEYKEY32'+%KEY1962000: DEMOC0%KEY1974000: ENTERb5%KEY1936000: ASSEMBLE:%KEY204Ģ21::"COME BACK SOON.":?%BP$;:& DEFINE VARIABLES  'ST16492:D$(4):Q$(34):BP$(7):KP49152:KR49168:A$(0)"D":A$(1)"E":A$(2)"A":A$(3)"L"& 'CS958:CL868:;' TITLE SCREEN ':X:":"12)":":X:" CALL.BASIC ":X:":"12)":":::X8:"BY BERT KERSEY & RANDY BRANDT":X1:"BEAGLE BROS, INC."::X:"(READ PAGE 38)":':24:37:"KEY";::KP,128:KR,0::׾ؾGiliȑUifiȑȑ8ȑ`yzl30f 7LD:CONTFORI=7TO0STEP-1:X=2^I:Y=B>=X:PRINTY;:B=B-(X*Y):NEXT8ؾGiliȑUifiȑȑ8ȑ`yz A30A 7LD:CONTFORI=1TOX:PRINTA$;:NEXT8ؾGiliȑUifiȑȑ8ȑ`yz轐A30A 7LD:CONTHPLOTX,YTOX+L,YTOX+L,Y+LTOX,Y+LTOX,Y803,0:100=63999:(4)"SAVE/PRO.BYTER/CATA.LOG":Hd9000Zn(4)"-QSORT"`lPSLOT1SUBDIR$(50),FILE$(1000):FI1:COL39:PR((800)123):SR((801)123):DR(802):SN(803):DR1DR2DR(48701)SN1SN7SN(48700)U ,L$" ------------------- ------ --------------- --------------- ------- -------" 6T$" NAME TYPE BLOCKS MODIFIED CREATED ENDFILE SUBTYPE" :(21):(4)"PR#0":::::": :":" CATA.LOG ":": :":{}~ :"THIS PROGRAM WILL DISPLAY THE FILE NAMES FROM ALL OF THE DIRECTORIES --- ON A PRODOS DISK." 11::"[P] USE PRINTER AND 80-COLUMNS?.";:50,255192(PR1):"YES";::"/";:50,255192(PR0):"NO ":j "[M] MERGE/SORT SUBDIRECTORIES?..";:50,255192(SR1):"YES";::"/";:50,255192(SR0):"NO ": &"[D] DRIVE NUMBER................";:50,255192(DR1):" 1 ";::"/";:50,255192(DR2):" 2 ": +"[S] SLOT NUMBER................. ";::" "SN" ":\ 0:"[B] BEGIN":"[Q] QUIT"::868:"SELECT:";:A$:8500:A$:A$"Q"63000 :A$"P"PRPR0:800,123PR:500 ?A$"M"SRSR0:801,123SR:500 DA$"D"DRDR(DR1)(DR2):802,DR:500 NA$"S"SNSN1:803,SN:SN8SN1:803,SN XA$"B"500 SR5000L PRė:"PRESS ESC TO QUIT":" ---"r RPRCOL79:(21):(4)"PR#"PSLOT  UNSORTED (4)"PREFIX,S"SN",D"DR:(4)"PREFIX":PFX$:8000:" MAIN DIRECTORY:":LNLN1PFX$:LNLN1:(4)"OPEN"PFX$",TDIR":(4)"READ"PFX$:A$A4A$:(A$)(A$,3)"BLO"ĺ(A$,COL):8000^>(A$)ĺ(L$,COL):8000zH(A$,18,3)"DIR"2200\SUBSUB1:A$(A$,2,15)p(A$,1)" "A$(A$,(A$)1):2160SUBDIR$(SUB)PFX$A$"/"(A$,3)"BLO"2100H(4)"CLOSE":NFSUBNFNF1:PFX$SUBDIR$(NF)::" SUBDIRECTORY:":LNLN2:2040R5250a SORTED 17::958:20:"READING DIRECTORY...":(4)"PREFIX,S"SN",D"DR:(4)"PREFIX":PFX$:VOL$PFX$(4)"OPEN"PFX$",TDIR":(4)"READ"PFX$=A$:(A$,28,1)"0"(A$,28,1)"9"FIFI1:FILE$(FI)A$:21::(A$,COL)Y(A$,18,3)"DIR"5160uSUBSUB1:A$(A$,2,15)(A$,1)" "A$(A$,(A$)1):5120SUBDIR$(SUB)PFX$A$"/"((16384)1555250:(A$,3)"BLO"5060><(4)"CLOSE":NFSUBNFNF1:PFX$SUBDIR$(NF):20:"READING SUBDIRECTORY...":5020td953,1:950,FILE$(0):PRCOL79::(4)"PR#"PSLOTx:VOL$:8000:(T$,COL):8000:(L$,COL):8000:I0FI:(FILE$(I),COL):8000::(L$,COL):8000;(A$,COL):16368,0:(12):(4)"CLOSE":(4)"PR#0":PRSRĺ"ANY KEY:";:A$:8500:A$:150~"[R] TO REPEAT, OR ANY KEY:";:A$:8500:A$:A$"R"5240:150? PG.BREAK @PRLNLN1:LN55LN0:(12)T(16384)155Ĺ222,255:9000h4!(A$)95A$((A$)32)>! '# ERROR =(#(12):(4)"PR#0":(4)"CLOSE":(222)255Ĭx2#(7);:(222)6ĺ"QSORT MISSING FROM DISK":"-----":F#(222)3DR1:802,DR:150K#(222)8ĺ"I/O ERROR":I1999::150M#(222)77ĺ"INSUFFICIENT MEMORY":63000P#216,0:E :(21):::83"CURRENT DATE AND TIME:"k2MX$"JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC?????????"<A(49040):B(49041):MIN(49042):HR(49043)FYR(B2):MO(A32)8(BYR2):DAA(A32)32 KYR99MO12MO1DA31DA1ĺ"":90d P(48(DA10));DA"-"(MX$,MO32,3)"-"(48(YR10))YR" "(48(HR10))HR":"(48(MIN10))MIN ZEN510::"NEW DATE AND TIME:" d11::958:"DD-MMM-YY HH:MM"::" WHEN FINISHED":" TO START OVER":" TO QUIT":12:1:HT1:X$""H n1403,HT1:HT:A$:A$(8)100:A$(13)200:A$(27)510 x(HT3HT7)(A$"0"A$"9")110:HT1A$"3"110:(HT11HT14)A$"5"110:(HT3HT7)A$"A"A$"Z"110:(X$)10110 HT4MO$A$:MO112:MO$(MX$,3MO2,1)Ă:110i HT4ĭMO$"F"MO$"S"MO$"O"MO$"N"MO$"D"X$(X$,2)(MX$,3MO2,3):(MX$,3MO2,3);:HTHT3:170 HT5MO$(X$,1)A$:MO112:MO$(MX$,3MO2,2)Ă:110 HT5ĭMO$"AP"MO$"AU"MO$"JA"X$(X$,2)(MX$,3MO2,3):(8);(MX$,3MO2,3);:HTHT2:170L HT6MO$(X$,2)A$:MO112:MO$(MX$,3MO2,3)Ă:110^ A$;:X$X$A$ (X$,2)"31"((X$)2X$"01")100:HTHT1(HT2)(HT6)(HT9)(HT12) HT8N29(MO2):N$(N):(MO2MO4MO6MO9MO11)(X$,2)N$X$N$(X$,3):1:N$; 110b DA((X$,2)):MO$(X$,3,3):YR((X$,6,2)):HR((X$,8,2)):MI((X$,10,2))u (X$)11100 YR99MO12MO1DA31DA1ĺ(7);:100 49041,YR2(MO7):49040,32(MO(MO8)8)DA:49043,HR:49042,MI:EN1:8:1:20;134EN::958::"TYPE "(34)"RUN"(34)" TO MAKE A CHANGE." 0 48647,00:48648,03:SENDS PRODOS TO $0300CLOC768:$0300SCMD$"LIST"lER10:PRODOS.ERROR#A:A0ĹLOC,A:LOCLOC1:30:8,160,0,185,0,2,217,26,3,208,11,200,192,4,208,243,40,169,10,76,9,190,40,76,158,190,-1' #781,(CMD$):I1(CMD$):793I,((CMD$,I,1))128::786,ERj (:CMD$".LOCK INSTALLED."::"RUN 999 TO REPAIR.":"-------": 48647,158:48648,190::I1(781):((793I));::" O.K.": B@ _@ L @@:@;@m@@:, /:ͪ@ͫ@ m@8@:8e::;i;έB#BB(BBBC?B@C ,@L@BB`Š䠨Рԩ㩠嬠㮍8LLBl̾m ;CLPBQRTUSC`tL Bt ؾ׾ p֢ʆtϾξ pо޾־پھ  p" t pSTUPQR`۾eܾe v ,Z0M CC C" C C C Kᩀ C) C ɍɠ ) @  ɛ<8  LCC C C CLC CL`C hhLB `TYPE:@ L ;@8@:9@;6@m:@7@:, /:6@7@ m;@86@:8e::;i;ΩS?B;@C ,L<@AA;@ L ͮР٠ˠ٠éŠӬýǡĠŠŠǠӠͮŠΠ SB B GDES HLAɉ +ELAɄ ELA ILAɛLA HLA 7NLA JLA HgS3S 4HLAESɈ FLAɕ FLAɺ FLAɭ FLAɊ ɾɮLAES FLAɋ ɼɬLAES FLA I2SESLAES2SESɛ KQ B GDES BLBLA KQ BL``````ة)00 3SMSLpB4SMSQQ$ 8SbScSbSQT  X@)S1S-S+SH(S*S0S),S`$($`$ [ CASAS m,SCS-SiDS$AS [DS )DCS )D BCSDSBSBS $ )D$($BSBS婠 BBSBS $ ɠ $($LeC$($BSBS٩ B BASASLB %L`,SY-S鿐,S-S,S0S-S1SLC,S-S,S-SX,S0S-S1S80S1S0S,S1S-S0S1SX0S,S1S-S,Si.S-Si/S`HJJJJQ$($h)Q$($`80S,SFS1S-SGSFSJJJHSGSHS) HSFS)IS mISiISIS$HS [$(JS)? @(ȱ(KS)? @(ES$JS(ȭKS(ESESES8 ES`3SLS0S(S1S)S 4SLS IL*E*S0S+S1S 4SLS IL*E0S1S 4SLS IL*E` DLS3S`0S^S1S_S0S`S1SaS`SaS8*S0SbS+S1ScS E0S1S 40 B0` DLS3S`0S^S1S_S^S_S0S`S1SaS8*S0SbS+S1ScS E*S+S 40 B0`^S`S_SaSLELRF^SmbS_SmcS`SmbSaSmcS cSdSdS D dSL%FbSeS DeS`^S_S`SaS cSdSdS D dSLlFbS DLF`4SfSaɀ bɀ3SfSbɀ aɀ3SfSESɺ 3SfSESESɭ 3SfSESESɈ52S HgS3S$fS3S0S80S1SLG0S1S0SLGESɕ$fS3S0Si0S1SLHG0S1SLGɊ;fS3S"0Si0S1S,Si,S-S BLG0Si0S1SLGɋ;fS3S"0S8頍0S1S,S8頍,S-S BLG0S80S1SLG,S80S ,S8,S-S B0S8.S ,Si,S-S B %L`4SgSɰ ɺ 3SgSL3H ǰ3SgS` DLS3S`ES 8鰍lSLYH8i lS2S HgS3S"0S1S $) lS 4ES FLH0S1S $)mSlS mS 4LH0 B0`MS3S I`LHLH B`0S:1S;:ɾ;鿐:; KQQ KLKI X P:;L(I c KR BES̍ES B`pStSqSuS0nSrSoSsSrSsSrSrSsStSuStStS˭uS`InSIoSIpSIqS TI`{SnS|SoS}SpS~SqS TI`$($` KQQ KhSSLJiSjRjSkRQQ KhSSLJjRiSkRjS ILJjRkRiSjSQQ KLJjR(SkR)SiS*SjS+S(S0S)S1S0S),S1S-S B` KQQ KhSS\jS ILKjS ILKiS0SjS1S0S),S1S-SiSXjS鿐iSjS X,S-S B`ShSkSkS IkSSS OS ShSL;K =i?:Bt;C éH #Q Q S:;h8`L8/e` QH:  J/Ȑh,--&,*i H/.4S :S `0 .: QȘ LLQL&RLX::" MEM.ZAP ";::" (PAGE 45)":8000]:"MEM.ZAP.1000 HAS BEEN DROPPED. THE NEW":"MEM.ZAP RELOCATES ITSELF ABOVE HIMEM.":_:"PAGE 48":"MEM.ZAP NOW LISTS AUXILIARY MEMORY."`9000::" ERRATA ";::" (PAGE 21)":8000Y:Q$"EXAMPLE: 25-JAN-42 06:42"Q$" SHOULD BE":Q$"EXAMPLE: 25-JAN-42 06:21"Q$"c9000{@:I140:"-";::(#16368,0:2037,75:2038,69:2039,89*#K(16384):K1289002:16368,0:KK128:K27Ģ23::868:23:(4)"-/PRO.BYTER/STARTUP"'2#K8K10PGPG1:PG1PGPMAXG<#K8PGPG1:PGPMAXPG1OF#70_&(222)6Āl&216,0:F :ND24:A$(ND):I0ND:A$(I):::(21)::255::A$(0);:34,1 B1ND::VV1:B18ĺ:"PRESS A KEY FOR MORE";:X$:1:27:" PAGE 2 "::V1:V1:40):J199:::H4013:998:H:(A$(B),41H);::  " BEAGLE BROS APPLE DISKS--NOVEMBER 1985 "E ( "ALPHA PLOT...... HI-RES GRAPHICS..$39.50"v 2 "BEAGLE BAG...... 12 GREAT GAMES... 29.50" < "BEAGLE BASIC.... BASIC ENHANCER... 34.95" F "BEAGLE GRAPHICS. DOUBLE HI-RES.... 59.95" K "BIG U........... PRODOS ENHANCER.. 34.95"; P "D CODE.......... BASIC DE-BUGGER.. 39.95"l Z "DISKQUIK........ DISK EMULATOR.... 29.50" d "DOS BOSS........ COMMAND EDITOR... 24.00" n "DOUBLE-TAKE..... 2-WAY SCROLLER... 34.95" x "EXTRA-K......... MORE MEMORY...... 39.95"0 "FATCAT.......... DISK LIBRARY..... 34.95"a "FLEX TYPE....... FLEXIBLE TEXT.... 29.50" "FONT MECHANIC... FONTS & UTILITIES 29.95" "FRAME-UP........ APPLE SLIDE SHOWS 29.50" "GPLE............ APPLESOFT EDITOR. 49.95"% "I. O. SILVER.... ARCADE GAME...... 29.95"W "MINIPIX......... 200 CLIP-ART PIX. 29.95" "PRO-BYTER....... DISK ZAP UTILITY. 34.95" "PRONTO-DOS...... TRIPLE-SPEED DOS. 29.50" "SHAPE MECHANIC.. HI-RES ANIMATION. 39.95" "SILICON SALAD... TIPS & UTILITIES. 24.95"L "TIP DISK #1..... 100 TIPS ON DISK. 20.00"} "TRIPLE-DUMP..... PICTURE PRINTER.. 39.95" "UTILITY CITY.... 21 UTILITIES..... 29.50"-24:1::"SELECT:";:" MAIN MENU QUIT NOW";:2039,32::24:10:A$:A$"M"A$"m"ĺ(4)"-/PRO.BYTER/STARTUP"FA$"Q"A$"q"260[:1:958:23:20::958:"TYPE "(34)"RUN"(34)" TO CONTINUE.":(4)"PREFIX/":Kb(HEX$"0123456789ABCDEF":::(21):::A$": :":A$:" MESSAGE.DECODER ":A$:):"(SEE PAGE 69)":8:W$"":"NEW MESSAGE: ";:657:I512767:(I)141W$W$((I)128):i(W$)Āk(W$)80W$(W$,80):8:14:W$;:9583 n12::"*B___: ";:I1(W$):X$(W$,I,1):CO1:[ A$:A$X$A$"DONE"COCO1:160 A$"DONE"Ģ15::(7);"SORRY, NO "X$"'S ALLOWED":" -":"ANY KEY:";:A$: CO14N0:(HEX$,N1,1);:LELE1:800, NCO14(CO14):(HEX$,N1,1);:LELE1:800::BYBY1:"F";:LE0ĺ"0";N ,::"("BY" BYTE"(83(I0)); 6")":1:"ENTER THE BYTES BELOW AT ONE OF THE":"ADDRESSES LISTED ON PAGE 69.":868::"DON'T EXCEED THE NUMBER OF BYTES":"ALLOTTED FOR THE MESSAGE BEING CHANGED.":11:"]CALL-151 <-(TRACE OVER)"# @10:@ LE2LE0:BYBY1:" ";f *: A,C,D,E,F,I,L,M,N,O,R,T,U," " 4B,G,H,K,P,S,V,W,X,Y,/,(,),.,":",DONE I014:J01616:I14J0N47657JI:J1:N","(N)((N)100)((N)10))" ["((N))"]"; ::12255:Q$(34):(21)::49166,0:PG1:9900xFPMAX11:PG5000,3000,5500,6037,6000,2000,6500,4000,4009,7000,7100 ::" BYTEZAP.PRO ";::" DUMMY FILE NAMES ":8000:"HERE'S HOW YOU MAKE ZERO-BLOCK CATALOG TITLES LIKE THOSE ON THE PRO-BYTER DISK:";: "- MAKE A BACK-UP COPY OF A DISK, AND DELETE A FILE FROM IT."::"- RUN BYTEZAP.PRO AND FIND THE DELETED FILE NAME (SEE PAGE 15)." :"- CHANGE THE DELETED NAME. IF LESS THAN 15 CHARACTERS, END IT WITH SPACES." :"- REFER TO PAGES 30-31 IN YOUR MANUAL, AND CHANGE BYTE [C]-[D] TO 1F. -- - CHANGE BYTES [F],[G],[H] & [I] TO 00. WRITE CHANGES TO DISK. -- "3 :"- ADD $01 TO BYTES [S] BY THE DIRECTORY NAME. (EXAMPLE: 0900 BECOMES 0A00.) WRITE THE CHANGE TO DISK."= 9000` ::" PRODOS PROBLEMS ":8000 :"]RUN PROGRAM"::"PATH NOT FOUND":::"]CATALOG"::"PATH NOT FOUND"::) "IF YOU'RE HAVING PROBLEMS, READ PAGES 4, 53 AND 54 IN YOUR PRO-BYTER MANUAL.":9000S ::" QSORT ";::" (PAGE 42)":8000 :"SORTING EXTRA VARIABLES (PRODOS):":"-----------------------":"USE QSORT.EXTRA.VAR WITH BEAGLE BROS' EXTRA-K DISK'S EXTRA.VARIABLES PROGRAM (STORES VARIABLES IN AUXILIARY MEMORY).": " 1. BRUN EXTRA.VARIABLES":" 2. BRUN QSORT.EXTRA.VAR":" 3. ";::"IMPORTANT!";::" NOW TYPE "Q$"CLEAR"Q$".":27:"-----"["DON'T RELOAD QSORT AFTER QSORT.EXTRA.VARIS LOADED. ----- ---------------":"TO USE THE EXAMPLE PROGRAM ON PAGE 42 ORTHE QSORT.DEMO PROGRAM, YOU MUST DELETE THE FIRST LINE.":9000::" QSORT ";::" MORE...":8000-:"AND REMEMBER: QSORT ALWAYS INCLUDES THE FIRST ARRAY ELEMENT (#0) AS PART OF ITS SORTING PROCEDURE. DON'T FORGET TO LOOK AT THE ZERO-TH (1ST) ITEM AFTER SORTING."i:I010:A$:50,63192(I0):"A$("I")"I10)"= "A$:MR.BUBBLE,MR.CHIPS,MR.CLEAN,MR.ED,MR.GOODWRENCH,MR.MAGOO,MR.REE,MR.ROGERS,MR.T,MR.OCTOBER,MR.WIZARD:90001063,160:1191,160:1319,160:1447,160::A$": :"I215:2:30I:" PRO-BYTER "::30I:A$:1:I:A$::I:" NOTES ":J10231407128:JI1,160:J41I,160::::4:41(V$):V$;958:I1333:::" THESE NOTES ARE AN UPDATE TO YOUR PRO-BYTER INSTRUCTION MANUAL.":" [ANY KEY] ADVANCES TO NEXT PAGE [LEFT-ARROW] GOES BACK A PAGE [ESC] LETS YOU QUIT":::" NOTICE:":::"IF YOU DON'T HAVE NAME...............A PRO-BYTER MANUAL, CLIP THIS COUPON---> ADDRESS............";"AND MAIL IT ALONG WITH $34.95 (+1.50) CITY...............TO BEAGLE BROS. STATE....ZIP.......WE SHIP SAME DAY.":"NEW DISK INCLUDED.";iI24151:I:20::"^";(8);::J19::"!";::1251,190:14:20:"+";:I2140:I::"=";(8);::J19::"-";:s9000|::6:" CONTROL-S ":1:" BYTEZAP.PRO ";::" (PAGES 5-35)":8000:"NEW COMMAND:":"-----------" 13:"NOW LETS YOU SWITCH TO ANOTHER DISK DRIVE SLOT.":"THIS FEATURE IS USELESS, UNLESS YOU HAVEDRIVES CONNECTED TO DIFFERENT SLOTS. (HARD DISK USERS: SEE NEXT PAGE.)"G:"IF YOU HAVE AN APPLE IIC OR 128K IIE, YOU CAN SELECT SLOT 3 AND LOOK AT PRODOS'S BUILT-IN RAM DISK, WHICH IS THESAME AS SLOT 3, DRIVE 2.":14:"- -"Q 9000p::" BYTEZAP.PRO ";::" MORE...":8000%:"YOU CAN WRITE A TRACK TO ANY DISK (NOT JUST THE ONE YOU HAVE READ FROM) BY REMOVING THE CHECKSUM STATEMENT (WITH VARIABLE 'CS') NEAR LINE 4000.":"YOU CAN'T EASILY UNDELETE A PRODOS FILE LARGER THAN 1 BLOCK, BECAUSE THE 'DELETE' COMMAND ZAPS A FILE'S INDEX BLOCK (PG.33) FOR NO APPARENT REASON."9000 ::" BYTEZAP.PRO ";::" HARD DISK NOTES":8000:"BYTEZAP.PRO WAS DESIGNED TO READ FLOPPY DISKS. IT MIGHT WORK WITH YOUR HARD DISKAND IT MIGHT NOT. DIFFERENT BRANDS VARY.";&:"BYTEZAP.PRO NOW AUTOMATICALLY SETS THE MAXIMUM BLOCKS, SO TRY IT WITH YOUR HARDDISK BEFORE MAKING ANY OF THE CHANGES ONPAGE 77 OF THE MANUAL.":"THE DISK MAP WILL ONLY READ THE FIRST 279 BLOCKS ON YOUR HARD DISK."::"DOS 3.3 DIRECTORIES AND FILES MIGHT NOT BE READABLE AT ALL."9000d::" TYPE ";::" (PAGE 36)":8000bn:"TYPE NOW WORKS WITH ANY VERSION OF":"PRODOS BECAUSE IT RELOCATES ABOVE HIMEM INSTEAD OF WITHIN BASIC.SYSTEM.":s"THE NEW TYPE MAY BE USED FROM WITHIN":"AN APPLESOFT PROGRAM.":x:"BONUS":"-----":"APPLEWORKS (AWP) FILES CAN BE TYPED":"JUST LIKE NORMAL TEXT FfAmgAtL L&!Pɠ @oAʹ pA͵L@gA ȍiA8dAjALhAiAcAdA<=< /< @<Ș @Lx@ @< @< @L@cAdA<=eAfA>?hAiABC , @oApA`dA fAmjA`e<<=i=`kAlA8mAHBnAmAmkAmAnAmlAnAoApAkAlAqpAmAnAoA`B,ILB'I Ƅ 愭&I`0ȱ#I!I"ILvB0ȱ0$I!I"ILvBȱ%I!I"ILvB愭&I`II愭I8II ILBI III III8II I B`HHHIH IH 'C LCH&IHHHHHHHH CLB G`H HHȭHHȭHHȭHHH`H &IHLCH'IHH HHȹHHȹHHȹHH`8HHHHHH0H(IH)I`HmHHHmHHNHnH EHHHHHHHH EHHHHHHHHHH F FHHHHHHHHHHHH ELDHHHHHHHH E8HHHHHH8HHHHHHHHHHLHHHHHHHHHHH 'CHHHHHHHHHH 'CLEHHHHHHHHHH 'CHHHHHHHHHHH 'C`HHHH EHHHH LF GHHHHHH EHHHH LF GHHHHHH EHHHH LF GHHHHHHHHLEHHHHHHLEHHHH`HHHH EHHHH LFHH"I`H*IH+I*ImH*I+ImH+I"Im*Im+I!I#IHȱȱ`H*IH+I*ImH*I+ImH+I"Im*Im+I !I#IHȱȱ`HHHH LFHHHHHH E GH&I`HHHH EHHHHHHH LF GH&I`!I#IBH+H/HκHHHͽHHH 'IHLG&IHLG!I$I$  &IHLG'IHLG &IHLG'IHLG`HHHHHH EHHHHHμHλH LF GH&IL|HH"IHHHHHγHβHHHHH LFHH"I׊ב"IHγHβHH0HHHH LF GH&I𿭲HHHHHH LFH"IHHIͰH IHLG`Hˠ٠ >d:(21):::::"SOME RANDOM WORDS..."::(4)"-QSORT"GN18Q1:1^A$(N1)kI0N1:J1((1)42)1:A$(I): I0āK0I1:A$(I)A$(K)Ă:A$(I)" ";(112((36)30));:868:270 I0260I:(36)ĺ(8)"!"? ,:"SORTING STARTS WHEN YOU PRESS A KEY:";:A$:A$;:5:1:958N 950,A$(0)u I0N1:(I1)10)I1". "A$(I): 23::"]RUN TO TRY AGAIN.";:23: OH,SOMEWHERE,IN,THIS,FAVORED,LAND,THE,SUN,IS,SHINING,BRIGHT,THE,BAND,IS,PLAYING,SOMEWHERE,AND,SOMEWHERE,HEARTS,ARE,LIGHT,AND,SOMEWHERE,MEN,ARE,LAUGHING,AND,SOMEWHERE,CHILDREN,SHOUT,BUT,THERE,IS,NO,JOY,IN,MUDVILLE,MIGHTY,CASEY,HAS STRUCK,OUT Z(21):3005d:X039:X:0,39X:0,39X:X21:1:958:" THIS PATTERN WAS CREATED BY LINE 100, USING SCRAMBLED COMMANDS (SEE PAGE 39). YOU CAN RUN 999 TO UNSCRAMBLE THEM. -------";:23:, SCRAMBLE.BASIC  647190,136: "MAKES 'CLEAR' WORK LIKE 'GR'L @47181,129: "MAKES 'ON' WORK LIKE 'FOR' J47170,160: "MAKES 'SPEED=' WORK LIKE 'COLOR=' T47150,142: "MAKES 'XDRAW' WORK LIKE 'HLIN' ^47177,143: "MAKES 'GOSUB' WORK LIKE 'VLIN' h47167,130: "MAKES 'RESUME' WORK LIKE 'NEXT'g r100:THESE POKES HAVE NO EFFECT ON COMMANDS TYPED DIRECTLY FROM THE KEYBOARD.  UNSCRAMBLE.BASIC 47190,189:47181,180:47170,169:47150,149:47177,176:47167,166 :X039:X:0,39X:0,39X:X:::"(SAME PATTERN WITH PROPER COMMANDS)":100: PRO-BYTER COPYRIGHT (C) 1985 BERT KERSEY AND JACK CASSIDY BEAGLE BROS, INC. 3990 OLD TOWN AVENUE SAN DIEGO, CALIFORNIA 92110 (4)"SAVE/PRO.BYTER/STARTUP":dV$"01-APR-86"i255:49166,0:10000 n(21)::::D$(4):D$"PREFIX/PRO.BYTER":PFX$"/PRO.BYTER/" :1:15:":"11)":":15:" PRO-BYTER ":15:":"11)":":::12:"COPYRIGHT (C) 1985":8:"BERT KERSEY & JACK CASSIDY":13:"BEAGLE BROS, INC."::I1999: I139(V$):9:I:" "V$::9 ,:" RUN A PROGRAM:"::36::" [B] BYTEZAP.PRO . . . . . . .PAGE 5 [C] CATA.LOG . . . . . . . . . . .36 [D] DATE.SET. . . . . . . . . . . 37 [Z] MEM.ZAP. . . . . . . . . . . .44" ^" [N] NOTES (MANUAL UPDATE) . . . . .4 [Q] QUIT & RUN ANOTHER PROGRAM . . 4" ::" SEE A DIRECTORY:":::" [M] MAIN DIRECTORY . . . . . .PAGE 4 [F] FREEBIES SUBDIRECTORY . . . . .4 [H] HOME.MOVIES SUBDIRECTORY . . . 4":H 24:1:" PRESS B,C,D,Z,N,Q,M,F OR H: "(8);:A$:9999:A$;:A$"Q"A$(27)6010:A$"M"7000:A$"F"8000:A$"H"9000:A$"B"A$"C"A$"D"A$"Z"A$"N"500 X9:A$"N"ė:"TO RETURN TO THE MENU, TYPE "(34)"-STARTUP"(34)"." A$"B"1000:A$"C"2000:A$"D"3000:A$"Z"4000:A$"N"5000: D$"-BYTEZAP.PRO" D$"-CATA.LOG" D$"-DATE.SET"& D$"-MEM.ZAP"6 D$"-NOTES"} p20::958:(4)"PREFIX":PFX$:"THE CURRENT PREFIX IS:":PFX$;: z22::958: X9050 b:D$"CAT":9050 @9050 J:D$"PREFIX"PFX$"FREEBIES":D$"CAT":9020 (#9050 2#:D$"PREFIX"PFX$"HOME.MOVIES":D$"CAT"<#18:"^^^":195:I3111:I:("(YOU CAN RUN ANY BAS PROGRAM.)",I,1);::255::18:"---":22Z#:" SELECT:";:V(37)1:H(36)2::" [M] MAIN MENU":13:"[Q] QUIT NOW";:V24V23$d#V:H:" "(8);:A$:9999:A$"M"100:A$"Q"A$(27)9060.n#6000L'A$((A$)32(A$"_")):Y'216,0:ͮР٠ˠ٠٠Ԡ  éŠӬǡĠŠŠǠӠͮŠΦ`````` guةrs qrsssst$ 8騍drerdrQT  Xtgrirfrhrfrnr)jrgrorkr` sIsz I蘝ssss`l` (Ω K`` ߅Ω K` ߅ij` ` ߠ( `LL,,Ƅ 愭`0ȱLv0ȱ0LvȱLv愭`愭8L8 ` ' L{|}~ L K` ȭȭȭ` LΒ ȹȹȹ`8}{~|0`{m}|m~Nn st{u|v {|}~  ͅstuv L{s|tuv 8}~8{|͋L{|ΐΏ '}~ 'L}~ '{|ΐΏ '`{p|q mn L kxpq }m~n L ky}p SWITCH768:7001( 2 POKES AND A CALL: X26,(" ")128:CHANGE SPACES TO...<7,("!")128:EXCLAMATION POINTS!FSWITCHH MORE... K:12:13:" PRESS A KEY. ";::9# PA$"<<<<<(!)>>>>>)!(<":MAKE THE LAST CHARACTER THE SAME AS THE FIRST, AND YOU'RE ON A ROLL!b ZI2(A$):6,((A$,I1))128:7,((A$,I))128:SWITCH: _(16384)12890:16368,0 nI2231601:6,I1:7,I:SWITCH: I1999:::12:13:" NICE JOB. "::11:  MACHINE LANGUAGE  LSWITCH" A:A256ĹL,A:LL1:720 169,0,162,4,133,254,134,255,160,0,177,254,197,6,208,4,165,7,145,254,200,192,120,240,6,192,248,240,6,208,235,160,128,208,231,160,0,166,255,232,134,255,224,8,208,220,96,999 :(21): 2 PRODOS.ERROR.MESSAGES ]d:(21):768,169:769,0:770,32:771,12:772,190:773,96I221:769,I:768:998::LDA.WITH.2.TO.21.AND.CALL.$BE0C.(WHICH.JMPS.TO.$9F88)::I1999: ,"RUN999 FOR AN EVEN STRANGER LIST. ------";:  ERROR.MESS... K :I768774:A:I,A:: 169,199,32,12,190,24,96 I118:A:769,A:768:(37)::28,32,35,36,51,56,63,69,44,77,79,93,198,141,151,152,199,129:D B176:C49200:D1:(21):::B:Q$(34):G$(7):A255:230,64 :A$": :"::214:A$" D CODE "::214:A$": :"::214: A$"BY ALAN BIRD - BEAGLE BROS, INC.":214::I20002039:I,32:J11:S(C)::J11:::246::24:1::39); 2039,32:23::35,23:J116:I15:S(C)::I133:::::B$"-- M A I N F E A T U R E S --":240:258 $"ONE OF THE MOST FRUSTRATING THINGS ABOUTAPPLESOFT PROGRAMMING IS TRYING TO FIND THOSE GOOD-FOR-NOTHING PROGRAM BUGS."::246:"D CODE'S "Q$"D.BUG"Q$" PROGRAM GIVES YOU THE POWER TO TRACK DOWN (AND STOMP ON) THOSEBUGS... ";:246:"F A S T !":246| %15:1::"BUGS";:1::246:"BUGS":"BUGS":J199::A:24:1::39)::I199::I1721:I:1:"BUGS":I1:" | ":J1150:::246:J15:21:1:"BBUGG*";:I150::1:"BUGS ":I113:::21:1:868:23:1:"BUG*":J15:S(49200):u &246:A:A$(0)" BUG* ":A$(1)" BBBUGG*":I124:23:I:A$(I(I2)2):J155:::I1523:I:26:"STOMP":I1:26:" "::I120:S(C)::A:22:24:" CRASH ":868:I199::22:5:868::24:" STOMP":J15:S(C)::A:22:24 '"# *":24:" \STOMP/ ":B.7:22:24:" ":24:" STOMP ":A:B$"-- P R O G R A M P R O O F E R --":226 ("D CODE CONTAINS AN AUTOMATIC APPLESOFT ERROR CHECKER. IF YOU TYPE A PROGRAM LINE (OR ANYTHING) CONTAINING AN ERROR, YOU WILL IMMEDIATELY BE NOTIFIED.":246::"SUPPOSE YOU ENTERED A PROGRAM LINE..."::A$"500 GOSUP100: PRNNT"Q$"HOTDOG"Q$)N2:4:"]";:248:A::" 500 GOSUP";::""G$;::"100:PRNNT";::""G$;::" "Q$"HOTDOG"Q$:B:246:A::" ERRORS ARE REPORTED IMMEDIATELY, BEFORE YOUR PROGRAM IS RUN. ------":I18:18:13:"^^^ ^^^";:J199*:1:868:J199:::246:21:1:868::B:"FIND HIDDEN BUGS THAT ARE READY TO BITE!";:226:"YOU MAY ALSO CHECK AN ENTIRE PROGRAM FORERRORS IN A COUPLE OF SECONDS. WATCH..."::3:"]";:A$"CHECK":N4:248:::" 10 GOSUB 12345";::"<#>"G$:+" 45000 A$ = ";::""G$;::"100: INPPUT";::""G$;::" NAME$"::B::"UH-OH!";:246::1:"UH-OH! LINES 10 & 45000 HAVE PROBLEMS.":246:"THREE KINDS OF ERRORS WERE REVEALED:"::3:"1.":3:"2.":3:"3."::14:18:"<#>":14:"";:28,""::20:3:"1. A GOSUB TO A NON-EXISTENT LINE <#>":3:"2. AN ILLEGAL STRING ASSIGNMENT ":3:"3. AND A SYNTAX ERROR ":246::14:18:"<#>":14:"";:28:"":B$"-- H I S T O R Y T R A C E R --":226-"D CODE INVISIBLY MONITORS PROGRAMS AS THEY RUN AND AUTOMATICALLY KEEPS TRACK OF WHICH STATEMENTS HAVE BEEN EXECUTED."::"FOR EXAMPLE, SUPPOSE YOU HAVE A PROGRAM THAT CRASHES WITH AN ERROR...":246::A.G$"?ILLEGAL QUANTITY ERROR IN 110 ]";:G4:256:1:"]"::255:"(DON'T PANIC--WE'RE JUST PRETENDING.)":17:2:G6:256:17:1:120):18:B:"WE CAN LOOK AT THE LAST 10 STATEMENTS THAT WERE EXECUTED BY TYPING..."::4:"]";:A$"DUMP10"/N4:248::34,7:35,23:222:" 90 TEXT : HOME : NORMAL : GOSUB 5000 5000 XX = 887: PRINT: RETURN 100 PRINT "Q$"DOGFOOD"Q$" 110 VTAB Y: HTAB XX"::::::246::20:"A-HA!";::K(37):98:K1:1:BJ0"A-HA! WE NOW HAVE A BRIEF HISTORY OF OURPROGRAM, AND WE CAN LOCATE THE PROBLEM--ANY NUMBER OF STATEMENTS MAY BE TRACED! --- ------":98:18:25:"<---CRASHED HERE":98:23:1:868:100bA:I19:16:1:"-->";:J199::1:3);:J199:::[dB$"-- W I N D O W - T R A C E R --":226:"YOU MAY ALSO TRACE YOUR PROGRAM'S STATEMENTS "Q$"LIVE"Q$" DURING EXECUTION. ----":246:3:"]";:A$"TRACE":G1:256:248::A:X(37):21:1Ve"----------------------------------------";:958:B:24:15:"TRACE WINDOW";:B:I113:24:26I:"=";:15I:"=";::1:"<";:2039,190:246:22:1:868::868:X1:3:"]";:A$"RUN":248:11:1:120):22:1:958:12:1:M22:H1:P123:255RfA$"NOTICE ":124:A$"HOW ":124:A$"EACH ":124:A$"STATEMENT ":124:A$"APPEARS ":124:A$"IN ":124:A$"THE":124:A$"WINDOW ":124:A$"BELOW ":124:A$"AS ":124:P75:A$"IT ":124:A$"IS ":124:A$"EXECUTED ":124:A$"HERE ":124:A$"ON":1246g:A$"THE ":124:A$"SCREEN...":124:A$"UNDISTURBED BY THE TRACING!":124:P0:A::I140:A$"%":124::P500::A$"D CODE'S TRACE DOESN'T MESS UP YOUR":124::A$"SCREEN LAYOUTS LIKE APPLESOFT'S TRACE.":124:M:H:34,21]h" PRINT : PRINT : NOTRACE"::126|Q(37)1:O(36)1:22:34,21:M:H:"PRINT "Q$A$Q$";: ";:J1P::M(37)1:H(36)1:Q:O:A$;:J1P::V~B$"-- V A R I A B L E T R A C E R --":226:"D CODE ALSO LETS YOU TRACE A PROGRAM'S VARIABLE VALUES.":A:"-------- ------":BQ"WATCH WHAT HAPPENS TO THE VALUES OF VARIABLE X , EXPRESSION X*50, AND STRING ARRAY A$(X) AS THIS PROGRAM RUNS."::13:10:" X ";:26:"X*50":14:"A$(X)":::X(37):A:21:1:958:"*---------------------------------------":X1:3"]";:G2:256:A$"RUN":248:J12::X126:A$:22:1:" X ="X" ";:21:"A$(X)="A$;:868::" X*50 ="X50:K1250XJ::::I920:I:1:868::12:1:B" D CODE'S ADJUSTABLE-SIZE TRACE WINDOW WORKS IN 40 & 80-COLUMNS, AND MAY SIMULTANEOUSLY DISPLAY PROGRAM STATEMENTS AND VARIABLE VALUES":21:1:"-";:22:"*":34,15:222"200 X=20: VTAB 16: X =20 HTAB 1: SPEED= 255 X*50 =1000 210 PRINT "Q$"AND"Q$";: A$(X)=FREE CASH INVERSE : PRINT Y =191 "Q$"VARIABLE VALUES."Q$80):255:246:J12:15:1::"PROGRAM STATEMENTS":868:I1100J::15:" "::"PROGRAM STATEMENTS":I1100J:::15:26::"VARIABLE VALUES":15:26:868::26:"VARIABLE VALUES"::16:20:"/ \"::B$"-- F A S T F I N D E R --":226"D CODE WILL FIND ANY WORD OR CHARACTER IN AN APPLESOFT PROGRAM...F-A-S-T !"::3:"]";:A$"FIND":248::255:" SEARCH FOR:";:A$"GOSUB50":248::246::210:" 10 50 65 590 2000 6010 5480 5490 12000 12150": " OCCURRENCES: 10":246::B:"THIS SHOWS US ALL OF THE PROGRAM LINES THAT CONTAIN THE SEARCH-WORD "Q$"GOSUB 50"Q$".";:246:"SEARCH MOST PROGRAMS IN UNDER 2 SECONDS!":226:"FIND & LIST? (THOUGHT YOU'D NEVER ASK!)---- ----":246::3:"]";!A$"FINDL":250::A:" SEARCH FOR:";:A$"CAR":248:::222:X$" 80 A$ = "Q$:168:"ROT"Q$": GOSUB 5000":X$" 300 ":168:X$" = 500: PRINT "Q$"INDY "Q$";":168::X$" 5020 PRINT "Q$:168:X$"LOS S":168:X$"ED ":168:"L."Q$:170!X$;::A$;::;":" OCCURRENCES: 6":246::B:"ALL OCCURRENCES OF THE SEARCH WORD ARE LISTED AND HIGHLIGHTED IN INVERSE.":246:B$"-- P R O G R A M P A C K E R --":226+#"D CODE LETS YOU COMPACT ANY APPLESOFT PROGRAM SO IT TAKES UP THE LEAST AMOUNT OF MEMORY AND DISK SPACE POSSIBLE."::"A TYPICAL RESULT MIGHT BE...":246:255::" OLD LENGTH : 4321":" NEW LENGTH : 3210":" -----------------"$" BYTES SAVED: 1111":246:15:27:"UNUSED CODE:":28:"LINE 50":28:"LINE 3000":28:"LINE 5050":246:B:15:27::"UNUSED CODE:"::20:Q$"UNUSED CODE"Q$" MEANS THAT THE PROGRAM LINES SHOWN CANNOT POSSIBLY BE EXECUTED."%B$"-- T H A T ' S A L L F O L K S --":226::" D CODE ";::" APPLESOFT COMPACTOR & DE-BUGGER":"COMPATIBLE WITH: APPLE II+, IIE AND IIC";:I33:186:" GPLE AND DOUBLE-TAKE";:I23:186::" PLUS: DOS 3.3 AND PRODOS";'%I26:186::188_%:I:"AND";:J1200::I::"AND":I:"---";:1:X&" PRICE: $39.95"::" POWERFUL: VERY!":246:A:I131:24:I:A$(I(I2)2);:J155:::868:A$(0)" *BUG ":A$(1)" *BBBUGG ":I3061:24:I:A$(I(I2)2);:J155:::I1824:I:8:"POW";:I1:8:" "::I120U'S(C)::A:23:7:"CRASH":868:I199::23:1:868::8:"POW";:J15:S(C)::A:23:6:"# *":7:"\POW/";:B.7:23:6:" ":7:" POW ";:A:246:246:A$"]":I1324:I:1:A$;:I1:1:" "::I120:S(C)::A:23:1:A$:" ";'I199::23:1:868::1:A$;:J15:S(C)::A:23:1:"!!":A$;:B.5:23:1:" ":"] ";:A:23:(A:L(A$):P((33)LD3(D1))2(D0):S1:EL:D1SL:E1A(ISED:Z(C):36,P:PPD:(A$,I,1);::::D0D:(246:255:24:1::A$" TO CONTINUE TO QUIT ":2039,32:24:I3911:I:(A$,I,1);::F0:16368,0)24:4:" ";:I199::4:"RETURN";:I1888::FF1:K(49152):K128F152303)49168,0:K141F14240C)K209230a):A:24:1::958:23:)A:7:1::40):7:21(B$)2:B$::RāI823:I:1:40)::244)I823:I:1:40(I16)):::24:39):2039,32:8:::B:*:24:39):2039,32:8:::B:#*J1999::0*G2:256{*I1(A$):"";:254:" ";:254:(A$,I,1);:(A$,I,1)" "G1:256*254:I:G1:256*K((1)25)N:J1K::*255:K1G:"";:J1250::" ";:J1250:::+A::" COMPACTOR ";:B::" PACKS PROGRAMS TO SAVE SPACE";::A::" SYNTAX CHECKER ";:B::" PROOFREADS PROGRAMS AND FINDS ERRORS BEFORE THEY OCCUR"::A::" FINDER ";:B::" LOCATES ANY STRING IN 2 SECONDS";:::A:" BREAKPOINTS ";:B:," PRE-SETS ERROR TRAPS"::A::A:" HISTORY TRACER ";:B::" SHOWS THE MOST-RECENTLY USED STATEMENTS AFTER A PROGRAM STOPS":::A:" WINDOW TRACER ";:B::" NEATLY TRACES STATEMENTS AND VARIABLES IN A SEALED-OFF WINDOW":,B$"-- I N T R O --":226:36-16368,0::ARITHMETIC,BELL,COASTER,DING-DONG,ELEPHANT,FROG,GOLF BALL,HELICOPTER,INK,JUJUBES,KING KONG,LADDER,MOO-OOO,NITPICK,OSTRICH,PROWLER,QUAIL,ROOSTER,SAN DIEGO ZOO,TULSA,UNCLE LOUIE,VALENTINE,WAXY BUILD-UP,XEBEC,YOOHOO,ZULU:(21)::ALOC49048:"MACHINE ID BYTE:"LOC" ($BF98)" P(LOC):" VALUE:"P" ($";:P1P(P16)16:P2(P16):(P2487(P29))(P1487(P19))")" " BITS:";:I18:BIT(I)P(P2)2:18I(I4):BIT(I);:P(P2)::::BIT#1.ON.RIGHT/BIT#8.ON.LEFT TYPE4BIT(8)2BIT(7)BIT(4):APL$(0)"II+":APL$(1)"???":APL$(2)"II+":APL$(3)"???":APL$(4)"IIe":APL$(5)"IIc":APL$(6)"III":APL$(7)"???" 2K2BIT(6)BIT(5):MEM(1)48:MEM(2)64:MEM(3)128 FHUH$(0)"NO":HUH$(1)"YES" KTYPE4TYPE5120B P"THIS IS AN APPLE "APL$(TYPE)" WITH "MEM(K)"K."^ d" CLOCK:"HUH$(BIT(1)) n" 80-COLUMNS:"HUH$(BIT(2)) x "POSSIBLE SLOT CONTENTS:" SLOT17: NO, YOU CAN'T PEEK AT SLOT 0! LOC49152256SL:A$""0 (LOC23)201(LOC55)207(LOC76)234A$"SILENTYPE":600g (LOC)8(LOC1)120(LOC2)40A$"CLOCK":600 (LOC5)24(LOC7)24A$"COMMUNICATIONS CARD":600 (LOC5)56(LOC7)24A$"SERIAL CARD" 0(LOC11)1I((LOC12)16):I10II1::J1I:A$::600w :USED,PRINTER,JOYSTICK,I/O CARD,MODEM,AUDIO CARD,CLOCK,MASS STORAGE,80-COLUMN CARD,NETWORK CARD D(LOC5)72(LOC7)72A$"PARALLEL CARD" XJ4894648946(48945):P(J):P127PP128 bP16SL650 lDRP16SL vDR4A$"PROFILE"* DR0A$"DISK DRIVE"1 JR " SLOT "SL": ";:(A$)ĺA$h (A$)ĺ"EMPTY?"p SL (4)"PREFIX":A$:"CURRENT PREFIX: "A$ "LAST USED SLOT: "(48700):"LAST USED DRIVE: "(48701) 22::gEOP(175)(176)256:LOCEOP4120EOP:(LOC)54(LOC1)57(LOC2)32Ă:"CODE MISSING":|(:(21):::24-"(IF YOU'RE NOT INTO MACHINE LANGUAGE, THIS PROGRAM WON'T INTEREST YOU.)":M 2"---------------------------------------":"THIS PROGRAM PRINTS A 5-PAGE LIST OF APPLE'S 6502/65C02 INSTRUCTION SET." 7:"INSTRUCTIONS MARKED <65C02> WORK ONLY ON THE NEWEST APPLES--THE APPLE IIC AND ENHANCED APPLE IIE."::"OLDER APPLES SUPPORT ONLY THE UNMARKED (6502) INSTRUCTIONS."/ <:"---------------------------------------": A"READY YOUR PRINTER, AND PRESS

OR QUIT NOW BY PRESSING ." P22:35:" ";(8);:A$:A$:A$"P"100:A$"Q"80: c d i(4)"PR#1"::350, x(LOC1)13(LOC)13ĺ" --------------------------":LOCLOC1K }X$((LOC))((LOC1)): X$"18"X$"1A"X$"09"X$"E9"İ300:OPTIONAL FORM FEED (16384)155200 A$:A$"XX"145:A$X$140:" <65C02> ";:150 " ";" P(LOC):(P);:LOCLOC1:P13120:P0200:150Y "--------------------------":(12):(4)"PR#0":x ,(12);:350::PAGE BREAK ^PGPG1:" -------------------------- PAGE "PG" OF 5":> 72,32,89,34,3C,80,D2,3A,52,1A,7C,B2,12,DA,5A,FA,7A,F2,92,64,74,9C,9E,14,1C,04,0C,XX,<<>> `Π69 00 ADC #$00 65 00 ADC $00 75 00 ADC $00,X 6D 00 00 ADC $0000 7D 00 00 ADC $0000,X 79 00 00 ADC $0000,Y 72 00 ADC ($00) 71 00 ADC ($00),Y 61 00 ADC ($00,X) 29 00 AND #$00 25 00 AND $00 35 00 AND $00,X 2D 00 00 AND $0000 3D 00 00 AND $0000,X 39 00 00 AND $0000,Y 32 00 AND ($00) 31 00 AND ($00),Y 21 00 AND ($00,X) 0A ASL 06 00 ASL $00 16 00 ASL $00,X 0E 00 00 ASL $0000 1E 00 00 ASL $0000,X 90 00 BCC $0000 B0 00 BCS $0000 F0 00 BEQ $0000 89 00 BIT #$00 24 00 BIT $00 34 00 BIT $00,X 2C 00 00 BIT $0000 3C 00 00 BIT $0000,X 30 00 BMI $0000 D0 00 BNE $0000 10 00 BPL $0000 80 00 BRA $0000 00 BRK 50 00 BVC $0000 70 00 BVS $0000 18 CLC D8 CLD 58 CLI B8 CLV C9 00 CMP #$00 C5 00 CMP $00 D5 00 CMP $00,X CD 00 00 CMP $0000 DD 00 00 CMP $0000,X D9 00 00 CMP $0000,Y D2 00 CMP ($00) D1 00 CMP ($00),Y C1 00 CMP ($00,X) E0 00 CPX #$00 E4 00 CPX $00 EC 00 00 CPX $0000 C0 00 CPY #$00 C4 00 CPY $00 CC 00 00 CPY $0000 3A DEC C6 00 DEC $00 D6 00 DEC $00,X CE 00 00 DEC $0000 DE 00 00 DEC $0000,X CA DEX 88 DEY 49 00 EOR #$00 45 00 EOR $00 55 00 EOR $00,X 4D 00 00 EOR $0000 5D 00 00 EOR $0000,X 59 00 00 EOR $0000,Y 52 00 EOR ($00) 51 00 EOR ($00),Y 41 00 EOR ($00,X) 1A INC E6 00 INC $00 F6 00 INC $00,X EE 00 00 INC $0000 FE 00 00 INC $0000,X E8 INX C8 INY 4C 00 00 JMP $0000 6C 00 00 JMP ($0000) 7C 00 00 JMP ($0000,X) 20 00 00 JSR $0000 A9 00 LDA #$00 A5 00 LDA $00 B5 00 LDA $00,X AD 00 00 LDA $0000 BD 00 00 LDA $0000,X B9 00 00 LDA $0000,Y B2 00 LDA ($00) B1 00 LDA ($00),Y A1 00 LDA ($00,X) A2 00 LDX #$00 A6 00 LDX $00 B6 00 LDX $00,Y AE 00 00 LDX $0000 BE 00 00 LDX $0000,Y A0 00 LDY #$00 A4 00 LDY $00 B4 00 LDY $00,X AC 00 00 LDY $0000 BC 00 00 LDY $0000,X 4A LSR 46 00 LSR $00 56 00 LSR $00,X 4E 00 00 LSR $0000 5E 00 00 LSR $0000,X EA NOP 09 00 ORA #$00 05 00 ORA $00 15 00 ORA $00,X 0D 00 00 ORA $0000 1D 00 00 ORA $0000,X 19 00 00 ORA $0000,Y 12 00 ORA ($00) 11 00 ORA ($00),Y 01 00 ORA ($00,X) 48 PHA 08 PHP DA PHX 5A PHY 68 PLA 28 PLP FA PLX 7A PLY 2A ROL 26 00 ROL $00 36 00 ROL $00,X 2E 00 00 ROL $0000 3E 00 00 ROL $0000,X 6A ROR 66 00 ROR $00 76 00 ROR $00,X 6E 00 00 ROR $0000 7E 00 00 ROR $0000,X 40 RTI 60 RTS E9 00 SBC #$00 E5 00 SBC $00 F5 00 SBC $00,X ED 00 00 SBC $0000 FD 00 00 SBC $0000,X F9 00 00 SBC $0000,Y F2 00 SBC ($00) F1 00 SBC ($00),Y E1 00 SBC ($00,X) 38 SEC F8 SED 78 SEI 85 00 STA $00 95 00 STA $00,X 8D 00 00 STA $0000 9D 00 00 STA $0000,X 99 00 00 STA $0000,Y 92 00 STA ($00) 91 00 STA ($00),Y 81 00 STA ($00,X) 86 00 STX $00 96 00 STX $00,Y 8E 00 00 STX $0000 84 00 STY $00 94 00 STY $00,X 8C 00 00 STY $0000 64 00 STZ $00 74 00 STZ $00,X 9C 00 00 STZ $0000 9E 00 00 STZ $0000,X AA TAX A8 TAY 14 00 TRB $00 1C 00 00 TRB $0000 04 00 TSB $00 0C 00 00 TSB $0000 BA TSX 8A TXA 9A TXS 98 TYA N ::230,32:49234,0:"-ALARM.PIC":H8192:EH2:GE1:5000:EEH:5000hI017:A:800I,A:}Z,B:ZĹZ,B:20:"WAIT...":L40Z,B:ZĹZH,B:30(L1:49168,0:49232,0:49239,0:49234,0< 2K(49152):0,1:800:J1222::K12850:49168,0:200:200:100:200:49236,0:E16384:H24576 3G32767:5000:J14:400:I1(1)333:::H8192:EH2:GE1:5000:49168,0::15 d49236,0:300 49237,0 ,I1333:: 49237,0:0,255:800:49236,0:) 173,48,192,136,208,4,198,,240,7,202,208,246,166,,208,239,96 16691,1,16693,15,16694,120,17715,1,17717,15,17718,120,18739,1,18741,15,18742,120,19763,1,19765,15,19766,120,20787,7,20789,31,20790,120,22707,7,22709,30,22710,120,23731,1,23733,15,23734,120,, 16472,126,16474,7,16475,,16476,,16477,,16478,,16479,126,16480,127,16600,99,16602,3,16603,,16604,,16605,,16606,,16607,124,16608,15,16729,99,16730,63,16734,95,16735,15,16858,63T 16859,112,16861,127,16862,96,17331,3,17332,,17333,,17334,124,17335,127,17496,118,17498,7,17499,,17500,,17501,,17502,,17503,124,17504,127,17624,7,17626,7,17627,,17628,,17629, 17630,,17631,124,17632,3,17753,7,17754,63,17755,126,17759,67,17883,65,17885,15,17886,112,18355,1,18356,,18357,,18358,112,18359,127,18519,62,18520,120,18522,3,18523,,18524,16,18525, 18526,,18527,124,18528,63,18529,8,18648,7,18649,126,18650,7,18651,,18652,,18653,1,18654,48,18655,126,18656,99,18777,15,18779,120,18782,119,18783,65,18907,15,18908,96,18909,1,19378,6319379,64,19380,,19382,64,19383,127,19544,120,19545,127,19546,3,19547,,19548,,19549,,19550,,19551,124,19552,63,19553,24,19672,15,19673,124,19674,39,19675,8,19676,,19677,,19678,63?19679,126,19680,113,19801,31,19802,126,19803,123,19805,123,19806,89,19807,96,19932,1,19933,72,20402,31,20403,,20405,,20406,64,20407,127,20568,120,20569,127,20570,3,20571,,20572,,20573,20574,,20575,124,20576,31,20577,60,20696,63,20697,120,20698,15,20699,,20700,68,20701,96,20702,63,20703,126,20704,112,20826,120,20827,115,20829,127,20830,56,20831,120,21302,127,21426,31,21428,21429,,21430,,21431,127,21592,97,21593,127,21594,3,21595,,21596,,21597,,21598,,21599,124,21600,31,21601,124,21721,120,21722,15,21723,8,21725,124,21726,31,21727,127,21728,116,21850,96w21851,7,21852,126,21853,31,21854,14,21855,124,22326,127,22447,95,22451,,22452,,22453,,22454,1,22455,124,22616,65,22617,127,22618,3,22619,,22620,,22621,,22622,,22623,124,22624,31322625,126,22745,121,22746,95,22748,13,22749,126,22750,31,22751,63,22752,100,22874,1,22876,56,22877,67,22878,15,23347,63,23348,,23349,96,23350,127,23474,15,23475,,23476,,23477,,23478,23479,126,23640,115,23641,127,23642,3,23643,,23644,,23645,,23646,,23647,124,23648,15,23649,126,23769,113,23770,31,23772,95,23773,126,23774,31,23775,31,23776,14,23898,15,23899,124,23900,3q23901,125,23902,67,24371,7,24372,64,24373,,24374,124,24375,127,24496,121,24498,7,24499,,24500,,24501,,24502,,24503,126,,NH:C60:5020:NG:C62:5020:NE:C66:5020:768,160:769,0:770,76:771,44:772,254:768:C,N(N256)256:C1,(N256)::(21)::49234,0:(4)"-WAGGER.PIC":60,0:61,32:62,255:63,63:66,0:67,64:768,160:769,0:770,76:771,44:772,254:768N 8586,31,8588,121,8589,127,8715,127,8716,119,8717,123,8841,63,8842,127,8844,111,8845,123,8969,47,8970,127,8972,63,8973,127,9097,7,9101,125,9610,95,9611,127,9612,123,9613,127,9739,127:B,A:BĹB,A:9 9740,119,9741,123,9865,31,9866,127,9868,79,9869,127,9993,47,9994,127,9996,63,9997,126,10121,71,10125,125,10507,7,10508,126,10509,127,10635,127,10636,123,10637,119,10762,126,10763,127,10764,119:49168,0 !10765,123,10889,95,10890,127,10892,95,10893,127,11017,47,11021,126,11149,125,11531,113,11532,124,11533,127,11659,127,11660,123,11661,119,11786,126,11788,119,11789,123,11913,95,11914,127,11916,95,11917,127 "12041,7,12045,126,12173,117,12555,124,12556,125,12557,127,12683,127,12684,123,12685,119,12810,126,12811,127,12812,119,12813,123,12937,95,12938,127,12940,95,12941,127,13065,23,13069,126,13193,79,13197,113 #13579,126,13580,121,13581,127,13707,127,13708,123,13709,115,13833,63,13834,14,13835,127,13836,102,13837,123,13961,79,13962,127,13964,31,13965,127,14089,23,14093,126,14602,63,14603,126,14604,123,14605,127` $14731,127,14732,123,14733,123,14857,63,14858,63,14859,0,14861,123,14985,111,14986,127,14988,63,14989,127,15113,23,15117,126,15245,103,15626,63,15629,127,15755,127,15756,115,15757,123,15881,63,15882,127 %15884,79,15885,123,16009,111,16010,127,16012,63,16013,127,16137,23,16141,124,0,0:49237,0:I150::49236,0:I150::(49152)12837::49168,0`@2x~O8|OG~@wg&Lxc BgG1>~~{O{gw?o`gx`p?o]?`~~>_?~zn{~~{~m_{~6~Oqw{o?|O{| OCxocG?|?|GqCooCC+C{w?_[;{wv;C+{C?~?~cxA|os_{q1< xq1< cccGGqs?dGOq1< ccxGGq@o~xcw~|s~ Ow~s=X}~@xGGg~y#pGpgx~=OCGs1OGvo?{~~8t}o~sgxc gG1>Dc?L||~???mr}?x|#Ao}OcGA1 c`'wA^@{Oyx{Oyx}AyGO?||_gOgG?|~{G{Os?o}gxDp?o];n~~>_;~vn{~n{~m_{~wv~?~Gygg_~O{xNCxxccG?|?|Gq{Wok{;{{w?_[;{vk;{pc~?~?~?~c|?~gsO{q1< xq1< cccGGp?dG@1< ccxGGqxo?`ycW~}s~`gwGsp~cGGG~y3xq~ |gAF}n6{ovm>o_m6{?gvxq|~q}g?4 ~ScxcFG1< c?b}sp??5 xCCl |q#}ozObFA1 c?x/w@^@{O|qg{O}||_cGG?~?~O?oOgq}~{W{_{?f}sx?o Gn~~0pG~nq{`q{`p|~wv~?pGxog`?xO{0 CxxccG?|?|Gq{;o[{;{{w?_[;{wv;[;C~?~~?~cqws/xq1< xq1< cccGGp?DG@1< ccxGGq~o`ccGyyq~yxcwqC$%X ~G~CAG~?P|y3? |gv}NcGa67g?Wv|acy?@Cow?~ScxcxFG1< c1|?@8~Gr?~5AAbOysc}o?wOfxFC1 w?|w@A{O~sg{y~\_GGgO?~?~o?~`O'|~|~{G{Ost}?w@|Oqo?pO{q0 GxccG?|?|Gq;o;;Cw?8<|w;;;{|?x~cqOssgyq1< xq1< cccGGq?GG1< ccxGG{`Os@Gc||y!~c~y|x~C$ H~q?p?~cpO?>G}y3|@`gF}~6_ovm6o_m6_?7v?pbasp^@??|SgcxFF14 c}x|p/|x?plnAGsggao?wOlxFC1 |ywC>cy~ggx{yx`_gcl G{pp>pGppq``q``p\{_w~O?~?g|owOG~~{O{oGxq?|gb|_xBg?qO{q1< GH'<<x|#pO?}ys~g~=OcGm9 nNcv{Gg@pgwq@@psgcxFF14 c?R|O?~y1`]Hyt?&pwwG}o?pOqxxFG1< c~Dg?>~|g~{yC~xNO~Gc?o];unn>_;nnn{~n{~m_[{/w~O?wywoGG~{O{o~|o;C;{]??\|_woC;{`~_G~x~sqO{q1< cH#8<D#p F`Cx? bq1BbDq?C??~?|c@Gx|7@}0 H!0 cc#FGAp?B0 bxDq~~?|OCxGy#?x~g`#B@BR~cy|}yys |g~}xpE|Ou`~CAc~gcxFD1$ cH|o?>~{@OyOy~~{gG~}o?wOsyxFG1<c~b~O?~OGAq?@{Oyc|/|r^o?|Gc?p?o]{nnn>_{nnn{~~{~m_;}wf~?s{wop?~yO{o}{;o;{{{]?_[;{/wW;{#?~_~y_qO{q1< x!0< #`cG@Ap?Bq1 bGq@p~C~?|cq~~~x}xI#x Dcc'FGCp?B8BbxDqC~?|?|OC?y#?p_GgRH@qs}{y3g~~?|_q?x?`~~p~#~ocxGD1$ cG)|o>q{G@~G}{OyA{y?|~A 67OsyxFG1<<c?z|OqG'|~{Oywqg?fNo?|g8|p?\Gnpp>x_Gppn{p~{pm|~wV~ssso?}O{o{Wo;{+{{k?_[;{wv;;+{~?~x|_}OsO{q1< xa0< cacGCaq?DGq1 CcxGGq~~?~cG~|c>p~G|| K'|1p_g~sO{~Gx&L`c|~{|gxO|wy_1yO|G{w_L/~??|xa/|}?rsyd;l~|yWcrsO_CxGw?xF>|ox?~so|~O?c|ks?|sw?^ ;~}_ {No?~{s{q_{<LyGssL{gsK}_cfHv?~}u{?{?~w?|? ?|pO_y_xosw?xoOxssg~os'xw~=OCGs1OGv?<~?py}|;~`?_;|OCs`o~{{>{Y_oOs?pq{9f9>}rG7h~?`4wxxgwo{[c~Oxk\_?v< r~?t}{\{{y?~w!||x0@_F{loOyw~?|og~xDxsp/~|oyqwF}n6{ovm>o_m6{?gv?gy} ?xcs_}_^|?`p}OqOy@|{?oLy3~{}?vs|wctxT~{?o~_{~N{M_cgwD8s|;q|xg3`|2wsuoyx~ ~{N?sqDy|Gw|{Ayx}?|wCa~xOpsf@{oGXwC?yos_?0~ycsGyll}qxwv}NcGa67g?Wv?~0`{yc?|?GxGcy_O@Ow?~xxog?|Gcy| {?~?f|?{}?:fy}G|}wK}#@x{ |?g~o{Dx`|~W9`_saWwxv?|?s_O{g|g?~w__{qw?x{O??0F?p}`7|?=^G=?oo{w|nO|g|>{-_xcwp0g O|D~|s3 }0Gw?pxqo}{?~a;f??ygq|y^3|?xz||wx~~Cc|CGg?xgs/~oLwq?~sgx?A ?|yys,b?4xwF}~6_ovm6o_m6_?7v?@wOO@{s;~3~sx}_okg8gqN?}z}J|Sbqw?qqr~}?w~?cs?pCO}Do~|9f_xcG~{~?pGc{O_g{s~s_?~w_O{y_w1~~{gLp>0@?|G|Og}??{~%vkg|Oc'~r|{y3`wx~yo}{{3s}?~}O~{?D=|Oswo?w?y}G~Bw_~gxg?|`}O>nYap?xw;~~?dSOw{K|~?w~?p}w?|ag|]gw~Y g_?|xAGp|~q_{{g_w{y~yO?~s/_g{m_qg|g~yw`_xagf`yq~??>ax_cgyss?fs<{?~5_qiOH_?xO~yPo{r}w|xg}{sGw{|~_}@saOyxxwq~9?p|||_b|?robw?~gwO?sOO=ga n_~w||~}yW|~{gD?F?~Pw{?g`{wo?f?||@wG|~OO30} Gx \|s~C|`ocg{c~Gpq?x?so0|w?~q1~]gc~dHCO~G`cq}_{ys_w{~~|o?~{'_qxe|o{aOq?|?|O8tqr^Bcs`'~?<|?|O?`kw}yG?pw={{_|m@hc?|o}B~c{7y|w|w|{wqg9~~_mwc}Gwgg?~G O>~|_(~moqw|OwgOyggO_A_Og|{x@q~q {m|n L kzxyLyz}~L{|`sptq umvn Lww`pqmpmqmmrȱȱ`mnmmmnmm oȱȱ`{m|n Lpq  k`{p|q Ά΅mn L k`L) L+) LB i i rVoZllllo=rAl LL kLJkLJ$  kLJkLJ kLJkLJ`bcbpcq bmcnmnm L kL.fbdcededdmen LIJ׊בdede0dmen L kdmenmn LfbcbcLU`fˠ٠