' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `\\`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?  1 '&&*  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0(#*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  LӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pBZ\  յյ\BIR Z-^ Jp\IZLL-(Q p\ Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(` d£֠Ԡ\ˣ٠Ơ͠z# \u`)"RENA"ĺA$:20:8:(R$,30):A$A$","(R$,30)I(A$,4)"RENA"ĺA$bD$;A$;",S";S;",D";Dx(A$,1)"B"1350(A$,4)"LOCK"L$(JPLK)"*"(A$,4)"UNLO"L$(JPLK)" "(A$,4)"DELE"N$(JPLK)"1":FF(S$(JPLK)):730 (CATE NAME";::1030LZ1VA$"DELETE"1140`19:1:868:"PRESS 'D' TO DELETE FILE ";K$:"OR ANY OTHER KEY TO CANCEL.";jR$:R$"D"810t(A$"RUN"A$"LOAD")T$(JPLK)"B"A$"B"A$~A$A$" "N$(JPLK)19:1:9580(A$,410319:1:868:"RENAME ";K$;:RR$:RR$""810w(RR$)65(RR$)90Ģ20:1:868::B$;"INVALID NAME";::1030R$""$I1(RR$).R$R$(((RR$,I,1))128):I8R$R$(BL$,30(R$))BZ1L%PL:N$(Z)R$Ģ20:1:868::B$;"DUPLI10KK16:(JPLK)C8105N$(JPLK)"1"810(A$"RUN"A$"LOAD")T$(JPLK)"T"Ģ19:1:868::B$;"FILE ";K$;" IS TEXT"::820(A$"DELETE"A$"RENAME")L$(JPLK)"*"Ģ19:1:868::B$;"FILE ";K$;" LOCKED"::820A$"RENAME"11(K):KK176:K0K9970'fK013409pK6K71260JzK8K9340n"PRESS 'LETTER' YOU WISH TO ";K1A$"LOAD"K2A$"LOCK"K3A$"UNLOCK"K4A$"DELETE":K5A$"RENAME"A$;::K$:K(K$)48K17K318(TI);" ";::" DELETED FILE":}N$(JPLI)"1"ĺ(TI);" ";L$(JPLI);T$(JPLI);" ";S$(JPLI);" ";N$(JPLI) I*19:1:9584A$"RUN":21:1:M1$:M2$:M3$:M4$;>K(16384)HK128830R16368,0:19:1:958\K$1V$((VOL))*(V$)1V$"00"V$A(V$)2V$"0"V$aF$(F):(F$)1F$"00"F$x(F$)2F$"0"F$:2:"SL:";S;" DR:";D;" VOL:";V$;" FREE:";F$;" PAGE ";P;" OF ";L%:JP1I1PL(JPLI)C810( N$(JPLI)"1"(Z)$N(S$(C))1S$(C)"00"S$(C)DX(S$(C))2S$(C)"0"S$(C)rbZ(Y2):L$(C)" ":Z4L$(C)"*":ZZ128lZ0T$(C)"T"vZ1T$(C)"I"Z2T$(C)"A"Z4T$(C)"B"N$(C)(INP$,ZZ,30)YXL%CPL:CL%PLL%L% OR ENTER DRIVE #";:I$:I$(13)490KI$"1"I$"2"Ģ5:1:958:440[I$:D(I$)eCD,DtX1511SEC,X:768ZZ34YF1F735ZZZZ35Z(Y33):Z0690&CC10(Y)255N$(C)"1":670:FFZDS$(C)";S;",DRIVE:";D:"AND PRESS RETURN.":R$:490G "CURRENT SLOT IS ";S "PRESS RETURN OR ENTER SLOT #";:I$:I$(13)ĺ:440 I$"0"I$"7"Ģ3:1:370 I$:S(I$) OS,(CS):OD,(CD):CS,S16 :"CURRENT DRIVE IS ";D%"PRESS RETURN"2=LOCK 5=RENAME 8=NEW DISK"Z 6M4$"3=UNLOCK 6=PAGE AHEAD 9=RESET DRIVE} @S(18455)16:D(18454):K0 JCS,S16:CD,D TTRK,17 ^F496:P1:C0 h::13:" CATSUP RUNNING": rK0490- |K8ĺ"INSERT NEW DISK IN SLOT:):B$(7) IOB777:T64:PL15< RB27136: READ BUFFERf CSIOB1:CDIOB2:TRKIOB4:SECIOB5 VOLIOB14:OSIOB15:ODIOB16:F1RB11:F7RB221 M1$"TYPE ' LETTER' TO RUN, OR 0=EXIT" "M2$"1=LOAD 4=DELETE 7=PAGE BACK"( ,M3$S CONTROL ROUTINE & IOB AT $300 TO $319v 169,3,160,9,32,217,3,96,0,1,96,1,0,17,15,251,183,0,150,0,0,1,0,254,96,1 I768793 X:I,X I BL$"" I140 BL$BL$(160):I N$(105),S$(105),T$(105),L$(105) 1290 D$(4CRO-SPARC INC **> F ** LINCOLN, MA 01773 **f P ******************************** Z LOAD ADDRESS OF FIRST FILE NAME IN READ BUFFER IN INP$ POINTER dINP$"" nVS(106)256(105) xVS2,240:VS3,14:VS4,150' LOAD RWT+( FROM NIBBLE VOL 2, NO.7, PAGE 75O ********************************w ** CATSUP ** ** CATALOG SUPPORT **( ** UTILITY PROGRAM **2 ** COPYRIGHT (C) 1981 ** < ** BY MI     24:J:(N$,J,1);9Q14:S(U):Q:Q115:::20:} " FINAL SCORE: ";H$;" TO ";Z$;"...";:21:1:A$:A$:63900* SET PARAMETERS >H$"WOWZO"HN1$"PLAYER 1":N2$"PLAYER 2"RZ$"ABCEFGHIJKLOPRSTUXYZ":QQ16368:U16336\I1(I2)20Ĺ16304,0(I(I4)40ĉB270:P2414I:21:3s21:1:" ";N$;" ":" WINS THE GAME! "I542030J1500:280:IN$"*** FINAL SCORE: ":N$N$H$:N$N$" TO "N$N$Z$:N$N$". ***":2060 J1(N$):24:" ";=A01950aI15:S2(I)1Z$Z$(H$,I,1)nI:1960I15:S1(I)1Z$Z$(H$,I,1)IZ$""Z$"NOTHING"I103621:1:" ":22:1:" "IAAA:5:"***"0:V:H:" ":V1:H:" "9250\&2AA:5:P$:2AAA:5:"***"k019:":::"u:QQ,0DI1300:INAA01880PV12:H15:300XV22:H25:300b FINAL SCORE lZ$"":QQ,0/v23:1:" ": TURN--GO AGAIN! ";#I1333:IP19:12:": : : : : : : :"\:1310r BACK TO START x21:" TIME ZUP!! ":" #$%&! *%#*$%@! "19:":O:":V:H:"BYE":V1:H:"BYE"I1333:I2AA:5:P$:2*":VAA:H:P$!J ADD SCORE /TA01660R^S1(X)S1(X)1:S1(X)1S1(X)1lhI15:STSTS1(I):I{rST51890tST0:1690|S2(X)S2(X)1:S2(X)1S2(X)1I15:STSTS2(I):IST51890ST0MG0:BO1:24:" BONUS1530"I110:NL(I)XI1530)IK(V(N)1V1)(T(N)1T1)1530m"(V(N)1V2)(T(N)1T2)1530,V(N)1:T(N)1:"=";(H$,X,1);"=":V(N)2:T(N)1:"---":6V(N)1:T(N)1:"=";(H$,X,1);"=":V(N)2:T(N)1:"---"@VAAA:H:"** I3ĉ8:V:H:"GOT":H:"IT!":I1555:i19:12:" ONE '";(H$,X,1);"' FOR ";N$;"! "22AA:172X:" ";(H$,X,1);" ":I1150:IL(X)((1)20)1:NL(X)(V(N)1V1T(N)1H1)(V(N)1V2T(N)1H2)(V(N)1VT(N)1H) ":xI1444:6C1:I((1)20)1:B1I1?640MI199:iI((1)20)1:640:C021:1:" ":" "QQ,0:300 REPLACE LETTER :V:H:"GOT":H:"IT!"I15:"";:I1Ĺ16304,0H1,(2V)3)213101040(QQ,06(A01330J*V1V:H1H:1340X2V2V:H2Hf<MG2470}F COMPUTER GATES PV1:H1:(N1$,3):V21:H2:(N2$,3)Z23:1:" "_:dn21:1:" COMPUTER MOVES ":" 2 GATES.*" LAND ON LETTER? CX15:VV(L(X))1HT(L(X))11460I[ HIT WALL? lK1721280H2,(2V)1)213101020K1741290H2,(2V)1)213101020 K1931300 H1,(2V)3)2131010204$tF:HIM:P$:G:HIM:"***":~J13:S(U)::EI04mF:HIM:" ":G:HIM:" ":yHH4MVAA:H:P$:VAAA:H:"***"A01230V21:H2:(N2$,3):V2:H2:"***"1240V1:H1:(N1$,3):V11:H1:"** MOVE MAN 'M1:K174K218M1MFVAA:GVAAA:K174K1721120U `$I03.FMI:H:P$:GMI:H:"***"8J14:S(U)::BI03LFMI:H:" ":GMI:H:" ":VVV3M:1190` HORIZONTAL MOVE jI03:SS218:EE174:WW1720H2,(2V)1)2WW1JH2,(2V)1)2EE1dH1,(2V)3)2NN1~H1,(2V)3)2SS1(K172KWW)(K174KEE)(K193KNN)(K218KSS)1020:24:" WRONG,WRONG,WRONG ";250:QQ,0:860 1:N$;"'S TURN:")R"WHICH DIRECTION?"c\K(Q):K172K136K174K149K193K218870l^910f23:1:" --------- "pI155:zTT1:T(TTT)TT0İ90860 LEGAL MOVE? K136K172K149K174NN19T(I):" "@R(I)0:V(I):T(I)3:" ";:T(I)1:" "VPN3N4:280:\gC1ıv MG21350 ASK DIRECTION  BO1820*24:1:" ";4T0:TX0:MGMG1:180>VAA:H:P$H16368,0:21:0PNN3:280:%R(I)17200R(I)1[V(I):T(I)3:" ";:T(I)1:" ":V(I)2:T(I):" ":V(I)1:T(I):" ":V(I)1:T(I):" ":V(I)2:T(I):" ":750 V(I)2:T(I):" ":V(I)1:T(I):" ":V(I)1:T(I):" ":V(I)2:1365602 :24:1:" I SAID, 'WHICH GATE?' ";C &250:QQ,0:b 023:1:" ---- "p :I155: DTT1:T(TTT)TT0İ90 N530 X LEGAL GATE? bI1(Z$) lK((Z$,I,1))128640 v:540  MOVE GATE NI105R DIRECTION? & I((1)3):I2790>  ASK WHICH GATE? X T0:TX0:MGMG1:180f BO1510 24:" "; 21:1:N$;"'S TURN:" "WHICH GATE? " K(Q):K193K206540 600 K172K174K149K(N1$,3):N$N1$:VV1:HH1:A0380D rP$(N2$,3):N$N2$:VV2:HH2T |I2123:Il " "r  " "; A0440 23:30:"<":12:29,42:7:29,43:450 22:30:"<":12:29,44:7:29,45  GATE O88:S(U)::! P((1)50)1* 0,P: "1,9:771:Q , CHANGE PLAYERS u 6V11:H1:"***":V2:H2:"***" @V1:H1:(N1$,3):V21:H2:(N2$,3) JMG0:BO0:BB1 T:19:4:((B1)2): ^AA1:AAA:AA1AA0 _: `GM0# hP$VAA:H:P$ VV1VV2170C VAA:H:P$:VAAA:H:"***"S TX181740Y :_ s RESET TIMER I1811 I1:2:" ":I:2:" " :I1:2:(18I)((18I)10)10 J13:S(U):: : NOISES  I1;$e2============== WOWZO! BY BERT KERSEY COPYRIGHT 1980 BEAGLE BROS ============== xF32000:63900P16298,0:2110Z TIMER d23:7:" "nI11:S(U):xTXTX1:TX:2:" ":VAA:H:" "I155:           M> MENU":" CONTINUE THIS GAME":" QUIT":5:"------------------":" SELECT:";:A$:A$:A$"Q"Ā"A$"M"Ĺ768,4:(4);"RUN SHORT MENU""A$"C"Ĭ"63900I,LE ! 771! i!}I771789:J:I,J::173,48,192,136,208,4,198,1,240,8,202,208,246,166,0,76,3,3,96!A1(150),A2(150),A3(150),C1(26),C2(26):U16336:QQ16368:FL1:255:Q16384:!:::10:5:"BEAGLE BAG":5:"------------------"i"12:"<(P)99:A2(P)99' VV:TT1::"***";I PI((1)200)10:LE20:3000X I1250:h LE12:3000~ :TT1:" ";: LE80:3000::TT1:"***";:A1(P)98:A2(P)98:J1250:::TT1:":::" 34,19: MUSIC FLAGı 0,PI! 10:K155639005FLAG1:S10:S20:E0:34,0::1012] COMPUTER BLOCKS --------------- 24:10:"HIT ";::" Z ";::" TO END GAME."34,0:J13V((1)8)1:T((1)9)1:VV2V1:TTT4:P10(T3)VA1(P)98A2(P)982010 A1"N2$" BEATS "N1$"!!"9S2S1A$A$" IT'S A TIE. "o:I1(A$):(A$,I,1);:LE30:PII5:FLAGİ3000:LE200:FLAGİ3000QQ,0:::"HIT ANY KEY TO REPLAY, OR ESC TO QUIT.";:5::"ANY KEY";:27:"ESC";:K(Q):K1361936QQ, ]FLAGı_I19DbS(U)(U)(U)(U)(U)(U)(U):IJgWlFLAGıjnI120:J12zqS(U):J,Iv{ END GAME --------21:1:958:22:A$" GAME OVER! "S1S2A$A$" "N1$" BEATS "N2$"!!"S2S1A$A$" ";:9+:21:"THANKS ";N1$;" AND ";N2$;". STAND BY..."Z0 CHANGE TURNS ------------d5AA1{:A(A2)201865?TURN1:N$N1$DI0150:A3(I)A1(I):I:1875ITURN2:N$N2$NI0130:A3(I)A2(I):IS50,255:X NOISES ------8101830:1:1795(:I1500:I3000:21:"PLAYER 2: <--TYPE YOUR NAME AND -------- PRESS 'RETURN' KEY.":300021:10:"";N2$!XT(N2$):XT9XT01835#1830:1:1815&24:" (8 LETTERS OR LESS, PLEASE)0A$" : A : B : C : D : E : F : G : H : I :"I1:1:A$:19:1:A$aLE100:PI100:3000v34,19:50,255:21:"PLAYER 1: <--TYPE YOUR NAME AND -------- PRESS 'RETURN' KEY."21:10:"";N1$ XT(N1$):XT9XT01"!":FLAGS(U)Y,X7:10:"T R 1 P L E":7:" ":10:"D 1 G 1 T S"13:10:"(C) 198O, BEAGLE BROS."50,63A$" 1 2 3 4 5 6 7 8 "X119:X:1:(A$,X,1);:39:(A$,X,1):X0:P1P2P1P3PTP16P2P1P2P3PTP2OP3P1P3P2PTP3Uv BOARD SET-UP ------------I0150:A1(I)99:A2(I)99:IA$"+---+---+---+---+---+---+---+---+---+"X2182:X:2:A$:XX3182:Y2384:X:Y|1475P10:P20:P30\X1A3(P2TS):X2A3(PTS):X3A3(P):X4A3(PTS):X5A3(P2TS)pX19X291685P1X310X2100X1X29X491695P2X410X3100X2X49X591705P3X510X4100X3P10P20P301710PT$E50,63:"-";N;"-":50,255:16153J"[";N;"]"DO34,19::24UTTURN21625hVS1S1ST:1630uYS2S2ST^50,255:c COMPUTE SCORES --------------hTS10:1665:SHPTmTS1:1665:SVPTrTS9:1665:SDPTwTS11:1665:SUPTSD0İ1580@" \\ DIAGONAL = ";SU;:23:"! FOR ";N$;"."P"SU0İ1580Z'1585l,FLAGĺ"";r.}150,636" (PRESS ";::"RETURN";::" KEY TO CONTINUE.) ";;K(Q):K1411595=50,255@34,0:VV:TT1:TURN216109:24!1845::50,255::1165B PRINT SCORES ------------L:24{" HORIZONTAL = ";SH;:23:"! TOTAL=";STSH0İ1580 " VERTICAL = ";SV;:23:"! ------------"SV0İ1580" // DIAGONAL = ";SD;:23:"! ";ST;" POINTS"1165# ANY SCORE? ----------<STSHSVSUSD:EE1KST01530U24:c1:50,63"-------------- NO SCORE ---------------"190050,255VV:TT1:TURN2151050,63:"-";N;"-":50,255:1515"[";N;"]"34,150,63:N1450#A2(P)A3(P)<I113:NC2(I)ĂIIC2(I)99XI141440yFLAGāI180:S(U)(U):ICK1:34,19:24:1:1190:CK0:34,0:1340:N50,255:34,19188534,19:50,255163524:184510254F" ^ WHICH NUMBER ^ DO YOU PLAY (0-9)?";QKK(Q):K176K1861345ePNK176:QQ,0:qUA3(P)NZ34,0:VV:TT_"*";:TTd1885iTURN21415nA1(P)A3(P)sI113:NC1(I)ĂIuC1(I)99xI141405z1430 }177K18412851885.20:XT1:" "@VK176:QQ,0i#P10(T3)V:A1(P)99A2(P)991325o%(FLAGāI180:S(U)(U):I*1166-VV2V12:VV:TT1:" ? ":7 WHICH NUMBER? -------------<34,19:24A24:34:8:116018858I1(A$):K((A$,I,1))128ĂIAXTIR20:1:868w20:XT1:50,127:"^^^":50,255TK192:TT4T VERTICAL POSITION -----------------24:34:1025 24:14:" VERTICAL POSITION (1-8)?";K(Q):K----------24:34:1025W10(N$):N$;"->";:14:"HORIZONTAL POSITION (A-I)?";K(Q):K193(K201K("Z")128)1240QQ,0:K("Z")128125524:1:958:"Z PRESSED. QUIT GAME NOW? (Y/N):";:AA$:A$;:AA$"Y"191524:1:9591210 C1(I);:1215+ C2(I)91210= C2(I);:1215g FLAGāJ12:S(U)(U)(U)(U):Jw "/";:1220 FLAGāJ19:S(U):J " ";:I "---------------------------------------" CK1ı  HORIZONTAL POSITION ---------ART TURN ----------" 34,19:242 E26İ2000K 24:1::"SCORE: ";\ 8:N1$;" ";t 50,63:"-";S1;"-"; :", ";N2$;" ";"[";S2;"]" E261915 "---------------------------------------" " ";:I113 TURN21205 C1(I)-+---+---+":3000n G7:10:"! ! ! ! ! !"::3000:10:"! ! ! ! ! ! ":PI50:LE200:3000 L34,0:J125 QV((1)8)1:T((1)9)1:VV2V1:TTT4:P10(T3)V VVV:TT1:":::":A1(P)98:A2(P)98:PIP:LE5:3000:  STI175:I! " ";:24:10 I175:I6 K  VALUES ------a $I113:C1(I)I4v )C1(I)0C1(I)0 .C2(I)C1(I):I 3A((1)2): =1725:1845 B13:10:"! ! ! ! ! ! ":LE50:PI200:3000:8:6:"+---+---+---+---+--0:7! I1(A$)::I1I17ğT (A$,I,1);:LE3:PI((1)200)10:I16İ3000p :11:7:"^";:23:"^" K(Q):K("M")128K("S")1281019 QQ,0:FLAG(K("M")128) :10:16:"STAND BY." : 1060  FLASHER ------- mJ============== TR1PLE D1G1TS BY BERT KERSEY COPYRIGHT 1980 BEAGLE BROS ============== 32000:63900FLAG1:::6:13:": :":13:" TR1PLE D1G1TS ":13:": :" A$"MUSICAL GAME OR SILENT GAME?":1          STSB Y@CKPGTH PH@80( Z``~}]H  (ɠe ީh`rVI`XA@QZQ/DIMAJS4WX/WARBMR`MS1S2S3S4S5FFRA VISTA SAN DIEGO 921038 ----------------- PROGRAM BY BERT KERSEY -----------------THH (    i0( i0(ȩ:(ȥi0(ȥi0(hIGHT";:50,255:" 1982":"BERT KERSEY":h7"BEAGLE BROS ":"4315 SIERRA VISTA":"SAN DIEGO, CA 92103"7::"(HIT ANY KEY TO START.)"7(Q)136327757Q16,0::936:"8 COPYRIGHT 1980 BEAGLE BROS. 4315 SIER163846ZQUR17516 ...`Q-ZQUR = -16559 ...k6DIGIT(ZQUR)((ZQURZ)256((ZQURZ)127))256631}6:936:32,96"]":66"-----------------":50,636" TEXTTRAIN ":50,2556"-----------------":32772(7:50,127:"COPYR}Z1:IZ:KZ:O6:P7:CL183:SP309:26665}================================ WARNING: DO NOT ALTER COPYRIGHT LINES! PROGRAM WILL BOMB IF YOU DO! ================================5T(12),V(12),TX(12),VX(12):T(0)Z:V(0)Z6Q16336QQ48):I:2300F4j :::10:5:"BEAGLE BAG":5:"------------------"4k 12:" MENU":" CONTINUE THIS GAME":" QUIT":5:"------------------":" SELECT:";:A$:A$:A$"Q"Ā4l A$"M"Ĺ768,5:(4);"RUN SHORT MENU"4m A$"C"Ĭ4 2666*5Z):24603 WW$WW$(W$,J,Z)%3 IE3 A((Z)5)3:B((Z)5)5]3 MR32767:255:13503 16:958::" NOTICE: RAILROAD REGULATIONS PROHIBIT THE USE OF WORDS CONTAINING A 'P'. "4 :" '";W$;"' HAS BEEN DISQUALIFIED. ":IZ66:S(Z5:S(Q48):J,I:22:868>28 X$"":WW$"":W$(W$,(W$)2)M2B IZ(W$)c2L T(I)((Z)18)Z2V JZI:T(J)T(I)JI23802` J,I2j R$"ABCDEFGHIJKLMNOQRSTUVWXYZ"2t IZ182~ JZ(W$):T(J)I24502 3 X((Z)25)Z:WW$WW$(R$,X,W$"*+"23001 (W$)112300)1" X0:L1. IZ(W$):(W$,I,Z)"P"2490R1/ p10 R$W$:22:" "11 24:Z:868:IZ24:I:Z12 22:J16I:JZJZ13 J:(R$)Z235714 " ":235915 I15R$(R$,(R$)Z)16 :R$;::" "27 J(Q):22:18I:K1412334*0 K1362326U0 :" ":IIZ:(W$)2W$(W$,(W$)Z)g0 Q16,0:2314}0 K193K21823180 Q16,0:(G$,K192,Z):IIZ:W$W$(G$,K192,Z)0 I1023140 Q16,0 1 Q16,0::22:18I:" ";:27:" ":-------------+"I/ "TYPE A WORD: ";::"*+";::" +"m/ "---------------------------+"/ "BEGINNERS:3 LETTERS / EXPERTS 9 MAXIMUM";/ W$"*+":G$"ABCDEFGHIJKLMNOPQRSTUVWXYZ":I0/ I0I0/ 0:17I,42:6:17I,43:0 KON.":."THE OBJECT OF TEXTTRAIN IS TO USE THE FORWARD,REVERSE,SWITCH & COUPLE COMMANDSTO ASSEMBLE YOUR TRAIN AND DRIVE IT TO".:17:Z:"F";:9:"R";:17:"S";:26:"C"::19."THE CHECK STATION AS FAST AS POSSIBLE."/21:"--------------;::"*+";::(34);" IS THE ENGINE,":"AND ";K-IZ(A$):I(A$)2282k-:(A$,I,Z);::" ";:2285-"& ";::(A$,I,Z);:-JZ9:S(Q48):J,I:" ARE THE CARS.":."THE WORD YOU TYPE BELOW WILL DETERMINE THE TRAIN'S FINAL CONFIGURATIZ3:V(Q48):T:TZ33:T,I:IZ222:I::,A$"LOUIE"F,5:Z:,"A TRAIN IS REPRESENTED BY A STRING OF LETTERS. FOR EXAMPLE, THIS IS A TRAIN:":,CALL DIGIT: REM FOR X = 1 TO 99: NEXT ,13::"*+";A$.-::(34)CEL CREDITS.)+|CZ2240F+A$" BEAGLE BROS ":J25:K2:XZ:2250m+:2:32:" TRAIN ":IZ500:I:+A$" TEXT^":J2:K26:XZ:2250+2:33:"*"+A$" TEXTTRAIN ":J27:K2:XZ:2250:2266+IJKX:2:I:" ";::A$;::" ";+,T*HIZ3:S(Q48)(Q48):I:8*R=== START GAME ===G*\::2666x*f"----------------------------------------";~*p*z"----------------------------------------" +{ INVERSE : VTAB 2: PRINT " TEXTTRAIN ": GOTO 2266: REM(REMOVE 1ST REM TO CANF$"O"ĺ"OIL"$)/F$"Q"ĺ"QUARTZ"9)0F$"R"ĺ"RAILS"M)1F$"P"ĺ"PIGS"b)4F$"S"ĺ"SHEEP"x)5F$"T"ĺ"TRUCKS")6F$"U"ĺ"URANIUM")7F$"V"ĺ"VIOLINS")8F$"W"ĺ"WEENIES")9F$"Y"ĺ"YOYOS"):F$"Z"ĺ"ZEBRAS");F$"X"ĺ"X-RAYS" (F$"C"ĺ"CATTLE"*(F$"D"ĺ"DOGS">(F$"E"ĺ"EGGS"S( F$"F"ĺ"FROGS"h(!F$"G"ĺ"GONGS"|("F$"H"ĺ"HOGS"(#F$"I"ĺ"IVORY"($F$"J"ĺ"JUNK"(*F$"K"ĺ"KITES"(+F$"L"ĺ"LUMBER"(,F$"M"ĺ"MONKEYS"(-F$"N"ĺ"NUTS").2140'K170ERR'13601'=== F.O.B. ===c':I515:I:6:" ":I:15:13:".":'5:6:" F.O.B. ":6:"--------"'5J:6'YZ(W$):F$(W$,Y,Z)2060''" ";:2070' "*";'F$"A"ĺ"AUTOS"(F$"B"ĺ"BOXES"MPLISHED! **** ";$&IZ999:IM&:I515:I:6:"::::::::"::24:Z&"ANY KEY:REPLAY  ESC:NEW SET-UP  *:QUI";:4:39,46:13:39,47:2666&:Z:"ANY";:5:"KEY";:18:"ESC";:35:"*";:&K(Q):K1411990'Q16,0:K155CZ:N---""%(F$,3,(F$)3)W$1950(%5%:24:Zc%M((28)600)((27)60)((26)10)(25)r%MMR1980%MRM:" *****  A NEW SPEED RECORD! ***** ";%:10:26:"RECORD"::26:"------"::1982&" ***** MISSION ACCOHECKPOINT ===$DT$NZ:11:"--INSPECTION-"::11:"--2 DOLLARS--":IZ500:I:w$XI1123:Z:I:"!":3:I:"^"$bI111910$l:Z:IZ:"-"::IZ:"-":$vJZ4:S(Q48):J:JZ13:J,I$%Z:11:"----CHECK----"::11:"---STATIO"#X(F$)ZZZ+#R$R$(F$,X,Z):;#R$R$" ":U#=== PARKED TRAIN ===[##IZ(A$):V(I):T(I)::(CZ(A$,I,Z)"+"(A$,I,Z)"*")(A$,I,Z)" "ĝ#(A$,I,Z)#I::#&=== CLR.INST.PANEL ===#0:24:868: $:=== CF$"*+":F$F$(WW$,A):F$F$" ":1730_":14:24:(WW$,AZ,B):22:16:(WW$,ABZ,18AB)"A$F$:I0(A$):V(I)18:T(I)26I:I"2000:1920:FZ:1780"J0(A$)2:F$(A$,JZ,Z):2040:J:F$A$"330"== REV.TRAIN STRING ==#R$"------:":25:" *+ ":25:" ----------- "`!r25:" TIME-> 0:00 ":25:": :"~!|8:28:W$:MR327671690!11:25:" BEST->";((MR60))10);(MR60);":";:(MR(MR60)60)10ĺ"0";!MR(MR60)60!25:": :"&"/"/ "19:6:"+-+------------------------+-+"M ,20:7:"\ \";:32:"/ /"v 621:8:"\ +--------------------+ /" @22:9:"\ /" J23:10:"+--------------------+" TS1Z:S2Z:S3Z:S4Z:S5Z:330 ^2!h7:25:":-----! !"<14:"+ +";:15:"/ +";:38:"+ +"x15:2:"\ \";:14:"/ +-----------------+";:37:"/ /"16:3:"\ \";:13:"/ /";:36:"/ /"17:4:"\ +-----+-+--------------------+ /" 18:5:"\ ;:38:"! !"28:"! !";:21:"/ /";:38:"! !"X9:"! !";:20:"/ /";:38:"! !"10:"! !";:19:"/ /";:38:"! !"11:"! !";:18:"/ /";:38:"! !"12:"! !";:17:"/ /";:38:"! !"13:"! !";:16:"+-+---------------+";:38:"--------------+">x2:5:"/ \"n3:4:"/ +-------------------+-+------+ \"4:3:"/ /";:25:"/ /";:36:"\ \"5:2:"/ /";:24:"/ /";:37:"\ \"6:"+ +";:23:"/ /";:38:"+ +" 7:"! !";:22:"/ /"RACK & SET-UP ===P:M0ZUDIGIT284:FOR I = 1 TO 500: NEXT ImZI1324:I:Z\"::::::::::::::::::::::::::::::::::::::::";_25I:Z:"::::::::::::::::::::::::::::::::::::::::";:JZ20::nZ:6:"+--------------(Z)T(2):X(VT):I(VT)l%VX(Z)V(Z)V:VX(2)V(Z)X:VX(3)V(Z)I:TX(Z)T(Z)T:TX(2)T(Z)I:TX(3)T(Z)X&IZ3:SCTX(I)Z,2(VX(I)Z)):SC0Ă(T(0)TX(I):V(0)VX(I):H03302I(A$)ZZ:V(I)V(IZ):T(I)T(IZ):I:1780:1312F=== T(SC12SBTM13)1300AV(JZ)VX(X):T(JZ)TX(X):SBTM121280YF$(G$,SC,Z):1290nF$(G$,SC16,Z) X$X$F$:2040:VX(X):TX(X):F$:XJ(KZ)1161X$X$" ":A$X$:F$X$:1730:HZ:1315 H0:"";#VV(Z)V(2):TT)(((VT)2))hTX(Z)T(J)T:TX(2)T(J)TV(VT)(((VT)2)):TX(3)T(J)TV(TV)(((TV)2))XZ3:SCTX(X)Z,2(VX(X)Z)):SBTMTX(X)Z,2VX(X)Z):(SC0SBTM10)1250IZ(X$):V(I):T(I)::(X$,I,Z)::F$A$:1015SBTM12TRING ==,G$"ABCDEFGHIJKLMNO@QRSTUVWXYZ"EX$(F$,2):K21310DIGIT456:FOR I = 1 TO 500: NEXT IJZJJZVV(J)V(JZ):TT(J)T(JZ)VX(Z)V(J)V:VX(2)V(J)VT(VT)(((VT)2)):VX(3)V(J)VT(VT0:A$F$'I715:I:6:"::::::::":}:24:Z:"*+12345? <-NUMBER OF CARS BEHIND ENGINE";::3:"12345? ";:7:7,47 2:39,47K(Q):CZ:410:C0::K176K1851050$:V(Z):T(Z):"*"::KK174:Q16,0:1830:2010~== NEW TRAIN SXXX2XF:YYYY2YF:975:`STPX,YY):SBTMX,YYZ):(SBTM10)(SBTM11)(SBTM13STP12)ı24::" REMOVE CAR FROM SWITCH! ";::IZ666:I:1830:::330=== COUPLER ===CZ:1780:C0:1830Q16,0CZ:480:C45 XX5:YY34:XFZ:YFZ:9707S5S5Z:S50940WY18:X7:J6:G$"\\\ ":945wY18:X7:J6:G$" +-":945Y:X:(G$,2):J:(G$,3,2)IZ9:JZ4:K(Q48):J:JZ4:J,I:330XXXXX(3XF)XF:975:X:XXXXF:YYYY2YF:975:FZ:970>S3S3Z:S30850L@Z:28:"+":Y2:X26:J27:G$"// +":945yRZ:28:"-":Y2:X26:J27:G$" -+":945\K4910fXX34:YY34:XFZ:YFZ:970pS4S4Z:S40900rY18:X33:J34:G$"// /":945Y18:X33:J34:G$" -+":9:"-":Y17:X13:J13:G$"-+ ":945R19:12:"+":Y17:X13:J13:G$" +//":945`K2810XX15:YY26:XFZ:YFZ:970 S2S2Z:S20800Y13:X16:J17:G$"+- ":945 Y13:X16:J17:G$"/ //":945*K38604XX27:YY2:XFZ:Y(S3Z)2):27:S30ĺ"-"'S30ĺ"/"J18((S4Z)2):34:S40ĺ"/"YS40ĺ"-"{18((S5Z)2):7:S50ĺ"-"S50ĺ"\"KK176:KZK5330Q16,0KZ760XX11:YY34:XFZ:YFZ:970S1S1Z:S10750#19:12(S1Z)2)):2:16,2(13((S2Z)2)):3:26,2(Z((S3Z)2))t4:33,2(17((S4Z)2)):5:6,2(17((S5Z)2))CZ:410:C0::K(Q):(Q)16065018((S1Z)2):13:"-";:13:S10ĺ"/"14((S2Z)2):17:"-";:17:S20ĺ"/"2(N=== SWITCHES ==='X1830::Q16,0f[DIGIT456:FOR I = 1 TO 500: NEXT Ib7:12,2(18((S1Z)2))Z:16,2(14((S2Z)2))Z:26,2(2((S3Z)2))Zl33,2(18((S4Z)2))Z:6,2(18((S5Z)2))Z=vZ:12,2(17( FWD/REV VALUES ===1830)Q16,0:C0FZ150ICZFZıWFZ:A$F$cJ(A$)I0J:VX(I)V(JI):TX(I)T(JI):II0J:V(I)VX(I):T(I)TX(I):ICZı&1500Q16,0:J0:1830DF0150FF0:A$R$:51030ČCL0V(Z):T(Z):(G$,J,Z):CZı\K170K198K210K211K195400Q16,0:K170ĺ"";:1840:1985K("F")128J(A$):KJZ:460K("R")128J(A$):KJZ:560K("S")128590K("C")128990===)2V((A$))2380O v(T(1)10T(1)24)(T((A$)1)10T((A$)1)24)İ1850 |24:2:" FORWARD? REVERSE? SWITCH? COUPLE? "; :5:"F";:14:"R";:23:"S";:31:"C";: K(Q) G$"*********+++^^^:::":JJZ:J1J(G$)JZJ(J3)11::" *** DERAIL *** ";:% ,1780F @IZ1234:I:16368,0:1985[ J=== COMMAND ===n OK(Q):Q16,0 PDIGIT456:FOR I = 1 TO 500: NEXT I TCZ:460:C0 ^:1830 hK198K210K211K195450 r1780: tV(1(I)Z)):SBTMTX(I)Z,2VX(I)Z):(SBTM12SC0)(SBTM13SC11)990J :VX(Z)Z:TX(Z)Z:"@";:TX(Z)Z:"@":VX(Z)Z:TX(Z)Z:"@";:TX(Z)Z:"@" VX(Z):TX(Z):"@" :IZ9:JZ9:X(Q48)(Q48)(Q48):J:JZ9:J,I 1830:24:? DIGIT456:FOR I = 1 TO 500: NEXT Ic FZVX(Z)V(Z):TX(Z)T(Z):240 VV(Z)V(2):TT(Z)T(2):X(VT):I(VT) VX(Z)V(Z)V:VX(2)V(Z)X:VX(3)V(Z)I:TX(Z)T(Z)T:TX(2)T(Z)I:TX(3)T(Z)XD IZ3:SCTX(I)Z,2(VX============== TEXTTRAIN BY BERT KERSEY COPYRIGHT 1982 BEAGLE BROS ============================= WARNING: DO NOT ALTER ANY LINE >29999! PROGRAM WILL BOMB IF YOU DO! ============================= === COLLISION === 2666Z2,E:32000:SPSPDIGIT:CLCLDIGIT:2130>(Q)159330:V(J)V(K):T(J)T(K):V(J):T(J):" "::IKZZ:V(I)V(IZ):T(I)T(IZ):V(I):T(I):(A$,I,Z)::CL:O,T(Z)Z:P,V(Z)Z:SP:T(0)(O)Z:V(0)(P)Z:T(0)Z130 J                            :RR1:R6R0R0520AR1580,690,700,680,690,700,580J580uX1373:15(R3):0,39X2:X:650X1373:0,39X:X:650A 9 12 ";::" 7 11 13 14 ";::2:" DARK... ";::"&10";::" MEDIUM... ";|R6ĝ:" LIGHT... ";:14:"SOLID":2::" APPLE GREY SCALE "; SEPARATE COLORS: ----------------(Q)136650Q16,00,47DJ012:X3JkN CLASSIFY BY B/W SHADE: ----------------------XJ5Ġ2J6(J4)bJ4Ġ3(J4)lJ8Ġ152(12J)vIX1X3:0,39I:I:JO{R6ė:21:2::" 1 2 4 8 ";::"5 ";::" 3 6BRN&10LAVMEDORGBRTLITPNKYELAQU BLUGRN GRY BLU GRNBLU " &V2123:I1373:T40(V21)I:IMODI(I6)6:IMOD4IMOD0Ğ 0V:I1:(A$,T,3((VI)61));::I,V:1:">PRESS ANY KEY. (0=BLACK; 15=WHITE";:2039,(")")128:7:16336:g  =================== LO-RES TEST PATTERN BY BERT KERSEY BEAGLE BROS. =================== x ::Q16384  NAMES & NUMBERS: ----------------G A$" 1 2 4 8 5 3 6 9 12 7 11 13 14 MAGDRKDRK'I'HAVE'TAKEN'CONTROL.YOU'WILL'DO'WHAT'I'SAY.''PUT'$1000'IN'ANENVELOPE'AND'GO'TO'THE'COMPUTER'STORE.''BUY'ME'A'LARGE'BAG'OF'MEMORY'CHIPS.'''''I'WILL'WAIT'HERE.''''P.S.'WHATEVER'YOU''DO,'DO'NOT'TURN'OFF'THE'POWER" X$X$".''''''''''''''''''''''''''":U59: ( 23:1:"]";::" ";::16 A$:A$:P N1:23:1:"]";:200| NN1:1:1:A$:A$:23:1N(N40)40 (X$,N,1);:23::" ";::" ";:(X$,N,1)"'"āI13:S(U): 190 16368,0:1:A$:A$:80 X$"THIS'IS'APPLE'][. =================== <220) F230C P16304,0:16297,0: Z:21:" 0 1 2 3 4 5 6 7 BLK GRN VLT WHT BLK RED BLU WHT" d:10:"APPLE ][ HI-RES COLORS";:1 nX024535 x(X35) IXX34 I,0I,1::10:11:32,10("APPLE ][ TEST PATTERNS":"----------------------"::"<1> HI-RES":"<2> LO-RES"::" SELECT:";:A$:A$:-A$"1"A$"2"ĉ:30.A$"2"500 2 =================== HI-RES TEST PATTERN BY BERT KERSEY BEAGLE BROS.    :::10:5:"BEAGLE BAG":5:"------------------" 12:" MENU":" CONTINUE THIS GAME":" QUIT":5:"------------------":" SELECT:";:A$:A$:A$"Q"Ā A$"M"Ĺ768,6:(4);"RUN SHORT MENU" A$"C"Ĭ 63900Y2,Y2X2:X,Y:10u PARAMETERS ---------- }771,173:772,48:773,192:774,136:775,208:776,4:777,198:778,1:779,240:780,8:781,202:782,208:783,246:784,166:785,0:786,76:787,3:788,3:789,96S(16),CB(16):BEST999:BV999:Q16384:6 X4X4X35X35;0:IY3Y3:X3,X3I:I|15:X2,X2Y2:X2,X2Y2:Y1,Y1X2:Y1,Y1X2:X,YI18P((1)200)20:L8:5015I600021:23::"JUMP"::p4:X2,X2Y2:X2,X2Y2:Y2,Y2X2:",")128KK("A")128KK("Z")128KK136KK149ıNN21:23::"JUMP"nS4:IY2Y2:X2,X2I:I{XFUFU10bKK(KA)YY15:5775qKKKZYY15:5775KKKLKKKWXX15:5775KKKRKKKEXX15Y4Y4Y35Y3513:"TO START, PRESS:"t" A(NORTH), Z(SOUTH), <(WEST), >(EAST).";::3:"A";:13:"Z";:23:"<";:32:">";K(Q):KKAKKZKKEKKRKKWKKL5640:5470:0:5061? SPACE JUMP ----------DQ16,08IKK(".")128KK(:"YOUR ASSIGNMENT: FIND THE ";SUBSUM;" ENEMY SUBS.";\I122:21:28:I(I10)10;tJ12:S(Q48):JJ125:J,I:27::"*";SUBSUM;"*";L44:5040::27:" ";SUBSUM;" ":L300:5040"----------------------------------------";C<SC((1)15)1:SCISC3SC11SC14SC5SC105601hI0382:SC:I,0:I1,39:0,I:39,I10:I1,0:I,39:0,I1:39,I:II2037:SC:1,38I1:1,3839I1:0:1,38I:1,3839I:J19:J,I:1,381:1,3838:SC:0,39:39,0:60009T GAME ----------Q16,0BSUBSUM((1)4)3:MAXSUBSUM40{FU((1)(MAX2))(MAX4):OXMAXFU33(6SUBSUM)I1SUBSUM:C(I)0:X(I)((1)34)3:Y(I)((1)34)3:I:FINDS0X((1)30)5:Y((1)30)5MAX999:FLAG1:IS;" "; ::P((1)200)20:I15:L15:5015:5040:bI122:24:23:((1)99);" ";:Is23:FU;" ";P((1)200)20:I15:L15:5015:5040:II133:24:36:I(I10)10;:36:"0/";SUBSUM;:I150:S(Q48):: STAR------ Q:EQUALIZER";#m:50,63xr": OXYGEN :";:16:": FUEL :";:29:": SUBS ";:3:39,47:10:39,46w21:1:"A";:9:"Z";:17:"SPACE";:30:"S":"<";:9:">";:30:"Q";|I122:24:10:((1)99);" ";:50,63:24:10:OXJI1SUBSUM:C(I)155460cOX(I)2,X(I)2Y(I):X(I)1,X(I)1Y(I)1:X(I),Y(I)1:J0ĺ"";lTI:Y GAUGES ------^::24:1:"----------------------------------------";c"A:NORTH Z:SOUTH SPACE:JUMP S:SCANNER <:WEST >:EAST ----XEQFU5435U'50,63:IOXEQ(EQOX):FUFU(OXFU):24:10:I;" ";:23:FU;" ";u,J12:S(Q48):J,I:OXFU1I199:I;:22:32:"EQUALIZER":50,63:@ REVEAL LOCATIONS ----------------E(((1)14)1)((J(J2)2)0):J0Ġ15NJ1SUBSUM:C(J):X(J)2,X(J)2Y(J):X(J)1,X(J)1Y(J)1:X(J),Y(J)1:hJ11:S(Q48):J,I0:1,3837:1,383721:32::"SCANNER":50,63:6000: EQUALIZER ---------50,127:22:32:"EQUALIZER" "EQ((OXFU)2):EQOCANNER --------:22:17:" -40 FUEL ";:yJFUFU401:24:23:J;" ";:H12:S(Q48):H:H18:H,J:FUFU40:21:32:"SCANNER"::22:17:"----------":I237SC:1,38I:1,38I0:1,38I1:1,38I1:I1,I:I,I1141556535440::22:17:J(J2)20ĺFINDS;KJ(J2)21ĺ" ";`I150:I:5290j5565 SCAN OR EQUALIZE? -----------------Q16,0:21:3:"NORTH";:11:"SOUTH":3:"WEST";:11:"EAST":KKQ5405KKB5695 S%I1200:I:J0:5445:I1400:IHPTS(1000FINDSSUBSUM)FUOX150::22:4:"SUBS LOCATED:";FINDS;" OF ";SUBSUM;". SCORE:";PTS;".":255 END GAME -------- Q16,024:31::" ";::32:"RETURN";: K(Q):JJ1:K1)100):L((1)50)20:50150xI:L250:5015:}5275IOX0OX0XFU0FU0gOX0526521:1:"** OXYGEN SUPPLY ZERO! (NO BREATHING) **":24:10:"0 ";527021:1:"** FUEL SUPPLY ZERO! (START PADDLING) **":24:23:"0 "; DEATH OR SUCCESS? -----------------DZ21:1:868:22:868:\FINDSSUBSUMāI1SUBSUM:P((1)200)25:L40:5015::5225_I138:J12:S(Q48):J,I:5250i21:1:" MISSION COMPLETED! (TAKE TOMORROW OFF!)"nI125sP200((U40"<:22:17:"----------":)AIFFU(FU3)3āI1SUBSUM:C(I):X(I)2,X(I)2Y(I):X(I)1,X(I)1Y(I)1:X(I),Y(I)1:K0:I15:((1)38)1,((1)38)1:PFINDSSUBSUMOX0FU05050Q --------------- END SEARCH LOOP 'U:"WEST"G 15:X(I)2,X(I)2Y(I):X(I)1,X(I)1Y(I)1:X(I),Y(I)1^ FINDSSUBSUM5190d !:z #J1SUBSUMFINDS (P50:L50:5015 -J:J199:J 2:22:17:" +40 FUEL ";:7JFUFU40:24:23:J;:H12:S(Q48):H:H19:H,J:FUFOX4)40āI14:S(Q48):8  FIND SUB? --------- V I1SUBSUM:XX(I)5185h YY(I)5185z C(I)155190 C(I)15  FIND SUB -------- FINDSFINDS1:24:36::FINDS; Q16,0::21:3:"NORTH";:11:"SOUTH":3:"EAST";:114:X2,X2Y2:X2,X2Y2:5085y KKLKKWFUFU1:XX(X2):Y1,Y1X1:X1,Y:4:Y2,Y2X2:Y2,Y2X2:5085 KKRKKEFUFU1:XX(X37):Y1,Y1X1:X1,Y:4:Y2,Y2X2:Y2,Y2X2 X,Y::24:10:OX;" ";:23:FU;" "; OX("NORTH":5066/ KKZĢ21:11:"SOUTH":5070S KKLKKWĢ22:3:"WEST":5075x KKRKKEĢ22:11:"EAST":5080 K(KA)FUFU1:YY(Y2):X1,X1Y1:X,Y1:4:X2,X2Y2:X2,X2Y2:5085! KKZFUFU1:YY(Y37):X1,X1Y1:X,Y1:5560 0,P 1,L 771% :+ ; H1L:H:f  START SEARCH LOOP ----------------- KKK:K(Q):0:KKBKKSKKQİ5315 OXOX((1)4):KKK5066 :21:3:"NORTH";:11:"SOUTH":3:"WEST";:11:"EAST": K(KA)Ģ21:3:c.============== SUBSEARCH BY BERT KERSEY COPYRIGHT 1980 BEAGLE BROS ===============KS("S")128:KQ("Q")128:KA("A")128:KZ("Z")128:KL(",")128:KW136:KR(".")128:KE149:KB(" ")128:6390016298,0 ::32000::                 21:" MENU":" CONTINUE GAME":" QUIT":" SELECT:";:A$:A$::A$"Q"Ģ21:A$"M"Ĺ768,7:(4);"RUN SHORT MENU"A$"C"225639001X,XX6I:: MUSIC 1I10B2010B2:0,IC1,3K MUQWI770789:J:I,J::96,173,48,192,136,208,4,198,1,240,8,202,208,246,166,0,76,3,3,96S(16),CB(16):BEST999:BV999:Q16384:MU771:BZ48429:Q$(34):X::CB(15):990:C1CC1ıO15:YY1,YY7XX1:YY2,YY3XX3:YY5,YY6XX5XX3,XX5YY1:XX3,XX5YY4:XX3,XX5YY7:1000IYYYY8:XX,XX6I::XX2,XX4YY1:XX2,XX4YY4:XX2,XX4YY7:0IYYYY8 X,XX5YY4:XX3,XX5YY7:9CB(13):990:C1CC1ıa15:YY1,YY7XX1:YY1,YY7XX5XX3,XX5YY1:XX3,XX5YY4:XX3,XX5YY7:CB(14):990:C1CC1ıCN4:YY1,YY7XX1:XX4,YY4:YY1,YY4XX3:YY1,YY7XX5:4:YY1,YY7XX1:YY1,YY7XX3:YY1,YY7XX5:XX4,YY1:XX4,YY7:fCB(11):990:C1CC1ı15:YY1,YY7XX2:YY1,YY7XX4:CB(12):990:C1CC1ıCN4:YY1,YY7XX1:YY2,YY3XX5:YY5,YY6XX3XX3,XX5YY1:XX3CB(7):990:C1CC1ı@p15:XX2,XX4YY1:YY1,YY7XX4:\uCB(8):990:C1CC1ıjzCN4:995YY1,YY7XX2:YY1,YY7XX4:CB(9):990:C1CC1ı15:995:YY2,YY3XX2:YY2,YY6XX4:CB(10):990:C1CC1ıICN7XX4:%CCB(4):990:C1CC1ı[HCN4:YY1,YY7XX4:YY1,YY4XX2:XX3,YY4:wMCB(5):990:C1CC1ıR15:995WYY2,YY3XX2:YY5,YY6XX4:\CB(6):990:C1CC1ıaCN4:995fYY2,YY7XX2:YY5,YY6XX4:k2)21740:) PRINT SQUARES ECB(1):990:C1CC1ız 15:YY1,YY7XX3:XX2,XX4YY7:XX2,YY1:%CB(2):990:C1CC1ı*CN4:995/YY2,YY3XX4:YY5,YY6XX2:4CB(3):990:C1CC1ı915:995 >YY1,YY0,930,945,960,970,985:' SHUFFLE DI115:S(I)I::I115uJ((1)15)1:TEMPS(I):S(I)S(J):S(J)TEMP:S(I);::" SHUFFLING ";JJ13:S(MUBZ):I:S(16)16A0:I115:JI116S(J)S(I)AA1J,I  A(A05BEST999ĺ"=?=";-BEST999ĺBEST;6715JBV999ĺ"=?=";[BV999ĺBV;o") ";::24:1"HIT "Q$"*"Q$" WHEN YOU HAVE NUMERICAL ORDER.";:23:21:" ";:7:15,45:B1:1020:G795,805,820,835,845,860,875,885,900,910,9220J(J4)40XX27/C1:S(J)JC0?GS(J):730UB4:S(J)Jİ1020cJ16670X12:S(MUBZ)(MUBZ):21:1:" A=UP Z=DOWN ARROWS=LEFT/RIGHT"::23:1" MOVES SO FAR: 0 (BEST TODAY: ";:CC07 I:10KN4,351:4,3538:4,3539:0,374:0,375:0,3734:0,3735hSC1:6,120:C2:13,190XC3:20,260:C4:27,330]740bJ116:YY2gJ4YY11lJ8YY20qJ12YY29vXX6:J(J4)42XX13{J(J4)43XXB4)41350 XXXX7:10001S(B1)B540?C0:1020YXXXX7:GS(B1):730|!XXXX7:S(B)S(B1):BB1:350& SET UP BOARD +I0150CB(I)C15I(I4)42CB(I)C2:I(I4)43CB(I)C3?I(I4)40CB(I)C4DC0:1020(YYYY9:GS(B4):730KYYYY9:S(B)S(B4):BB4:350] MOVE LEFT sB(B4)40350XXXX7:1000S(B1)B505C0:1020XXXX7:GS(B1):730XXXX7:S(B)S(B1):BB1:350 MOVE RIGHT B(K136480K149515*K193370: MOVE UP JB416350\YYYY9:1000oS(B4)B435}C0:1020YYYY9:GS(B4):730YYYY9:S(B)S(B4):BB4:350 MOVE DOWN B41350YYYY9:1000S(B4)B470 YOU GOT IT! (NO RECORD) ";ITI180:S(MUBZ)::325VY PLAY d^CC0365~cC1:TURNBESTĺ"";h370mTURNBVĺ"";rK(Q):K128370wQ16,0|K170275TURNTURN1:23:16::TURN;K218445 'BVTURN:310" ,TURNBEST3350 1BESTTURN; 624:1l ;A$" **** NEW RECORD! **** " @J1(A$)3:(A$,J,3);:B(J2):1020: EI11500::225 J:24:1:" (SORRY...) ";:340+O:24:1:" 1):225* K(A$)128:K214K201225f :21:14:"(LOTSA LUCK.)";:14:K214ĺ" (CHICKEN) "} Q16,0:K201265 CC0:555:B16:350 CC1:555:B16:350  END GAME I115:S(I)I330  CC1300 "TURNBV335 V> START/VISIBLE #'S....BEST SCORE:";BV:" START/INVISIBLE #'S..BEST SCORE:";BEST " SOUND ON (NOW OFF)";:MU771Ė12:"FF (NOW ON)"; :" QUIT SELECT:"; 24:33:A$:A$::A$"Q"63900 A$"S"MUMU(MU770)(MU77$" OR "Q$"C"Q$" FOR COLOR ADJUSTMENT.)";3 17:8T K$:K$:K$"B"K$"C"160` Q16,0p K$"B"210 C12:C29:C31:C412:CN15:CN415:215 C12:C27:C36:C415:CN15:CN42 START GAME XX27:YY29:TURN0T ::21:"<(1)9000)1000;:: 8:14w " ":14:" SLIPPERY ":14:" DIGITS ":14:" " I1500::17:8: "BLACK & WHITE OR COLOR TV?" 8:"------------- -----" 17:25::"C":( ::" (TYPE "Q$"B"Q>d SLIPPERY DIGITS BY BERT KERSEY (C) 1980, BEAGLE BROS Pi1050:63900ln:::A$" BEAGLE BROS"s10:14:A$:I1666:xI112:J911:J:14:A$:130:}:135K14:S(MUBZ):::I712:J13284:I:J (             -----------":" SELECT:";:A$:A$:A$"Q"ĀX%A$"M"Ĺ768,8:(4);"RUN SHORT MENU"f%A$"C"Ĭq%639005160:0:HCOL,V:k$}I770789:J:I,J::96,173,48,192,136,208,4,198,1,240,8,202,208,246,166,0,76,3,3,96$Q16384:MU771:$:::10:5:"BEAGLE BAG":5:"------------------".%12:" MENU":" CONTINUE THIS GAME":" QUIT":5:"-------PSN0,# HCOLHCOLHPSN:VVVPSN:V377219O#%HCOLHPSN2,VVPSN2)07215a#&VPSN0İ7180y#'HPSNHPSN1:VPSN2#(0,((1)99)5#)1,4#*MU#/15:HCOLHPSN,VVPSN:0:HCOL,V:7200#31:5,715:5,716:7,17:12:5,713:5,714$41)3):I07130;"12:5,715:5,716:0:6,713:6,714N"15:I199:Iz"14,1516:13,1615:12,1314:16,1714"0:16,1721"I150:J(Q48)(Q48)(Q48):I"7195" 0:12,1714:13,1615:14,1516:#HCOL16:V14:HPSN2:V1620:26,29I:I!l80!q28,3621:28,3622a!v11:I1620:23,25I:I:21,2216:21,2217h!{7!17,2514:17,2415:16,1720:20,2218:23,2421:18,13!2!I2329:29,33I:I!0!29,30!6070! RIGHT FIRES "I(($HCOLHCOLHPSN:VVVPSN:V376230G .HCOLHPSN2,VVPSN2)06210Y 3VPSN0İ6160q 8HPSNHPSN1:VPSN2 :0,((1)99)5 <1,4 >MU B15:HCOLHPSN,VVPSN:0:HCOL,V L6180 V5160:0:HCOL,V: X RIGHT DRAWS b13!gI 1,3MUI1 LEFT FIRES C9:I199:Io13,1420:12,1521:11,1222:15,16220:15,1615I150:J(Q48)(Q48)(Q48):I 61700:13,1420:12,1521:11,1622HCOL20:V13:HPSN2:VPSN0$ I1518:7,11I:I12F12,1515:12,1516:12,1317:12,1318M712,1913:13,1914:13,1419:14,1617:15,1616:14,18:18,12029,3162I2226:2,6I:I:4,627:6,2882,521I1200,25510IYMBOL CORRECT.";*:21:16:"RETURN":6I120F0,20210IO1,3WMUgI:2:1500K(Q):K1415800Q16,0:C1:I2123:I:14:" ";:24:" ";:I24:14:" "; p LEFT DRAWS z1-0,2223PITCH/1,4#0MU62I:PITCH54ĺ<4gC::21:3:"'Z'KEY ";:29:"'?'KEY ";D:14:" < > "X:"* COMPUTER WILL CHOOSE A FIRING SYMBOL."l"* PRESS YOUR KEY WHEN SYMBOL REAPPEARS.""* QUICKEST DRAW WINS IF S1300,1400,1500.!NAME$"-------------":5675N"NAME$" BEAGLE BROS ":5675n#NAME$"-------------":5675$NAME$" QUICK-DRAW! "::5675:%NAME$"-------------":5675*I1999:I:5699+24:13:I1(NAME$):PITCHPITCH1:(NAME$,I,1);|30,33210%29,8:15,177GI1221:8,26I:I:16,2027O15y0,1338:0,1339:23,3938:23,393914,1626:20,2226:16,25:20,2526,3913:26,3923C05840 INSTRUCTIONS 9:NBR((1)5):NBR1100,1200,17I811:28,34I:I:30,3412:30,3213:30,3114ZI2224:30,33I:I:25,2630b12,5,714:3,713:9,124:11,125:11,135:8,126:9,127:8,118@22,265:I2224:2,4I:IT13hI1620:30,36I:I:17,2028:18,2029 6:22,267=P27,3715:32,3714:33,3713:16,1729:37,16tdI3034:23,30I:I:23,2728:23,2935:23,2736{x53,535:2,836:2,337:5,837723,316:2,425:4,527:4,2623,3029:31,3325:30,3127:31,26:29,15126:14,21I:I:16,201:18,207)8]I06:28,34I:I:25,377:28,3621:28,3622I3134:31,36I:I:28,3137:33,3437:28,3036:29,30356,721:1,21:I811:2,5I:I:3,12(2 <I35:22,34I:I:22,261:22,282:22,28Q16,0:K14195&::" BYE...":QY:X:NBR1(NAME$):(NAME$,NBR,1);rPITCHPITCH6:PITCH1040600,((1)200)501,13MU0,PITCH1,20MUNBR: SHOOTERS 11,107:I38:0,6I:I"IHE WINNER! ":Y23:4050<NAME$" =========== ":Y24:4050gNAME$" PRESS RETURN"::Y22:XJ:4050NAME$" TO REPLAY OR":Y23:4050NAME$" ESC TO QUIT.":Y24:405022:X7::"RETURN"::X1:"ESC";:K(Q):K141K15540402:X,X24:S X,1:X2,1:X1,2:X3,2:X,3:X2,3:X1,4:X3,4:X,5:X2,5:d END GAME |PITCH258:22:958RPTS994015I1:J25:4016I25:J1:21:15:" "NAME$" =========== ":Y22:XI:4050NAME$" T2:"& 1,5X:2,4X1:1,4X3:<0 X,X22:X1,X34:T: X,X22:X,X24:D X,X24:X,X25:X1,X21:X1,X22:N X1,X32:X,X24:X X1,X32:X1,X24:b 2,5X:2,5X1:2,5X2:l X1,X22:X1,X24: v X1,X216:17,1934:33,3820:32,3821&AI1521:28,38I:I:T HAT POINTS s HNBR:IXX3:Y,Y4I:I HCOL:HPTS.59.93200 HPTS9HPTS9 (HPTS)13100,3110,3120,3130,3140,3150,3160,3170,3180,3190 Y1,Y3X1:Y1,Y3X,3419 [ 2010:0:CROSSt28,3015:28,3016:28,3020:28,3021:36,3815:36,3816:36,3820:36,3821z2010:0:E18,2131:18,2135#x2010:0:O0:I1719:31,35I:I2010:0:! 32,3815:33,38 ";: 2103:"TOTAL= ";:9:LPTS10;D16:" ";h26:"TOTAL= ";:32:RPTS10LPTS99RPTS994000K(Q):K141K155785Q16,0:K15595112 SYMBOLS L2010:0:SPIRALV15,1931:17,1935:32*l23:26:" WINNER ";:34:TIME10U{26:" ------ PTS. ";:RPTSRPTSTIME[I1500:I:24:1:" HIT ";::"RETURN";::".";HNBR13:HCOL8:HPTS.5(RPTS10):X29:Y1:3000: PRINT SCORE Q16,0:24:15:" TEN=WINT ?:21:16:"(NOPE.)"fDS(NBR)1:I15:J1((1)99)99:J:0:15,1615:J14:K(Q48):JEJ199:J:12:15,1615:IFCOL(SYMBOL):SYMBOL1100,1200,1300,1400,1500G21:16:" (YEP) ":I5160N7000:S(NBR)1410]7110P) ": 5160* 6000:S(NBR)15754 6110\ 23:1:" WINNER ";:9:TIME10 " ------ PTS.";:LPTSLPTSTIME  24:27:"HIT ";::"RETURN";::"."; HNBR15:HCOL1:HPTS.5(LPTS10):X4:Y1:3000 !7100 RIGHT FIRSI::305 |(Q)175590$ ~4257  LEFT FIRST P :21:16:"(NOPE.)" S(NBR)1:I14:J1((1)99)99:J:0:16,1721:J14:K(Q48):J J199:J:11:16,1721:I COL(SYMBOL):SYMBOL1100,1200,1300,1400,1500 21:16:" (YE22:16:":READY:"+ 0:2010:I1777:I9 " START 1NBR((1)5)1:COL(NBR):NBR1100,1200,1300,1400,1500:Q16,0:22:16:": :"; @TIME25((1)20)1:18:TIME10);TIME10; cJ(Q48) o(Q)175(Q)218Ă:0:I1521:28,38J1((1)6)4:NBR((1)5)1:COL(NBR):NBR1100,1200,1300,1400,1500^ 0,((1)99)9g 1,9o MU 0,((1)99)9 1,4 MU J:S(NBR)1:SYMBOLNBR I1((1)500)300:I 21:15:" ":15:" "  TIME0125 xI1999:I( }5160:< FIND SYMBOL a 23:1:13):25:29):25:15)l I15 COL(I)((1)15)1:COL(I)3COL(I)5COL(I)7COL(I)11COL(I)14162 21:15:" FIRING^ ":15:" ^SYMBOL " I05:S(I)0:IJ rk,============== QUICK-DRAW! BY BERT KERSEY COPYRIGHT 1980 BEAGLE BROS ============== ~P32000:63900_LPTS0:RPTS0:PITCH0n:::5000p:21:10:" ";:25:" ";:s21:3:" Z KEY ";:29:" ? KEY " t          A$"C"Ĭ63900NUZZ(Z)::X135::. :I140:"-";::f :::10:5:"BEAGLE BAG":5:"------------------" 12:" MENU":" CONTINUE THIS GAME":" QUIT":5:"------------------":" SELECT:";:A$:A$:A$"Q"Ā A$"M"ĺ(4);"RUN SHORT MENU"  H6:"(";A1;"%)"; 999( :6 417:1000[ HA2T((2S)1):A2(10A2.5)10 \"AVERAGE SCORE: ";A2;" (";(.51000A2T)10;"%)" p1000:  RE-ROLL I1999: "TRY AGAIN, OR TYPE Q TO QUIT.": XM0:220 X12:B0 HI0:I22S) A(I)HIHIA(I)/ < I22SE 999m A1100(A(I)T):A1((A110.5))10{ I14715 VI2:H1:750 I27720 VI11:H14:750 VI24:H27 V:H: I10);I;: A(I)HIĞ " ";A(I);" ";BUZZ(Z):N((N1)S)((N1)S)N2:NN3)NN2):A(N)A(N)N1:(N4)N4ĺ X(XN5)N50ĺ:XMXMN5:I139:":";::18:XM:  :"**END**": 0I1999:: D1000 X CHART l"TOTALS: ";T;" ROLLS, TWO ";S;"-SIDED DICE" 100ERR S20S1ĺ(7):220p "NUMBER OF ROLLS OF DICE? ___ (999 MAX.)";:26:"";T$:T(T$):::T$"Q"ERR T999T1ĺ(7):260 ,1000 @T;" ROLLS OF TWO ";S;"-SIDED DICE:":1000 TI140:A(I)0: hI1999: | ROLL J X1T:b@Ll  . $ ; &?1?=A>?I i`HH11`IJ듧ƙɾ5Ė+]̵h5`4ɺл1>@@A`41`>BD`8>6>) `LL u ?l:L``L@ 'A=?<) < `JJJ>Ie=?<=`K i! Ȉ2 ,`H h*:` `YE <Šӭpd`HVTQ PS 6" (!#%L" X`I`ɍ,,L8L,H ΰɐHJ) )h)i( ((`ɇ@ 0`$($$!fi#bZH&bTDThDt(ntJrtttrDh2"&&rr&HDDȅEhH 0l( Lh:h;l Le / XZ]_, :ILl `Ȇ׍숈l E@A  J 0,*i H/.  `0 .: VȘ L `8/;e:` T0 "T3  T3  T; "D3 D"D3 D"D3 "D3 &1!YMJؤ#]#)i#$S#$S[[i$$)|mi)S4\ˣ٠Ơ͠z#   Ԡ à2  ŠӠ  ӠͮǮĠӠ ǠӠ  Ů  Ůɠ®İǮ®İǮɠ ϠȭǠ  4®İ4 ŠР @Ҡ®à @Ҡ®ʠРҠǠàŮҠŮ  ŠōŠҠį͍ڠϠӍϠŠԠōѠԍ ź źh  Ժ A v ǍӠŠɄʄ  ! ĺ UɃ L L|L%%  ` e轀Cɍ`$( Ih$ o&`$Hɍ    ة Z [مv03W ԧ   àǍ̠ĠōӠŠōĠōĠ          IN:0I,IN:k T165,6,133,58,165,7,133,59,169,1,32,99,254,173,0,192,16,251,141,16,192,201,155,208,239,96s ^23 h"HIT ANY KEY TO STEP OR 'ESC' TO QUIT":21 rLA |35,23::VV7 VV48. DEDE(V(16P)):PP1:M :19);"DECIMAL ADDR=";DE^ HI(DE256)q LODE(HI256)  MACH LANGUAGE ROUTINE "LA36864: ML ROUTINE ADDR =$9000 ,LB06 6HB07 @0LB,LO:0HB,HI: LOAD PRGM ADDR JILALA25:(AD$,Y,1) dXX1:YY1 nB x EDIT FOR VALID RANGE OF HEXM I14] V(DI$(I))p V48V70180 V57V65ī180 :200 "ERROR IN HEX ADDRESS =$";AD$:"HIT ANY KEY TO TRY AGAIN":A$:A$: I411 V(DI$(I)) V64 ** STEP DISASSEMBLER **2 ** 3/6/83 **J ** NIBBLE V4/1 **Z:35,21:8"ENTER BEGINNING ADDRESS IN HEX =$";AD$(LG(AD$)2LG0LG4ī180<DI$(4):DI$(1),DI$(2),DI$(3),DI$(4):0,0,0,0FX4:YLGPI1LG ZDI$(X)P SPEAKER SPRBLNKPRINT 3 BLANKS THEN RETURN  9;************************* ;THIS SUBROUTINE WILL ;PRINT "ERR",BEEP ;THE SPEAKER TWICE, ;THEN PRINT 3 BLANKS ;************************* ; ; PRBLNK $F948 BELL1A $FBDD PREER $FF2D ERROR PREERPRINT "ERR" BELL1ABEE P SPEAKER SPRBLNKPRINT 3 BLANKS THEN RETURN  9;************************* ;THIS SUBROUTINE WILL ;PRINT "ERR",BEEP ;THE SPEAKER TWICE, ;THEN PRINT 3 BLANKS ;************************* ; ; PRBLNK $F948 BELL1A $FBDD PREER $FF2D ERROR PREERPRINT "ERR" BELL1ABEE  :820*<:10:12:"CATSUP TERMINATED"IA$,4)"RENA"N$(JPLK)(R$,30))750BK6PP1:PL%P1[K7PP1:P1PL%d750 ECD(222):LOC(219)256(218):19:1:958:ECD4ĺB$;"WRITE PROTECTED"(A$,1)"B"ĝ:1350(ECD4ĺB$;"ERROR ";ECD;" LINE ";LOC2  #L ie ``I0 iI`˅ȱ `UVJ&U&V 2I0`VU 0 2U&VULrҽh0ʆ҅ " ۥڨ6L) %ȱhȥ) ȱȥ`  H hE%.`8j1Yȱ$0  ɺ< ) $/0  A L ` eȱ` ]( ` S( H)`ߥޥȽȑȥ$ئ !$ɍLȹ  LA$ȹ  "$$0W ;Qȹ  WE];H5!1, 0ȹ ,ȹ,   жh @00  Ұܩ   JҰ   0 Lɠ,ɠ  :L Y;UF  $s)",!)_X"I)V }L! Ll%,")_IYL6 L)_J *L* V V.L* ,Ц!)_XYЗV L* UL1 >/ < P` VU`L L Ƀ 멩ʊ,Wֆ @!Lg` jfjf))_D)f(*멓 uf qЭ ] ,L ( @ hT(L qL1 q+H VUʊUȘh *LZ qL # ΩǍ S $ #2ɪ Oɠ Oɻɢɧ Oɠ ȱɍhh )_ȩ`,8xXxXx6  : Ia#` Q V #12 ϕ5 "]0 ) ե Ԇ׆؆ц. , `Ɉ Z : 5ɘ L Ɍ SI SL$ɕ(ESɍм `Ɉɠ ɍ7)L Li؍ĠӍԍ׍٠̍ō č ԍ̠ҠŠөŠŠ$VWOFVɠ$A0йH4hFAɕɈňLɄ Ɇ ɍWFVȱɍ)WfV0ɉfALɎ ɍɏ ɍLɌ I Lɂɍ4ɑ  # `Ƀ)ɒ` ,` lRLR`0L ɯɃɠ`Q $3  #$9 #*4 z L W  T V #l9ILA #)|!IQ  #l9ܩ # #IAYA!:JL`):I #<)qW'q*q7L,?AV44ɍT)) @ 4T ):(; Lp ?';  #&;  kL k #9: L  T   `/ ɍe п#вЮ #:92a:``J ?  f3  T #)IQ!JQ!:!Bl8(^ )`,8hkxXxXx@/Q  @*  #+)T+P6+  L s ?  #(;)8 ):`l; (11*2!|| #':7 #AY`   L  #l;  # B 1UE0I$Q ɻ10U(T011 0$!$  ɍ$! %# ^ɍБ #I`$ٵו󩠅L!8 Iiǥɍ  AL %7L #l;8L4+;߂ q2pFңS$+ >9  #i$ir!9 L ҍf/ 1 QS $Bɠ #! B9 a%AaAx - L 4d? #a? P+| =+|B\|`# B\9߰;B` И Ժ e A ѵȭҵ ȩ   ȑ    L  <LҦ A ̤8  AL ̤LA Ӭ`ɍ L $ Xhh L HH` X Ԡ L hIhLX ĺ )   Ġ  `eae L ' ź ) L ŠL  ĺ UL9 8 ϠŭҠǠîCALL`v LiE ";EC%::14:"PRESS RETURN ";A$:34dP0480,L";L%' dBA(16372)256(16373)I nD$;"BLOAD";F$".IMD";",A";BAs xD$;"BSAVE";F$".ACT";",A";BA;",L";L%{ 34 LOAD RTN D$;"BLOAD";F$;",A$5000" JP%(16374)256(16375) JP%:34 EC%(222)::11:12% "DISK ERROR CODD$;"BLOAD MLE.B"! "16384: MLE; #::D$;"CATALOG":: 2N(16369):10:"'EXIT' TO RETURN "::11:"ENTER FILE NAME ";F$:F$""F$"NO NAME" 7F$"EXIT"34 <N70,150 F SAVE RTN PL%(16370)256(16371) ZD$;"BSAVE";F$".IMD";",A2' **********************; * M.L.E. DRIVER *X * BY DOUG SPRINKLE *u * COPYRIGHT (C) 1982 * * BY MICRO-SPARC INC * * LINCOLN, MA. 01773 * **********************  16368200 D$(4):D$;"MON C,I,O"::8e`hh ?l``` $ $` B$L;$ 3$L;$ $L_$ `8i`uuۥee```0```5I`ۅ܅` J Uȱ U  JL"L" ~#0 ʊ)ȱސ Lw" ~#)Ȅޤȱޤ߰)ieޅސ߱ `hhL" Jhh #L#$H) JQ JJJ#H`#HJ (` )A2cmKw馄!O̠Һ #,Ƀɠ "  =Г ̠Š̠ҺL"¥ޅ߅ ) ʊ)ޥߊ$ 0L1# L^#I@)JJJJJf ȩ]fʩ f L 8'ʆɢ ˠ ʥ ɰ$0 L bرMɪ1 7 0L K 7 K 7 ALAL E ! 8⪥ ! K  ,L  ̠,s uX ƐbR0(ʰPp@b  a ! Lh `02!F +AK S`LT aa0a2dLB|L"Lb>02a @0Pa`p D$K  ) ,!.&+-/*U5u dERANLABEMEMORY FULUNKNOWN LABENOT MACRNESTED MACRODUPLICATE SYMBO,jMM|nApr+! @&!d ($Rx^!Whܚ$N Fj.   3&KhFr8+++#+&z2\u!p!rKKȂH h (&`F8pr&BؙHRx@XVȑ] ۢԕХեLOʥ LեԊ$.PʩL U ULUV I0 H P heUUVLH h` IN LINE --END ASSEMBLY-- ERRORS:BYTES BADOPCODADDRESS MODBRANCOPI@Ȅܹ R!:Ș Ue`!ɌH $h Uɍ L UeVeUeVeL # LLAՅVԅU  i ީLӥЅڤe L H  h  (,А  UL@Q݄S?jSݩ&Tf݄QP %PQȾ T *?2ESL1 L  ] ( (  $LA LLIL UVfL߅ޅ ȥUVȑ`G u۱HȱH` q ҤȱL1L?   * , L* UJ PeSSQeTTfTfSfVfU` VL U *V *L) hh` ;) ` #Ș U *(  , 2 ȹ  2 *ݭ"I L". Й  Kȱ0 K Eץ ! L!UȱV` (fʅVϥUΥVU HI'I U)_8fWVh 52h% T($ n*I0 `    LA-H uVVh ʩST&&S&TSUTV TSUSΈυV΅UL΅PυQST 562-3670") $I1125:(16384)127ĂI9 .16368,0:W 8E$(27):R$(13):D$(4) BCOPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:CO"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"; 8:T$">> MUNCH-A-BUG <<":20(T$)2:T$:10:T$"BY WINK SAVILLE":20(T$)2:T$ 14:10:"COPYRIGHT (C) 1982":16:7:"SOUTHWESTERN DATA SYSTEMS" 17:7:"BOX 582 - SANTEE,CA 92071":20:12:"(714) OPYRIGHT1981SDS:::::RIGHT1981SDS:COPYRIGHT1981SD:38100:I40310:I,242:I22,242:I12,242w T(16384):16368,0 TSK TSK. FOR $49.95 YOU COULD SLEEP TONIGHT....* ::"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%":I222:"%";:39:"%":I:p  10000"R214,156:1012,0] COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:C     `XrCCvC Ʌ@ɈrC :LI$LIɕ$( B BrCʭvC$$ FLIrCC؍`?tC?uC?pC?qC? I`??I? I` 'A A A`tCauCm`lCPmamC` X [ $D D `` B H` NHlClCmCtCtCuC AC H H bF`8% E HwC [` HlCmC`LQH HlCmCȑyCzC`L}H$xC%wCyCzCnC{CoC|CsCC`xC${CnC|CoCyCzCCsC`lC mC`CCsC` HC 8sC}C}C8}CnC8}CnCoC X E H [`CC FC`CC bFC`I B pHlCmCtCuC AC8% E HwC [ $$rCCvCLG : Ʌ2Ɉ rC$LG B BrCآvC$$ FLaGrCC H ` IF :`sC sC$$$$`% F%% [$CsC` H`nCoC` F :`CsC sC$$$$`% GC8$%8 [sC` P`nCnCoC`CsCCC$xC ExC$ [C FPmtClCmuCmC X AC E$ [PpCnCqCoCCsC ɅL@Ɉ bFLڅ.";:1680:1(A$R$)(A$E$)21550,1650,1140@"INSERT ";::"COPY";::" DISKETTE, PRESS :";:1680:1(A$R$)(A$E$)21550,1650,1140JX16ĺ"WRITE-PROTECTED.":1640TCRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:::::RIGHT1981SDS:COPYRIGHT1981SDS::20:958:227,0:747X(12):C(227)::20:958:X11590X1610"C2ĺ"M.A.B. ";,"COPY DONE.211480,1450,1490+8,CD:9,CS16:12,V\:20:958:238,0:"INITIALIZING..."::619eIT0yDF11530,1450COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPY$)(A$R$)211450,1220,1470+IT1530sI1200:I::20:1:958:"REMOVE MASTER";::" FROM DRIVE, THEN"AD46583:AD,MS16:AD1,MD:AD2,255:AD1536:V(AD566):DFĺ"INSERT ";::"COPY";::" AND PRESS :";:1680:(A$E$)(A$R$):236,CD:237,CS16E28,(175):29,(176):30,(105):31,(106)1`(175)256(176)303DF0:V0:MSCSMDCDDF110,(28):12,0:227,4:20:958:"INSERT MASTER AND ";:DFĺ"COPY DISKETTE AND""PRESS :";:1680:(A$EMDA10:14:MD;:868UCSMS:CDMD::13:958::"SLOT:";:14:MS;:868:15:958:"DRIVE:";:14:MD;:868:d:20:958:"IS THIS CORRECT? (Y/N)";:1680n(A$E$)((A$,1)"N")(A$"Y")211380,1220,1400x234,MD:235,MS16958:"SLOT:";:20::"DEFAULT = ";MS::8:14:1680XT0:(A$E$)(A$R$)21110,1210jA1A71170sMSA8:14:MS;:868:10:958:"DRIVE:";:20::"DEFAULT = ";MD::10:14:1680(A$E$)(A$R$)21170,1260A1A21220IS PROGRAM"::7 `"WHICH ?";:1680:"":A1A21110Q jA2Ĺ1012,56:D$"FP" t:"DISK COPY PROGRAM - (C) 1982 R. WAGNER":"--------------------------------------" ~IT1 4:12:" TO BACK UP":7:" ALONE FOR DEFAULT"3:8:PYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:COPYRIGHT1981SDS:::::RIGHT1981SDS:COPYRIGHT1981SDS:AD47095:MS(AD)16:MD(AD1):CSMS:CDMD R(514)160T("C")128A2:D$;"CATALOG":1130 V:::"1) MAKE BACK-UP COPIES"::"2) EXIT TH` $$ K$  X  N` ,`  " "`L,   ,`PL`GTFM12LHHH $ Nhh  Xgf  N`NEXT END$   Lu#:9 $ N`;ERROR$ (P   L  >;' l $  NL` ,`ABORTED LAST LOCATION=$   , L,  L, b  B N`h PL, * CL,)( )@ K$  X # Ni  `  L} : ^8LK.  `L `LLK ,LK` ^  R  D+ lݬTU $  NLO` ,`VABORTED LAST SOURCE LOCATION=$ X)- K$    ٬ X- . K$ N  lLK`- "h) H(`,0  `8` L, # X  { `m "'    ,8` K$= K$ < {  ,8` ?` * '"   ,L,  0L  ?`8"J` # 0: K$ XL L   ,LhI-L `S S iLP ٌLC&@ i@  ,LLM iLD= K$= K$FT K$< { *L F T ,LL ,L K$= K$ < { N X X  N !`A K$= K$ `X K$= K$ `Y K$= K$ `,-  K$`S K$= K$ `P K$= K$ `CZIDVN@ A iLY isLX iaLFX < { *Jh -h  H  h N T ! { * ;-h  ,La La lCDSGQLAXTUNFMVPK^YOW7%+2 t|!w`  %`l ,` La ` ` B N` " <# N X  X  X  X  X  X  XHB:RELOC650.ERLRELOC650ERL 1I` ,BX``b ,A ` HK'@1@X %LL> L L /ʚ B N54 $ NLX6MAB VER 2.1 (C) 1982 WINK SAVILLE$ ʚH`<ȹ=ȹBȹCȹ>ȹ? ,L  ȩ   `"L5L88 8,,L,,L,,L mm Ɂi i iLiiiii iln q8`28/    sLL kаL ii' L8                       `8` ` ` ` `8` ` ` `8` ` S l ` S`8`B88 0 ` ``8` ` ` ` ` `8` ` `;ȭ LG` k   ,` ȹHH`Q8g  >`8` TM ` ` ` ` ` ` ` &` /`8`   8` ` ` `3 281118+'88%%&84483348 (88"""8 81118+'888%%84888338 +(88"+""8+ !81+118++'888+%%8-+4888+338 L, # { *= .j/^LG& '811'18+'888%'%8,48883'38)(888" "8# 811 18 +'888% %848883 38*(888"("8% (8<1(18 +'888%(%8.48883(388/(881"/"0"885811/1018+/'881%/%0&87/4688/388 ( 8"""8`  `    `    ` ``   `0mmii ` ` `, K$`( K$`) K$` X K$` Y K$`+ "(888"""8$" 88"118 +"'888"%%8 "4888"3381(88""'"8m'm(..mmm)m*)JJJJ)` K$` ȹHH`0]aelsz# K$  X'")  K$ K$` X X` ` `  `  `  X j  X8 X X X X X  N0&   lL^` j  X 5  "H\ Xh <#mi`.  ,L,  0L^ # 0 X  1$ 8hhh`H ii0 K$h(`HJJJJ hH) h(`H  h(`#"HHH#- K$8""##% K$$ !.".#. .!8  ! !.".# i0H$" #кh K$$hhh(`H K$h(`H K$h(``H(ih a$i`iHHHij Ljihhh`HHHij Ljhhh`HHHi Ljhhh`HHHij L ȹjhhh`  `a{8 `HHHijj  LO8hihhh(`Hijh`HHH # 1$ . ! L]LY% L $ !iiL]  80U  J8EAi Hmmhmi L L] "'   L]8`8HH:;E(lEFGH)ύ:;H(H8Ι Lb  u (` H _ * +-A  H @+mmL< 8LG 8` *L[ -+    L9 L  :;IHHEFG(l  )@ K$ Z Y $ # N   S N l+ )!ޝޜ  i L8  N  `[ PASS $ IFG@     `8`  i 8` ` F)8`      )L9 1͘*͙#) )` * L L ) )iҭL L  L )!L: ݟݠLK iǭV * ,!     T `>  i`i`VȩV`lb V`hhhH(  B NLahh ɆL LasLfgfgf`$$  ! $I@$I  @  @ @  !AH@H@ @H A $HD"I @H$H$@@@ @@ $BH@"I$$ $I  BBBB BHAH I $$I"@H $ HHHII $!DI$@@$@$H $$ II @@ IB$I!I $ $IB !B$I  III$ $$ DUUU!"D"$$ ABH$ IH$I$BIH!B$@ @I $$HB I@ $$@$ $$H $$$!! D$AHH$I@"I$$I$ $  $ I$$!$B !! $IBBB $IHHDB@@$  B$!@ $I$ )hh`HH$ K$hh`8``8`$ $)$  HBBHB$AD"$I$I$ B$I  $ $$@B! ! !IHB  I !!$ B@HHHH А#LLLHHi!ClCIW JSL #LE l $' l- ,8hh`HHH )hhh` 1$ K$HHH hhh(` 3HHHH jhha#h(`H`#a#h(`\#]#8`ȱȘe "`8 ȱ` _"  n" X X XL#^)@ K$  X 4#`  " X <#(` " <# N Xc#b# (`t#LH# s"t# K$LH#t# "`m#n# ? "L%! "` s"io# "Vo#ii)r#  ;r#L! "L!  0:A [ "L!p#q# _" o#i8 "`c#b# s" "$b#c# ii "L "8 "`Hhȑ``Hh``H`# g#f# K"h# V"d#e#k#L,LV8` ^ @  K"  V"`l# `! ^ @l#  l#`8` " " N l "L !` s" "w n"jɀf _"n#m# n"&)Hm#n#m#ȱn# 4#@ K$ Nhmm#n#iʈ !` ^(   !` Lb# " b# V" "L`A7[3i !" `&p#q# "< { ` `i ` ,` *ii# , Lj#9 4g#f#h# ^ @h#  h#h# ,L dk#Lp ^# _#N_#k#i#ij#   `ʎ`莖````m`h莖`\#]#^#_#`h *L( ` e#d# ,` ,`^# _#d#\#e#]#LV^#_#e#d# K"d#e# "^#_# K"` *m}` 4`ȱ `ȱȱ `Lcʎ     b H8`     `     `` H z `  lȭLL B N u `LSLoH h`  j  8` L%L4 +H*H`Ll `@Ws H(LhH(` H(RAPHAHPHPPLAhPLP(ROL"RORbRTI@RTS`SBCSEC8SEDSEIxSTASTX STY TAXTAYTSXTXATXSTYA??= LL  ,L, Y  L,      L  B N h;-,8 XLLYLLLL 8`ADCaAND!ASLBCCBCSBEQBIT BMI0BNEBPLBRKBVCPBVSpCLCCLDCLIXCLVCMPCPXCPYDECDEXDEYEORAINCINXINYJMP@JSRLDALDXLDYLSRBNOPOij  e?8iȱ(` * ;  L#  LL([   , X ) LL) , YvqL ; ` L P `<  5 1 ` ` `8` ` ` `8` ` ` `8` ` `8`8` D L` D L` D S` D L` D S` D S` D L` D L` D L` D` D`m `` `` ` ```)* *5   ,8` K$= K$ < {  ,8` ?` * '"   ,L,  0L  ?`8"J` # 0: K$ XL L   ,LhI-L `S S iLP ٌLC&@ i@  ,LLM iLD= K$= K$FT K$< { *L F T ,LL ,L K$= K$ < { N X X  N !`A K$= K$ `X K$= K$ `Y K$= K$ `,-  K$`S K$= K$ `P K$= K$ `CZIDVN@ A iLY isLX iaLFX < { *Jh -h  H  h N T ! { * ;-h  ,La La lCDSGQLAXTUNFMVPK^YOW7%+2 t|!w`  %`l ,` La ` ` B N` " <# N X  X  X  X  X  X  XHB:RELOC650.ERLRELOC650ERL 1I` ,BX``b ,A ` HK'@1@X %LL> L L /ʚ B N54 $ NLX6MAB VER 2.1 (C) 1982 WINK SAVILLE$ ʚH`<ȹ=ȹBȹCȹ>ȹ? ,L  ȩ   `"L5L88 8,,L,,L,,L mm Ɂi i iLiiiii iln q8`28/    sLL kаL ii' L8                ! !H@$@H@@! @ARD(B! @$(@((" ! B @B@ " U(@(*PEBB @ @@H@A!@ $ I !$!BHBH  A@AJ"DD$ $B$IHBI$$B D!$""D $BDB$$!BB$B!!HIBB@H$I$!IB  H$$$ "A$$H H$ D@ $B@ @ H$II@$  `  `    `    ` ``   `0mmii ` ` `, K$`( K$`) K$` X K$` Y K$`+ "(888"""8$" 88"118 +"'888"%%8 "4888"3381(88""'"8m'm(..mmm)m*)JJJJ)` K$` ȹHH`0]aelsz# K$  X'")  K$ K$` X X` ` `  `  `  X j  X8 X X X X X  N0&   lL^` j  X 5  "H\ Xh <#mi`.  ,L,  0L^ # 0 X  1$ 8hhh`H ii0 K$h(`HJJJJ hH) h(`H  h(`#"HHH#- K$8""##% K$$ !.".#. .!8  ! !.".# i0H$" #кh K$$hhh(`H K$h(`H K$h(``H(ih a$i`iHHHij Ljihhh`HHHij Ljhhh`HHHi Ljhhh`HHHij L ȹjhhh`  `a{8 `HHHijj  LO8hihhh(`Hijh`HHH # 1$ . ! L]LY% L $ !iiL]  80U  J8EAi Hmmhmi L L] "'   L]8`8HH:;E(lEFGH)ύ:;H(H8Ι Lb  u (` H _ * +-A  H @+mmL< 8LG 8` *L[ -+    L9 L  :;IHHEFG(l  )@ K$ Z Y $ # N   S N l+ )!ޝޜ  i L8  N  `[ PASS $ IFG@     `8`  i 8` ` F)8`      )L9 1͘*͙#) )` * L L ) )iҭL L  L )!L: ݟݠLK iǭV * ,!     T `>  i`i`VȩV`lb V`hhhH(  B NLahh ɆL LasLfgfgf`` $$ K$  X  N` ,`  " "`L,   ,`PL`GTFM12LHHH $ Nhh  Xgf  N`NEXT END$   Lu#:9 $ N`;ERROR$ (P   L  >;' l $  NL` ,`ABORTED LAST LOCATION=$   , L,  L, b  B N`h PL, * CL,)( )@ K$  X # Ni  `  L} : ^8LK.  `L `LLK ,LK` ^  R  D+ lݬTU $  NLO` ,`VABORTED LAST SOURCE LOCATION=$ X)- K$    ٬ X- . K$ N  lLK`- "h) H(`,0  `8` L, # X  { `m "'  А#LLLHHi!ClCIW JSL #LE l $' l- ,8hh`HHH )hhh` 1$ K$HHH hhh(` 3HHHH jhha#h(`H`#a#h(`\#]#8`ȱȘe "`8 ȱ` _"  n" X X XL#^)@ K$  X 4#`  " X <#(` " <# N Xc#b# (`t#LH# s"t# K$LH#t# "`m#n# ? "L%! "` s"io# "Vo#ii)r#  ;r#L! "L!  0:A [ "L!p#q# _" o#i8 "`c#b# s" "$b#c# ii "L "8 "`Hhȑ``Hh``H`# g#f# K"h# V"d#e#k#L,LV8` ^ @  K"  V"`l# `! ^ @l#  l#`8` " " N l "L !` s" "w n"jɀf _"n#m# n"&)Hm#n#m#ȱn# 4#@ K$ Nhmm#n#iʈ !` ^(   !` Lb# " b# V" "L`A7[3i !" `&p#q# "< { ` `i ` ,` *ii# , Lj#9 4g#f#h# ^ @h#  h#h# ,L dk#Lp ^# _#N_#k#i#ij#   `ʎ`莖````m`h莖`\#]#^#_#`h *L( ` e#d# ,` ,`^# _#d#\#e#]#LV^#_#e#d# K"d#e# "^#_# K"` *m}` 4`ȱ `ȱȱ `Lcʎ     b H8`     `     `` H z `  lȭLL B N u `LSLoH h`  j  8` L%L4 +H*H`Ll `@Ws H(LhH(` H(RAPHAHPHPPLAhPLP(ROL"RORbRTI@RTS`SBCSEC8SEDSEIxSTASTX STY TAXTAYTSXTXATXSTYA??= LL  ,L, Y  L,      L  B N h;-,8 XLLYLLLL 8`ADCaAND!ASLBCCBCSBEQBIT BMI0BNEBPLBRKBVCPBVSpCLCCLDCLIXCLVCMPCPXCPYDECDEXDEYEORAINCINXINYJMP@JSRLDALDXLDYLSRBNOPOij  e?8iȱ(` * ;  L#  LL([   , X ) LL) , YvqL ; ` L P `<  5 1 ` ` `8` ` ` `8` ` ` `8` ` `8`8` D L` D L` D S` D L` D S` D S` D L` D L` D L` D` D`m `` `` ` ```)* *5 `8` ` ` ` `8` ` ` `8` ` S l ` S`8`B88 0 ` ``8` ` ` ` ` `8` ` `;ȭ LG` k   ,` ȹHH`Q8g  >`8` TM ` ` ` ` ` ` ` &` /`8`   8` ` ` `3 281118+'88%%&84483348 (88"""8 81118+'888%%84888338 +(88"+""8+ !81+118++'888+%%8-+4888+338 L, # { *= .j/^LG& '811'18+'888%'%8,48883'38)(888" "8# 811 18 +'888% %848883 38*(888"("8% (8<1(18 +'888%(%8.48883(388/(881"/"0"885811/1018+/'881%/%0&87/4688/388 ( 8"""8 űűűűűűűűͺԢͮ®Į! !H@$@H@@! @ARD(B! @$(@((" ! B @B@ " U(@(*PEBB @ @@H@A!@ $ I !$!BHBH  A@AJ"DD$ $B$IHBI$$B D!$""D $BDB$$!BB$B!!HIBB@H$I$!IB  H$$$ "A$$H H$ D@ $B@ @ H$II@$  $$  ! $I@$I  @  @ @  !AH@H@ @H A $HD"I @H$H$@@@ @@ $BH@"I$$ $I  BBBB BHAH I $$I"@H $ HHHII $!DI$@@$@$H $$ II @@ IB$I!I $ $IB !B$I  III$ $$ DUUU!"D"$$ ABH$ IH$I$BIH!B$@ @I $$HB I@ $$@$ $$H $$$!! D$AHH$I@"I$$I$ $  $ I$$!$B !! $IBBB $IHHDB@@$  B$!@ $I$ )hh`HH$ K$hh`8``8`$ $)$  HBBHB$AD"$I$I$ B$I  $ $$@B! ! !IHB  I !!$ B@HHHHȠ)F.?аr Gnc xa(ҠŠϠ)a(ΠĠ)G Tа!`8аr8аr%_dаeаca(Ǡ®İ)&a@E(Š®İ̤)Qca(ĠӇ)c_x @p()аqc%a(ӠŠ̠נՠ)'(a(٠ȠŠϠ)#2a(Ӡ®İ̠Ů)<c,Fa(Ǡ®İ)a@E(Ġ®İ)Pc.Za(٠®İӠĠϠ)'db.?аrE("  1201OCP0);" THROUGH ";(LOCP0)12;$ nE x"ENTER A PAGE ZERO ADDRESS"a "BETWEEN 0 AND 213: ";l P0ADR (P0ADR0)(P0ADR213)ī210 LOCP0,P0ADR "SAVING MAB.D000" D$;"BSAVE MAB.D000,A$1000,L$3280"  "BAD ADDRESS D$"":LOCP04101C"THIS ROUTINE WILL ALLOW YOU TO"k("MODIFY WHICH 43 PAGE ZERO MEMORY"2"LOCATIONS MAB.D000 WILL USE."<F"LOADING MAB.D000":D$;"BLOAD MAB.D000"PZ"CURRENTLY MAB.D000 IS CONFIGURED TO USE" d(Lnc xa(ҠŠϠ)a(ΠĠ)G Tа!`8аr8аr%_dаeаca(Ǡ)!a@E(Š¬̤)Qca(ĠӇ)c_xn @p()аqc%a(ӠŠ̠נՠ)&(a(٠ȠŠϠ)2a(Ӡ ̠Ů)<c"Fa(Ǡ)a@E(Ġ)Pc)Za(٠ ӠĠϠ)&db.?аrE(Ƞ)F.?аrOCP0)3 n. x"ENTER A PAGE ZERO ADDRESS"J "BETWEEN 0 AND 252: ";U P0ADRu (P0ADR0)(P0ADR252)ī210 LOCP0,P0ADR "SAVING MAB" D$;"BSAVE MAB,A$1000,L$3280" "BAD ADDRESS" 120 : D$"":LOCP04101C"THIS ROUTINE WILL ALLOW YOU TO"j("MODIFY WHICH 4 PAGE ZERO MEMORY"2"LOCATIONS MAB WILL USE."<F"LOADING MAB":D$;"BLOAD MAB"PZ"CURRENTLY MAB IS CONFIGURED TO USE" d(LOCP0);" THROUGH ";(L        PxBELLPCOUTaPB0PREADWAITAMPERCTRLYRESETKYBDSTRB0SPKRXHOME`BLENrBADRI ɍ`ԍ      e$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$L ) \ۥ$! ک$ȱȱж \L枱`8Єτ ,0 \ ,0 \ \۩ И F eihh eHiHvHuH j gݥ %ׅ^_L ީ  g ޥHHH XإvyzW4ȱuȱv Нƹ`ghȥQћ Pћ `֨gȑggiihij ֩*stopijklmn IآURhhHHz`gihi` ,  ,Є hhPQPQD X ȱȱQP- $_^ ijL<Ԡȱ^Șe^^_iȑ^^_Ң3 j )` )`ʠ$hh eL$p "tpM?E0<=Ѕυ 8ɀA N4O0Ťș98:I8xІșh0hhpo`M$L Z۽`H \h ֩P :ۤv  ڢ .ՆF v YLئij YՄ ֐D_i^aeii`jij圪8iae^_^`_a8stopiejȄ ӥPQmnij e֥gh^ DIRECTYPE MISMATCSTRING TOO LONFORMULA TOO COMPLECAN'T CONTINUUNDEF'D FUNCTIO ERROR IN BREAKɁ! i` Ӆmn8囅^圪#8^Ɨ8^ƕƗƕ` i65^^.`p(o"H H ANOҾSGINABUSFRSCRNPDPOSQRNLOEXCOSITAATPEELESTRVAASCHRLEFTRIGHTMIDNEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALESHLOATRACNOTRACNORMAINVERSFLASCOLORPOVTAHIMEMLOMEMONERRESUMRECALSTORSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOWAILOASAVDEPOKPRINCONLISCLEAGENETABTFSPCTHEANOSTE0oeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL         !!! ! ! ! ! !!!!!!!!!""" " " " " """""""""     ]"`.?r$6P,a(ŠĠԠŠ)a(̠Š͠ӠĮ)6a(ң)F.?6UrQ}d?ed@e`M`.?r$]]ƠŬĠ]2o a(ǠԠϠŠĩ)a(Ġìİ)]ŠԠŠq.?6~?r]ð_6]]ϠĠҠΧԠUnd$ed%ed&ed'e d(ed)ed*ed+ed,eUsd-ed.ed/ed0ed1ed2ed3ed4ed5eUxd6ed7ehd8ed9ed:ed;ed<ed=ed>eU_d eHd ed ed ed ede#dededeUddededededededededeUidededededeJd ed!ed"ed#e ]Ӡ]Kc (M6*2a(ӠΠ)1<ca(ŠɠĠ͠)F] P]ŠŠĠUZdededededeHdedededeh  W8Ie Ji `eeeeeLi&&&&8坰IiBfffff`IIIIII `ELԢai0ᦠL LN覸^e^`_a`H` Jh`` g R L楝ɑ 률PQ`PHQH RPhQhPL F犠P` F熅  L熆PE%`dL 饢IEL < LS리8$Ii0ǨV $` lݥ^_ 5^Hȱ^ȱ^h(po Heooph^_`T SRS` H hhhL* ьHH 㥌 hhe^^_ L* IL` ) ʊH񌰸Iš hhhhhhhHH` L ` ^LL g ^ ie^^__Ŕ #^05ȱ^0ȱ^+ȱ^ȱ^poŜ䛐^_e^^__`)Jeiop Ӥȥ敥ȑL䥡HH ` lhhqL 奌  奫  *LݠHȱȱh^_ H^qheqqr "e膮 㦫 R^LԥSR`FHI8eopnm opqrh`M0 䩀hЦstopmnU^_R #ij^_lk 󅔆nmLb^_^ȱ^ȱ^eȱ^e(ӊ0ȱL$8vС,L A  ީ j ީ HHHHH L  ߅Lj A㥋HH jhhȱ𙅄ȱH +륹HHȱHH ghh Lhhhhȑhȑhȑhȑ` jݠ 6hh R䆞`" ȱ ↭^e]eR Ӆmn殤ƕƮ8m因n圑bȱhhћȊћLLȥ e^eʅʥʆd ee`^de *& edeeƙ` 8ompn` gݥ0 ɐ ~LGHHHHH hhhHH ,҄ hh)klnm?Łћȱeȱeעk,5LԢx8` ћLK*L өȥʆȑ $PhihiȑȊLL(L<  } }$%0Ʃ 8(L$0pijlk"ћћliA[8`hH`klmniȅ ӥȅklȥȑȑȑȑȑiȅ` ieȅ q L H ϐ { lhHHH hHL? hυυ Ljݥ ,L mݰ % LߩƉ 慝 憨80 ў*%L L ު `  }LޢٹHH ޥLLޥШh^^h_H r륡HHHHHl^h#d j݄hJhhhhhhE` LJ }d.U"i L=8,LLTҐL {ݩ),(,,ѸLLԠhhL ߅` ȱLL  ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаH $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER  \I`$ !i)$ )L(ʊ$ L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅hL* ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)94,;D {$0 4 Lک?`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơ`J G(i.&E0%.Q&&` , iH h-`/'-'0 (`HJ) 'h)i& &&`0i)0 00`J G&(JJJJ)`:; H:J jɢ )Jb y.)/) JJJ Ȉ` H:  J/Ȑh,--& W :L ` `  eȱe ` -L -La=?P<Ȅ> sʆ>PHt?QnLԅtp=hso< LeP>eQ? ॔<=`@ ߩL ʊ( (H hL$`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ` g RQPHH, hh`L `*Uf&i'`'i,&i,&iPII&if&HhH8HӰ hIiHӅхhЅhIi҄f8Ъх e8e҅ԥձ&E%0Q&&bӰ eЅԥePفŴxaI1& ')*& 'JJ) e ʥ0)Je ~)`H)&JJ&&h' &' &' f&')'#i媽0J(` Q&%0Q&&`#0JI0`'0 I`0 I0ݩ()%%01&%0)&E%0Q&&e)j00',"&,i8i#H&ii&hizݥ􅸥uv >Lץڅuۅv܅݅ߚLLްij ֥`a, PQ ֥`a```aiśj地a`ʈjiLԭVSL@TL9 ʅPQ L PȱQL L,U,R@ ,T,SWP0,-`L ,- 0` (L ,(ʤL (L( Ld ʊL[ I`8f`?2`@ g RPmQnLԥPsoQtp` g RPsQtPiQj֥PiQjLl֩ ޥ8fإuv Lنަߥuڥvۥyܥ~L̑湭`: 808`ORXv( sL  񕰆򊅤TH کURPQQPIPPIPPPQ)stopgh֘gghgh K֩:ۅ<ԅl g RlP L L 0, c # p 祢H 祢0 I p h uL\ !  禎  b𩊠LfHL#IڢIڢ-(h#5ᆥ](IڢʥH HɁ fΠ \hɁf hL` vy{| g|S}dpL}Qz}c0~~D:ƀ1r۠ 饬iP z녒 f륝Ɉ + # i8H rh ` !멓  v禎L酭 뱭Ș殅 饭iȅ 穘ƣ`5Dzh(F 0ɠ 穦 驪 禡 .ɠL+f ck ^ƙ.șI)$Ъ0.ȩ+.8嚪-E/8 i:`  cd pLP袊 +륪 #쩊  UH A驊  hJ I`8;)q4X>Vt~w/z*|cYX ~u q80L>nk'nk(X 1vu8 4L:۠-$șȩ0LW     9ƙ U i 0 i8.ș0șylykyjyi00ڊIi i/ȄȪ) 芢 脤`)F 鄤`ɠ 넬I* L)腞` -+ [..E0 - +f \$8Lf$På8噅 U 9ƚ0`LH$ 9h80 LaH ch 륪EL祚 d$0L e_^^^^ ^`, r^_^^^ %^^`` r` L襝 *` 녞I*L)F``a`Ȫı`E0!` Şȱ`şȱ`Š ȩŬ`(IL륝J8$E ^`e0,iLR襫`I0hhLNL ci ` cP Li v r8坅 Ğğ Ġġ* e24(&&&0⨥塅堅埅垅L@ (LꢅLԥbcdeL.^vvvvvj`^Vy dv88; 54541r LᥝH- 2 f  \7 h < L bcde 饡 饠 饟 饞 LLJ eeededcecbebfbfcfdfefJ`^_^^^^