' +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` `PP`>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 pP Рˠ@跻~!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£֠ԠPˣ٠Ơ͠z# Pu`  256^:2054,0:I0255:2051,I:2053,I:(37)1:255::2051,10:2053,171:2054,50, ============ TOKEN WRITER ============:H "E"H ============== THE GREAT TRACE MYSTERY! ==============kH$"HHHHHHHHH":I$"IIIIIIIIII":10:I$:I1019:I:10:"J"::20:"G";H$(8:0,919:0,939:I19392:9,I:25:"TRACE WITH THE RIGHT ARROW & KEY.":9:A28,160X(A)15A28,160X(A)$ x3000 <A((1)10)$ FX(A)X(A)1X PX(A)(X(A)50)500Ğ:BUZZ19:S(16336): ZX(A)160AVG(I10):24:14::(7);" AVERAGE: ";AVG;" ";:1:3:0,161AVG279,161AVG:0,159AVG279,159AVG:: d23:1A4(X(A)100):X(A): nC(A):3%& ========= RND CHART =========Q :N09:21:24N:N:14N:"---":q X(65536(78)256(79))z:3C(0)3:C(1)1:C(2)2:C(3)5:C(4)6:I59:C(I)C(I5):6:Y915910:0,Y279,Y::3:Y915950:0,Y279,Y: 2I1100018)256(219);".": P+ =========== LINE TRACER ===========6 5000l"THIS IS LINE ";(117)256(118);".":I1500:"THIS IS LINE ";(117)256(118);".":I1500:"THIS IS LINE ";(117)256(118);".":I1500::14 "PROGRAM STOPPED AT LINE ";(2  ;:I1999::1:8685 PL40āIL140:A$A$" ":I ZPP1:P40P1q d12:1:(A$,41P);:P1ĺ(A$,P1) nK(16384):K128130 x16368,0:K175K186SP30(K176) I1SP::900 ======= MARQUEE =======+:SP50M1:"TYPE YOUR COPY BELOW.":("";A$:(A$)40Ģ3:958:20:"40 CHARACTERS OR SHORTER, PLEASE.";(7):302:3:A$:L(A$)<I312:I1:868:I:A$:J199:: F1:"(KEYS 0-9 CONTROL SPEED.)" A COMMA.":30$ FLAST$(NAME$,X1)< PFIRST$(NAME$,LX)y ZL(FIRST$):(FIRST$,1)(160)FIRST$(FIRST$,L1):90 d:"HELLO, ";FIRST$;" ";LAST$;".":"MY NAME IS COMPUTER, APPLE!":5 ============== COMMA INPUTTER ==============;e"TYPE YOUR NAME ":"(LAST,FIRST): ";o(6572NAME$"":X512767:C$((X)):C$(141)NAME$NAME$C$: <L(NAME$):X1L:(NAME$,X,1)(172)Ă:"PLEASE SEPARATE YOUR NAMES WITH Z50? dEMAN$"":X(NAME$)11:EMAN$EMAN$(NAME$,X,1):X n:::Q$;NAME$;Q$" SPELLED BACKWARDS":"IS ";:Q$;EMAN$;".";Q$: x"TYPE ANOTHER NAME: "; 40 1 ============= RETTEG RETTEB =============U:BKSP$(8):CR$(13):Q$(34)p"WHAT'S YOUR NAME? ";(NAME$"":502LTR$:LTR$BKSP$NAME$(NAME$,(NAME$)1)::LTR$;" ";<LTR$CR$100FLTR$" "NAME$NAME$LTR$P:LTR$; T.": 90"THIS IS SHUFFLE.":I :0 =========== GOSUB POKER ===========NJ  302213,48G(G10)10:2212,48((G(G100)100)10):2211,48((G(G1000)1000)100):2210,48((G(G10000)10000)1000):2209,48(G10000):00678:SHUFFLE12345:COUNT678(GSHUFFLE:20-GCOUNT:202 "THIS IS COUN :BUTTUN16287"X01:9(XBUTTUN)127ĞI(10:120Xa2"PADDLE ";X;":";:s<" ";(X);2)~FX:20B 2DA ================== TEXT SCREEN FORMAT ================== 2::I139:A$A$(95)::I124:I:1:A$;:::X223:Y5405:X:Y:(A$,1);::<Y12423:I5355(Y1)5:Y:I(I9):I;::::I124:I:1:I;::2038,52:2039,48::60  (8):G$(7):T0:C0G Q16384:QQ16368:BKSP136:N1:HBIT128:CR141 1:I111:1:MODI(I2)2:(4210(MOD0));:160:::1:G$;" START ";G$;:160::1:868 QQ,0:1:C$;: W1100::ICONDS = ";(60WS);" WPM":I139:"-";:r d24:1:" ANY KEY = TRY AGAIN, Q = QUIT.";:1:A$:A$"Q"ĺA$:40 i23:958: n:::22:7:"TYPE WHEN YOU HEAR THE BELL.":I139:"-";::24:10:"TO STOP, HIT ."; xC$(95)(32)(8)> ================= SPEED TYPING TEST =================eADJ97: (LOWER TO SPEED UP CLOCK)n(1102TTN:K(Q):KHBIT50FQQ,0:KCRĺ(K);C$;:CC(KBKSP):50P958:W((C2)5):S(TADJ)* Z22:1:958:W;" WORDS / ";S;" SE(N(N5)5) d(36)0ĺ nX53854ERR1::I1500::::" APPLESOFT ERROR MESSAGES: "::"---------------------------" xX=. ========= APPLESOFT CRUISE =========HSTART53456:FIN54116:::" APPLESOFT COMMANDS: "::"---------------------"(XSTARTFIN:P(X)2P7Ğ:"G";:<(P);:P128110FNN1PERRĖ122((N(N2)2)0) ZERRĖ18A=74:B=2:GOSUB9:A=66:GOSUB9" "5A=63:GOSUB9:A=56:GOSUB9:A=49:GOSUB9:A=74:B=6:GOSUB9:FORJ=1TO60:NEXTJ:A=66:B=4:GOSUB9:A=59:B=3:GOSUB9:B=1:GOSUB9":"7A=56:B=6:GOSUB9:A=49:B=2:GOSUB9:A=43:GOSUB9:GOSUB9:A=56:B=6:GOSUB9:END":"RUN":"CLOSEX":"EXECX"d-MARC RINGUETTE-- TERRACE, B.C., CANADA "OPENX":"WRITEX":"CALL-151":"2:AD 30 C0 88 D0 04 C6 01 F0 08 CA D0 F6 A6 00 4C 02 00 60 40 00":"INT":"9POKE0,A:POKE1,B*42:CALL2:RETURN":"3A=66:B=4:GOSUB9:A=56:B=3:GOSUB9:B=1:GOSUB9:A=83:B=6:GOSUB9:]ŠέŬ? M6P a(ǠծƮϮ)P a(٠Š):dedeUVWX6deM6(Y_VWX6deM6(Y_' JERRY KRAMER-- PHILADELPHIA, PA::3:A201707:B1.15((6400(A95)2)):C06.4.2:XB(C)139:YAB(C)5:C0ēX,Y:X,Y:: ! MARK BACHMAN-- AUSTIN, TXw :Z010.2:X010.2:3:Y10(3((X5)2(Z5)2))250:X2020Z3,YZ100:X2020Z3,YZ101X2020Z3,180:::  PAGE ONE. ";::C1(H$):511C,((H$,C,1))128::144 CHRISTOPHER VOLPE 30 CROCUS LANE TRUMBULL, CT 06611 SEPTEMBER 16, 1981E( CHRISTOPHER VOLPE-- TRUMBULL, CTH$"303: AD 52 C0 AD 51 C0 A9 22 EA EA EA EA 20 A8 FC AD 50 C0 A9 47 3E 00 00 3E 00 00 3E 00 00 3E 00 00 3E 00 00 3E 00 00 3E 00 00 3E 00 00 3E 00 00 3E 00 00 20 A8 FC 4C 06 03 N 303G": I140:"THIS IS TEXT%DAVID GERSHON-- SEAL BEACH, CA232,255:233,255:X((1)120)1:R((1)40)::R:X90,90:H((1)8):H0H4H1H:X90,90:1:TRY THIS EVERY NOW AND THEN JUST TO SEE WHAT'S GOING ON. 2731:A.01:B131:2SB:B,"$";A:AA2:::" ANSWER: HOLD OUT FOR MORE.";:23 CHRIS JOHNSON 17 BROOKVIEW LITTLE ROCK, AR 72209 SEPTEMBER 26, 1981 L& CHRIS JOHNSON- LITTLE ROCK, AR::"YOU ARE OFFERED ONE CENT ON THE FIRST DAY OF YOUR NEW JOB, TO BE DOUBLED EVERYDAY THEREAFTER FOR A MONTH."::"] QUESTION: SHOULD YOU ACCEPT?";::2:" ":R :"DAY","PAY":"---","-----------":34,8:S1" DAVE POLIDORI-- EYNON,PA Y(1)191::7:16302,0:I1750:XXY2279(X279):XX279(X279):YYX4191(Y0):YY191(Y0):X,Y:X,191Y:279X,191Y:279X,Y:I:1[;2٠ŠӠŮɠŠҠŠϮϠŠտZ:L20552105:((L));:HCOLOR= 0: HPLOT XOLD,YOLD TO XNU,YNU:REM (OMIT 1ST "REM" TO CHANGE)L x22a "X:";(XNU);" "v "Y:";(YNU);" "~ 60P> ============== PADDLE PLOTTER (HI-RES) ==============XPX279255:PY191255`:p(XNU(0)PX2YNU(1)PY<XOLDXNU:YOLDYNUFXNU(0)PXPYNU(1)PYZ3dXOLD,YOLDXNU,YNUD nIF XOLD < > XNU OR YOLD < > YNU THEN   15C0L 21:1:"PADDLES CHANGE POSITION-> X:";(XNU);" Y:";(YNU);:868 23:1:" ANY KEY CHANGES COLOR-> ";C;":";C$(C);:868 60 $(9)"ORANGE":C$(10)"GREY":C$(11)"PINK":C$(12)"LIGHT GREEN":C$(13)"YELLOW":C$(14)"AQUA":C$(15)"WHITE"s : (XNU(0)PX 2YNU(1)PY <XOLDXNU:YOLDYNU FXNU(0)PX PYNU(1)PY dC:XNU,YNU n(16384)127Ĺ16368,0:CC1:Cϑ> ============== PADDLE PLOTTER (LO-RES) ==============JC$(15)bPX39255:PYPX:C1C$(0)"BLACK":C$(1)"MAGENTA":C$(2)"DARK BLUE":C$(3)"VIOLET":C$(4)"DARK GREEN":C$(5)"GREY":C$(6)"MEDIUM BLUE":C$(7)"LIGHT BLUE"k C$(8)"BROWN":C  ======= RUN PUN =======?A$"PPS.!ZPV!TQFMMFE!SVO!X"QA$A$"SPOH/"]L(A$)h1036s(1036}2998<1008F(A$,1)P211ZI2LdX((A$,I,1))n(X28L);xIA  DEMO-- MAKES RUN+1000D40286,35:40287,216NXX1d(X;" ";:X40030240286,35:40287,216::"START COUNTING...";:X0:30==,8,10,144,8,238,149,3,208,3,238,150,3,202,208,242,200,192,196,144,232,96=========================== "KEY-CAT" CATALOG MENU-FIER BY BERT KERSEY (C) 1981 BEAGLE BROS. LISTS UP TO 23 FILES SELECTABLE BY ONE KEYPRESS. =========================3:35:32,37:33,3::"---------------------------"{:5:" SECUSE":" SECFRE":5:" ";U:9:" ";R:::H 1,96,1,0,17,0,145,3,0,149,0,0,1,0,0,96,1,0,1,239,216,0,0,169,3,160,128,32,217,3,162,0,142,149,3,142,150,3,160,56,185,0,149,16210N32>BSC11N48<pX015:H,V)XT$T$(XN):D:_:I896960:P:I,P:AE149(157(978)):905,AE:938,AED(MEM485):S(MEM487)897,S16:911,S16:898,D:912,D919: $397R(917)256(918):UNSR4):H,V1!|BSC10TSC0SP0;BSC10TSC0SPSP1JSP21850PMEM1313,22:MEM1466,21:MEM1463,12:MEM1464,253:216,0:MEM1463,12:MEM1464,253D22::D$;T$vBSCH,V1):TSCH,V)N64:BSC13N80 BSCЭCOLĭSCT10T$BR$+COLĭSCT2T$BR$CCOLĭSCT2T$EX$ZCOLĭSCT4T$EX$JX21VSEL1:J:1:" ";::VSEL:1:958I21:1::" ";:2:T$;:JVI:H737:1960:TSC:H,V:BSC12(BSC12BSC13)8(BSC10BSC115000:1060#A$MAX$A$"A"1060kCOLāI0462:(5,I)TSC5,I1)BSC)(4,I1)96,I1)9)1360COLāI0462:(COL1,I)TSCCOL1,I1)BSC)1360PCOLSCT3,I):SCT13SCT14T$RU$QCOLSCT1,I):SCT1SCT9T$RU$ ";:TSC14,2VSEL2):BSC14,2VSEL1):] WCOLĢVSEL:1:37):COL::8COL);"SELECT:"; `COLĹ16368,0:A$:VSEL:15::A$;" ";:TSC14,2VSEL2):BSC14,2VSEL1): (A$)13360 A$"Z"Ĺ216,0:MEM1463,12:MEM1464,253: A$"#"İ" "N$" "VSELV21:1060o COLĺ" ";:50,63192(LOCK$" "):FILE$;::" ";::N$;::N$" "Ė38:"." COLĖCOL::N$;::N$" "Ė38:"." : $VSEL0VSEL24* VCOLĢVSEL:1:37):6::" SELECT:";:16368,0:A$:VSEL:15::A$;"1:VX442::V21:19 0LOCK$" ":0,V)10LOCK$":"P b1,V)1FILE$"]"g 1,V)2FILE$"*"~ 1,V)9FILE$">" 1,V)4FILE$(34) *LTRLTR1:TEST$N$:N$(LTR) \1,V)0FILE$" ":N$" ":N$" "TEST$" "MAX$TEST$ TEST$v 768,32:769,12:770,253:771,201:772,141:773,208:774,3:775,76:776,44:777,AE:778,76:779,60:780,AE:781,0 6MEM1463,0:MEM1464,3 hMAX$"W":D$(4):D$;NO$"C,I,O" 255::::1::D$;CA$ X1452:(5,X)11)ĂX LTR64:XXENU-FIER BY BERT KERSEY (C) 1981 BEAGLE BROS. LISTS UP TO 23 FILES SELECTABLE BY ONE KEYPRESS. =========================== nMEM((978)((978)127)256)2562947:AE174(157(978)) xNS40393((MEM2925)16) 360 MEM1313,24:MEM1466,23 ? CA$"CATALOG":RU$"RUN":EX$"EXEC":BR$"BRUN":NO$"NOMON"ICOL0(COL=LETTER-COLUMN. CAN BE 1, 3, 4, OR 7. LET COL=0 IF NO FILE CODES WANTED)COL1COL3COL4COL7COL0z <=========================== "KEY-CAT" CATALOG M      :dF0:CC1:16304,0:16302,0:16297,0:X140:Y20:XRX:XLX:YTY:YBY:3:3:C6C1FF1:C:XLXL2:XR,YTXL,YT:YBYB2:XL,YTXL,YB:XRXR2:XL,YBXR,YB:YTYTF11.53:XR,YBXR,YT:4Yd%a()G]̭ǩ;d2eUVWq.?6?rYoPa(Ӻ)G`@$ oQ bGd2e`=>r$Kd2e?oPa()GfghUVW!Yf gh4qd2ePa(Ӻ)F_f ghoPd2e?a()GEd2eqPbGP%`o?d]͠Ԡҍ7i]ԠӠϠԠ̠ŠĠӡnLM6f xoUVWxa()GY0oPM6da(Ӻ)GPa(Ӻ)G5q/?(rq/?(rqoPB5173,48,192,136,208,4,198,1,240,8,202,208,246,166,0,76,3,3,96IBUZZ)(BUZZ)(BUZZ)(BUZZ)(BUZZ)::A=== SCOREBOARD ===`24:4:SAUCER;:14:SHOT;v24:HIT;:HITı34:((100HIT)SAUCER);"%"; YFALLY1:Y1((1)25)3:0,(100(3N)):1,5771}I771789:A:I,A::20:640:HRZ,YFALL:60F:I039:0,39I:J19:::J1222:PD:88_NI1500:rX=== NOISE ===b9:23,2535:22,2334:25,2634lJ110:S(BUZZ)(BUZZ)(BUZZ):v0:23,2535:22,2634:J12)S(BUZZ)(BUZZ)(11:11,3812:10,3813:10,3814:10,371510,3716:10,3717:11,1418:16,3618:12,1319:16,3419:16,3420:17,342131,3322I122!I(I2)20ĠSCRCLR"I(I2)21ĠGUNCLR&J12I:0HRZ((1)40):YFALL((1)20)RZ2,39:38,39HRZ3:36,37HRZ4:HRZ5,37K:BEEP$;BEEP$;BEEP$;BEEP$;WSCRCLRfI3962u19,29I119,29I:64029,332:20,233:28,343:18,244:27,354:17,355:16,356:15,357+16,368:13,379:12,3810:11,38LLYY:HRZ35340$ @YFALL38İ390* JJ T36,39YFALL1:37,38YFALLz h800:SCRCLR((1)14)1:SCRCLRGUNCLR360 rSAUCERSAUCER1:670 |HRZ0: === EXPLOSION === 21:HRZ:SWEAR$:KILL0 15+HRZ,37:HRZ1,38:35,37HRZ2:HHRZ1,HRZ4YFALL1 08 "HRZ1,YFALL:HRZ,YFALL1u ,KILLčHRZ4,YFALL:HRZ,HRZ5YFALL1:HRZ,HRZ5YFALL2 1YY0310 2N41YFALL:900 3XFALLXFALL((1)3)1:HRZXFALL19XFALL1 4HRZXFALL25XFALL1 6HRZHRZXFALL:YFALLYFA27:SLUGHT3,SLUGHTI:* HITHIT1:670; YY1:XFALL0L Q16,0:240k 24,SLUGHT1:0:24,SLUGHT SLUGHTSLUGHT1:SLUGHTYFALL3220 0:0,3524:SLUGHT35:Q16,0 240 120 === SAUCER === SCRCLR HRZ2,HRZ3YFALL: SHOTSHOT1:610 670$ 15= 24,SLUGHT1)0200O === HIT! ===n 24,SLUGHT1:0:24,SLUGHTu 9 22,SLUGHT3:23,SLUGHT2:23,SLUGHT:24,SLUGHT1:25,SLUGHT:27,SLUGHT2:SLUGHT3,SLUGHT225 I19:620::KILL1 0:I22FALL1:YY0:HRZ0:SCRCLR((1)14)1:8005 Z21:1d _" SPACE TO FIRE, ANY KEY TO STOP BULLET "m a800~ d=== GUN === nGUNCLR((1)14)1:GUNCLRSCRCLR110 sGUNCLR:22,2639:23,2538:36,3724 xK(Q):K160220 SLUGHT35140C 32000::&(SWEAR$" @#&! "H2Q16384:BUZZQ48:BEEP$(7)NFP23:1:":SAUCERS:";:11:"::SHOTS::";:21:"::HITS:::";:31:":PERCENT:"U24:1:":::::::::";:11:":::::::::";:21:":::::::::";:31:":::00%:::";* X370:SLUGHT35:X         :3F'REED RIGHTHEAD-- SAN DIEGO 3::2F0:CC1:16304,0:16302,0:16297,0:X0:Y0:XRX:XLX:YTY:YBY:3:C6C4C1 FF1:C:XLXLF11.52:XR,YTXL,YT:YBYB4:XL,YTXL,YB:XRXRF7.52:XL,YBXR,YB:YTYTF11.53:XR,YBXR,YT  !]Šέάad6?eLqq'fij'kf/?rghghq'`$_Sf/?rijklmnq/?(rq/?(rq/?(rq/?(rq`%q_ ]Ӡŭ̬nUVWq.?Lr8.?Mr8.?Mrrrdea(Ԡ٠٠ϠŠŠ)GM6tYQclmnq/?(rq/?(rq/?(rq/?(rq`%q_ ]Ӡŭ̬`M6M60qq6,qUVWqqqq/?rq/?rqqMZqqMqqqMqqMd6?e.?6?rd6?e.?6?rY ]ӠҧӠĠ ! R.F.MODULATOR-- SAN DIEGOi16304,0:16302,0:16297,0:X140:Y95:XRX:XLX:YTY:YBY:3:1CC1:C(C6)6:XLXL3:XR,YTXL,YT:YBYB2:XL,YTXL,YB:XRXR3:XL,YBXR,YB:YTYT2:XR,YBXR,YT:2X % DENNIS MARTINEZ-- ALBUQUERQUEm:E(191(1)):D(279(1)):C(3(1))2:B0191C:(6(1))1A0270C:D,EA,B:::62454:T1100:Z(16336)::1E  G.BELL-- SAN DIEGOg::16304,0:16302,0:16297,0:X2:Y2:XRX2:XLX2:YTY2:YBY2:3FF1:XLXLF9:XR,YTXL,YT:YBYB2:XL,YTXL,YB:XRXR2:XL,YBXR,YB:YTYTF20:XR,YBXR,YT:2X TION (1 TO 255) ";D:768,F:769,D:770::"ANOTHER TONE (Y/N)?":X$:X$"Y"2N"BRUCE JOHNSON-- REARDAN, WAA,B:A,B: 770,173,771,48,772,192,773,136,774,208,775,5,776,206,777,1,778,3,779,240,780,9,781,202,782,208,783,245,784,174,785,0,786,3,787,76,788,2,789,3,790,96:NN1:N211M 81:"FREQUENCY (1 TO 255) ";F:"DURA  L::3:X(21),Y(21):T221:X(T)78(.314T)140:Y(T)78(.314T)80:T221:QT21:X(T),Y(T)X(Q),Y(Q):::24JERRY KRAMER, PHILADELPHIA L::3:X(21),Y(21):T221:X(T)78(.314T)140:Y(T)78(.314T)80:T221:QT21:X(T),Y(T)X(Q),Y(Q):::24 JERRY KRAMER, PHILADELPHIA d!e'P\i$a(ŠŠ٠ŠԠ٠ϠŠҠӮ)G\a(Χ)G\a(ҠȮ)8)d2e?oP a()GPa()d2eo .\c[cCica(Ժ̭Ժԧ)G\a(Ч)G\9na(Ժԧ)G\a(à)E@E()G\sa( )xca(Ϡ) }KoQg.?$rh.?%r[0a()G[d ep@*#r@B;@rrp(Ů)LZca(ԠĤ)G\a(Π)E@*#rE(Ůӧ)G\5_a(Ĥ)G\a(Š)E@E()G\Tda(̠ųԠԠĤ)G\a(ŧ)G\qf@p()]̭ĩa@E(Πìɬ) KM6#a@E()c((\ca(ԭР)\cc(-S(ŠƠԠͺ)&@M62`@9()$#7\Kca(Ġ)E@)P`;@r%@B;@rrp()5U@U]ҭԠҠ٠Ԡa]ӠԠŠҠíǠɮ®ϠӮ2]ՠԠԠؠΠȮ N@"(r   (X1000)(X100)(X10)< X;"=$";(A%);(B%);(C%);(D%);B CN%16:S%N%2:CN%3+:X0655356(A%XCI2B%(XA%C)S%b<C%(XA%CB%S%)N%vFD%X(XN%)N%PA%A%1767(A%9)ZB%B%1767(B%9)dC%C%1767(C%9)nD%D%1767(D%9)xTT13:T13T27ĺ:T1 T(X10000)  tLO1:HI24:SLO:,(ILOHIS52:IA<40):PFI:868:dPXLO:LOHI:HIXsZSS1:30L x:90:"OH, ARTHUR, TELL ME YOU LOVE ME.":X14:Y14:S(16336)::Y1123::Y14:S(16336)::Y1345::5:"YES, JANET... AS SOON AS YOU":"GET OFF OF MY ";:255:A$"FOOT!":X1(A$)::(A$,X,1);(7);:::20X ? 200 N01.001.("N = ";N52N>7255N TR1(ANS$)& nASKY((ANS$,LTR,1))@ xASKY64ASKYASKY32Q (ASKY32);\ LTR:A]  :22A"TO REVEAL THE ANSWER, MOVE THE CURSOR->."b(5:"QUESTION:":"---------"2"HOW DO YOU GET DOWN OFF OF AN ELEPHANT?"<9:"ANSWER:":"------"FANS$" YOU DON'T; YOU GET DOWN OFF OF A DUCK!"P90:10:Z11:2 dL II1(I111/2I1:"INPUT:";I$^<II$"INPUT:"I$:I1(II$):I1$(II$,I,1)FI1:II:I1$:I11:II:(32);:I1$(73)ĢI11:II:(46);:I11PII(36)1:I1I12(II1I1):I = 1:34,2< "ALPHABETICAL LIST":"-----------------"G X2IX "X11);X1;j ,". ";A$(X):} 6:(4);"PR#0" @J1999: J:24:" (TO PRINT, TURN ON PRINTER & GOTO 999";:2039,169 T:23: ^::::280 ::260D0 x70 === SORT ===4 A$(I)"----------":@ NI::S XN:N22X22_ F0:I1 2:J1X:5:A$(J);9):: A$(I)A$(I1)230 T$A$(I1) A$(I1)A$(I) A$(I)T$:F1 II1:IN190 F1170 === PRINT LIST ==& ========= VISI-SORT =========;A$(255):D$(4)E::p(" VISI-SORT ";::" TYPE '*' TO QUIT"|2:34,2< === GET WORDS ===FII1P"WORD #";I;"-> ";Z13:"....................";d12:" ";A$(I) n(A$(I),1)"*"13   G$(7)502$h:"]";A$<"?SYNTAX ERROR";G$PAA1:A3ī360A0:"I SAID SYNTAX ERROR!":"NOW CUT IT OUT!";G$;"!";G$;"!";G$;"!";G$:360 ~#" ANY REAL NUMBER->";X?("HOW MANY PLACES?->";NW2T(X10N.5)10Ns<" ROUNDED->";T}F:30X D IMPRESS YOUR FRIENDS! BY UNCLE LOUIE ---------------------N936[A1100qAMOUNT((1)99)~AMOUNT;#X100ĺ" + ";'SUMSUMAMOUNT+A/" = ";SUM;"."3 TX48:3065 :3070:? T;" ";(T);" ";T128;" ";:U X140:"=";::XV3 ASCII SCREEN PRINTER --------------------C :3070:12[ "* ASCII VALUES *"e 3070 "FP...INT FP...INT FP...INT FP...INT" "-------- -------- -------- --------" X3247 TX:3065 TX16:3065 TX32:3065 1) |yXYCH32XYCHXYCH1929 yXYCH96XYCHXYCH128T yXYCH128XYCHXYCH64b y(XYCH);l yXPSNx y(13); yYPSN 1x JACK'S TEXT PRINTER (DUMPS TEXT SCREEN)gyFIRSTLN1:LASTLN22:SET VTAB TOP & BOTTOM LIMITSy1:OR YOUR PRINTER SLOT # "y50,255:,yYPSNFIRSTLNLASTLN@yXPSN140TyYPSN:XPSN hyXYCHXPSN1,2(YPSN1))16XPSN1,2(YPSN1)   ----------------- (Q)136240H Q16,0:RR1:R5R0i R1250,260,270,250,260,270r 190 X1373:15(R3):0,39X2:X:240 X1373:0,39X:X:240";:7:0,47 J012:X3Jq CLASSIFY BY B/W SHADE: ---------------------- J5Ġ2J6(J4) J4Ġ3(J4) J8Ġ152(12J) IX1X3:0,39I:I:J SEPARATE COLORS: 11 13 14 MAGDRKDRKBRN&10LAVMEDORGBRTLITPNKYELAQU BLUGRN GRY BLU GRNBLU " V2123:I1373:T40(V21)I:IMODI(I6)6:IMOD4IMOD0Ğ V:I1:(A$,T,3((VI)61));::I,V 1:">PRESS ANY KEY.";:21:"(0=BLACK; 15=WHITE)Ud====================== LO-RES TEST PATTERN/AS ======================fx::Q16384 NAMES & NUMBERS: ---------------- IN LINE 150, PERIODS = SPACES.Z A$" 1 2 4 8 5 3 6 9 12 7    3((LTR14)):T(LTR)2:(LTR64)@ <T(LTR)T(LTR)1:SUMSUM1p AX:50,255:23:"TOTAL:";SUM;" LETTERS":20q *** PACK MY BOX ***':T(26)JX113:T(X)1:T(X13)21::1^"TYPE->";COPY$qSUM0:9:958#X126:8X13((X14)):T(X):(X64):(X1(COPY$)-:1:6X:" ":2LTR((COPY$,X,1))64:LTR1LTR2665" 78LTR1  \ ]ĠҠ͠Q0q.?Lr8.?Mr8.?MrrrM6oP  qa(ӠӠΠ)FE()d>e[ M6.a(Š٠خ)GPT(o.?%rP&2a(٠خ)GPT<q8 r Fo.?%r-PbE(Ġ٠)FE()F E()F ZcUVWY_ $TQa()G]̭ǠЩ ToPWa(ĺ)FE()GZd2e?8r]P`a(ź)FE()Gc`%QY_`$%q$`%q -f gh 0fgh 3`$96qq_<9qq <`$B?flmnB`$$HEflm$nHq#q#Kd2e?8r(N`ϠӮŠҠӡ q|LM6oPa(κ)FE()GUVW'fl&m'n'f`$$f7UVW!q.?6?rY$lm'n,'q/?r`$%q$`%q,*q/?r3]št]ӠӠŠΠĠԠĠŠԬȠĠ٠ŠŠ͠ҠҮy ]ӠŠĠ٠Š̠ŠŠƠȠԮԠŠ   a WHY DOES THIS DO THIS?*X1255Y((X),:BOMBS WITH COMMA, BUT NOT WITHOUT!`FXS{/ ]٠ӠӠϠӠҠҠҩ M6Lf/?r (q/?r 2q  <q FghP_{( 936':LAST YEAR'S LOSER...J16304,0:16302,0I(16384)192;:2:HIT ANY KEY TO OPERATE tN@"Pr@p()d6?ed6?eIq`#%qqUVW a()GYa@*# rG_ 958' :22:8:"'";A$;"' LOADING.": :D$;"RUN";A$D;  SAVE PROGRAM NAME "DOWN",D$(4)4(:F2D$;"CATALOG"_FX15:X:1:868:xZX124:X:1:6):n4:8:"PROGRAMS:"x8:"-----------------"24:" & PRESS 'RETURN'.";23:1:868:" TYPE PROGRAM NAME ->";A$ 22:  q=>r f` %f$gh .Y[[. ]ҠȠō٠ԠN@"(rq M6-q/? rq/?roP&a(ŠǺ)oPR@(oPa@\_UVW;@rq.?$rq.?%r ------ ---------------":4 === TYPING NOISE ===O T1(T$):(T$,T,1);h U14:S(16336):z U133:::R HEIGHT DENSITY"? "------- -------- ------ ---------------"Q I1X1:I2g 1:T$A$(I):1000 9:T$(W(I))" LBS.":1000 18:T$(H(I))" IN.":1000 25:T$((100(W(I)H(I)).5)100)" LBS./IN.":1000 : "------- -------- <-" d4:20:A$(X)( iA$(X)""135; j(A$(X))780E l958^ n8:" (IN POUNDS)" s6:" HIS OR HER WEIGHT->";W(X) x12:" (IN INCHES)" }10:" HIS OR HER HEIGHT->";H(X) :75 === PRINT DATA === :"NAME WEIGHT {7A$(20)::IF"LET'S FIND OUT HOW DENSE YOU ARE...":20:"-----"_J=== GET DATA ===sKXX1:X20135N7:"TYPE NAME AND HIT 'RETURN' KEY."::"IF FINISHED, HIT 'RETURN' ONLY."P5:21:"-------" _4:"NAME OF PERSON #";X;"->  D$(4)XD$;"NOMON C,I,O":D$;"OPEN CONVERTFILE":D$;"WRITE CONVERTFILE":936:D$;"CLOSE":::1.CORRECT SYNTAX 2.APPEND TO FP PROGRAM 3.RUN 32764 4.INT 5.EXEC CONVERTFILEN@p()]̭ĩJa@E(Πìɬ)a@E(Π)a@E(Š)M6 d!eotua@E()KQ]ĠϠԠ͠ΠРàŠԠ ---------" <"BY THE WAY, THIS DISK IS NOT FULL, SECTOR-WISE. FID SAYS THERE ARE SECTORS FREE!" FX1198:22:33:X:XBE ONE MORE. SINCE SOME OF THE PROGRAMS, NAMELY...": (" ] P.11 2-LINER #4":" ] STRIPE-CAT":" AND":" ] WEATHER DATES WRITER": 2" WRITE NEW FILES, YOU WILL HAVE TO TRANSFER THEM TO ANOTHER DISK TO PREVENT A DISK FULL MESSAGE. , :::" BEAGLE BROS TIP DISK #1 "::"HERE ARE THE TIPS FROM TIP BOOKS 1-4. ONLY A COUPLE OF INTEGER PROGRAMS WHOSE APPLESOFT EQUIVALENTS APPEAR HERE HAVE BEEN LEFT OUT."5 :"THERE ARE 104 FILES SAVED ON THIS DISK AND ROOM FOR ONLY MAY  @lEhH ( Lh: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 !ΰɐx,LHJ) )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`xJ 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,SWPPˣ٠Ơ͠z#ҠӠҠΠҠΠҠ Ԡ ǿҠŠǮҠ ŠԠɭӠӠŭԠ̠ԠҠ ҠԠԠȠ ǮҠǮҠǮҠǮҠǮҠǮҠԠԠŠԠΠԠ ɭŠ̠ҠΠҠҠΠҠΠҠ Ҡ ͠ҠРˠӠŠ٠ ҠҠҠҠҠŠ ŠҠ ĠԠŠԠŠ٠ ЮҠ ЮҠЮҠˠԠŠǠԠ ԠԠ ̠Ҡ ̠ԠɭӠ ϭŠΠˠЮҠЮҠЮҠЮҠ ЮҠ ͠ԠҠؠĠ٭ԠĠРˠԠҠΠΠ̠ԠϭӠ ЮҠ ЮҠ ЮҠ ЮҠ ЮҠ ЮҠ ΠŠ  ٭Š ̭ؠҠ ԯРҠ ЮҠ ЮҠ ЮҠ ЮҠ Ġ٠ Рˠ ɭԠ ҠƠӠ ԠŭҠ Ġ٠ӿ ϭҠΠ ԠΠҠ ˠ٠ؠ ϭӠԠΠ ˧ӠԠҠ ɠΠҠ ӠҠӠ ҠҠ  ЮҠ ЮҠЮҠ٠ӠӠϠӿĠӿš Ԡ̠ӠРˠ Рˠ ԠϠРԠРϠԠԠ٠ҠҠΠRINTS X POSITION- UR:5X,140:DRAWS ARROW< ZI199:IW _5X,140:ERASES ARROW^ dX:ES ARROWq dX=_# ======== ROT TEST ========U::1:3:232,0:233,96:(4);"BLOAD SHAPES"h#0,150279,150x(X502501PRR16:R48R0:INCREASES ROTATION 90 DEGREESR21:X74:1);"ROT:";R;:868:PRINTS ROT VALUE S22:X72:1);"X:";X:P1 ============= SHAPE DISPLAY =============c::0:1:232,0:233,96:(4);"BLOAD SHAPES"p0:1:3|SH15SHSH21,150(SH2:21<4:"1 2 3 4 5"S"1 2 3 4 5"`p0@PX--->??7--->??7--->??7--->??? ֪c? d-6?7-57M,??L:I20542287:NN1:N251N235. (I,N:::E d GOTO 100 TO FIX.f nI20542287:I,("A")::: ============ REM EXPANDER ============; AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAN234    4"THE PROBLEM WITH THIS PROGRAM IS THAT"b"AFTER YOU RUN IT, IT WILL NEVER BE THE"u("SAME AGAIN."22051,50:2057,40:2148,20:2167,10: ========= APPLESOFT TOKENIZER ===================)2 <-LOOK AT THIS......*:Q16384FSTART(103)(104)256c(10:"THIS IS LINE 10--"215:"HIT ANY KEY TO END."<X234321FSTART4,XP11Z868:10dI140n(Q)127130xI,X16368,0:1 ========== A(23):I023:A:A(I)A:,START0K(START0STARTSTART65536d21:1:XSTART65535F"*";(8);(X10000)(X1000)(X100)(X10));X;:P(X):":";PP1A((37))(36):A1(P1):A2(P11):A3(P12)dP;:P10ĺ(95); nP100ĺ(2 I1N:WWW(I):HHH(I)::WAVGWN:HAVGHN] 180:"AVERAGE GUESS:",WAVG;:29:HAVG "ACTUAL SIZE:",W(0);:29:H(0) 180: 1:I120:"- ";::;ITEM$;:": ";W(I)= F"GUESS HEIGHT OF ";ITEM$;:": ";H(I)I PI:180t Z"ACTUAL WIDTH OF ";ITEM$;:": ";W(0) d"ACTUAL HEIGHT OF ";ITEM$;:": ";H(0) n180 x:"NAME","WIDTH";:29:"HEIGHT":180 I1N:2I:1:NAME$(I),W(I);:29:H(I):. ============ SIZE GUESSER ============L::" SIZE GUESSER "::|"GUESS DIMENSIONS":"OF WHAT ITEM? ";ITEM$("NUMBER OF GUESSERS: ";N:NAME$(N),W(N),H(N):1802I1N::"NAME OF GUESSER #";I;:": ";NAME$(I) <"GUESS WIDTH OF "EFLAGW$"LIST"ļ <20Y FL(A$):A$"A"A$"E"A$"I"A$"O"A$"U"ĺA$;:30 PN((1)5):X65N4(N3)2(N4)4:(X);:XLEFLAG1 Z308 =============== VOWEL SCRAMBLER ===============kERR$(7)"?SYNTAX ERROR":YES$(7)"!CORRECT"W$"":EFLAG0:1:"]";A$:W$W$A$:A$(13)70#(W$)220(::EFLAGĺERR$:552YES$:EFLAG0 7I199::W$(W$,(W$)1):S ANY KEY: )":120:(8);(8);:(2 BACK-SPACES)T ZC$:C$: (NEW FRAME CHARACTER)d dC$" "30v nI126::: x20(A$)2:A$;:: (CENTERS TITLE)6* ========== VISI-FRAME ==========7:C$" "ZI123:I:1:C$;:40:C$;:I2I12423:I:1:J139:C$;:J,I<2039,(C$)128: (PUTS C$ AT VTAB24,HTAB40)F:10:A$"VISI-FRAME":120:::A$"BY WILL MUFFIN":120/ P20:A$"(PRES  4)0Ă x40 5 ============== COLLISION TEST ==============o:::0:1:N100:232,0:233,96:(4);"BLOAD SHAPES"6:250,0250,191:30,030,191(XN227923X,100<3X,100F(234)0ĂXPNX101Z2N,100d2N,100 n(23  * ========== SCALE TEST ==========[:::0:232,0:233,96:(4);"BLOAD SHAPES"g(S110nPSR:21:10:"SCALE:";S;:958U170,30:DRAWS BOX ZS1āI1500:I_170,30:ERASES BOX dS:40SOX dS:40S]ŠέŬ?M6P a(ծƮϮƠ)P a(٠Š)PdedeUVWUVWKUVWX6deM6(YZZ_#]ӠҧӠĠd7 :1:1:"WHAT'S YOUR NAME? ";N$:234:SP$"":10bSP$SP$"."::" ";N$;" ";::SP$;:20 ,! MARK BACHMAN-- AUSTIN, TX::13);"KEYBOARD ORGAN":X2457624591:Y:X,Y:X: 172,0,192,173,48,192,234,234,234,234,136,208,249,76,0,9624576 %DAVID GERSHON-- SEAL BEACH, CA:C17:RT15:C:R515010:0,RRT,155270,155R270RT,00,R:RTRT15:R::9:" FUN."R106010:140,10R140R,75140,150R140R,75140,10R:R:C:: (GD)12:XXG:YYD:NX,Y):SS200(NC1):Z(16336):X,Y::SS100:0:A,B::23:12:S;" YOU WIN!":I19:1052:2{ DAVID LINKER-- SEATTLE,WA::15:T39:I01:0,TIT:0,TIT::X5:Y5:S0:T38:1:X,Y:C114:A(1)T1:B(1)T1:C1:A,B:C:23:"YOUR SCORE=";S:I150:(N15)(NCN0)Āy N(16368):N(16384):G(N21)(N8):D(N90)(N65):  PRINTER" :I,X:22 + =========== SLOT SEARCH ===========9 :X120ZI17:N49152256I:PN(N)42I:1:"SLOT ";I;": PEEK(";N;")=";PN;2)(42I:262B(I)A(I):A(I)PN:A(I)B(I)Č868:"(EMPTY)":500<dPN162ĺ"DISK DRIVE" nPN24ĺ"  95);L xB1(P1):B2(P11):B3(P12):A1B1A2B2A3B3Ğ:"<";::150V 1);f (37)22Ă 22:1024,1152,1280,1408,1536,1664,1792,1920,1064,1192,1320,1448,1576,1704,1832,1960,1104,1232,1360,1488,1616,1744,1872,2000) ========== DOWNSCROLL ==========30:NABC:INDE:JIIF:J,(JE):::INGNH:I,(IK):::1:1:868:20A2000:B1920:C40:D1132:E128:F39:G896:H857:K856:C5,11" P"POKE 33,37") Z"POKE 50,63"8 d"CATALOG"l n"TEXT:VTAB22:NORMAL:POKE44452,24:POKE44605,23"~ x(4);"CLOSE"% --------- STRIPECAT ---------k (A DIFFERENT WAY TO CATA-LOG. NOT BETTER MAYBE, BUT DIFFERENT) (RUN THIS TO CREATE A T-FILE, "C". TYPE "EXECC" TO USE.) ((4);"OPEN C"2(4);"WRITE C"<"POKE 44452,12" F"POKE 4460100 PFLAGēX,Y:FLAG1% ZX,Y/ d:30:05 ============== CIRCLE PLOTTER ==============D:3:ST.116301,0::22:1:"X CENTER, Y CENTER, RADIUS: ";XCTR,YCTR,RAD:FLAG0:ST.1:16302,0(I06.3ST2XRAD(I)XCTR<Y(RAD4)(I).3YCTR FX279X0Y191Y0FLAG0: CHARACTERSK 255:0:1024(X140),Y:191:16:1X,0:ERASE BOTH LINESv (16384)127160:CHECK FOR KEYPRESS 80:GO BACK 16368,0:PREVENT KEYPRESS FROM PRINTING ON SCREEN :22:"SO LONG!"RDDLES; Z255:0:1024(X140),Y: DRAW HORIZONTAL LINEd d191:16:1X,0: DRAW VERTICAL LINE n(XXXX2XXXX2)(YYYY2YYYY2)Ģ22:13::" YOU FOUND IT! ":I1500:::22:13:15) x24:1:"X=";(X);" Y=";(Y);3):SPC(3) CLEARS EXTRAR IN VIEW <"CAN YOU FIND THE HIDDEN TREASURE?":24:16:"(HINT: USE THE PADDLES.)";: SEMI-COLON PREVENTS VTAB 24 SCROLL-UP FXXX100:YYY50:3:XXX10,YYY10XXX10,YYY10:XXX10,YYY10XXX10,YYY10:DRAW AN X  PXPX(0):YPY(1):READ PAR 24576,1:24577,0:24578,4:24579,0:24580,5:24581,0: SHAPE TABLE FOR LINE232,0:233,96: POINTERS TO START OF SHAPE TABLEPX279255:PY191255:PADDLE LIMITS (:CLEAR & SET HI-RES SCREEN 2:21:4: CLEAR TEXT & PUT CURSO   !]̠ӭجGUVW YLccf/?rUVW'ij'kYqq/?r^f/?rq/?rq/?rq/?rq/?rUVWXijkYq`$_ ]ŠέŬAM6P a(Š)P a(٠Š)qdIdedeUVWdeM6(Yq`6%qd_$]ӠҧӠĠ;((KEY));Q$;" KEY.":9:255T/ ============ BATON GETTER ============]CURS$"!/-\":C1:Q$(34):L(CURS$):177:10:"! PRESS ANY KEY WHEN READY."(10:(CURS$,C,1)2KEY(16384):KEY128CC1L(CL):40 <16368,0:10:3:"THANK YOU FOR PRESSING THE ";Q$;"WRITE WEATHER DATES"% 2MSTST3> <MOM:MO12MOMO12N FL:DAY1L~ P100MDAY;" DATA00,00,0.00:REM";MO;"/";DAY Z: dD$;"CLOSE" n31,28,31,30,31,30,31,31,30,31,30,31,31,28,31 F ==================== WEATHER DATES WRITER ====================_D$(4):D$;"MONICO":"STARTING MONTH (1-12): ";ST:ST12ST120ST1āI1ST1:A: (D$;"OPEN WEATHER DATES":D$;"DELETE WEATHER DATES":D$;"OPEN WEATHER DATES":D$T===M PH120H:L120L:ML(HL)2:RR20:5:X,HX,M1:1:X,M1X,L:XX2j RRĒ6:X1,190RX1,190r UDA ZI140:"-";:: d===DATA=== e f"EXEC WEATHER DATES" TO CREATE DATA LINES.Y20((Y20)50)500Ē3W =0,Y279,Y::0:X1427960:X1,0X1,191:X,0X,191: AX15:DA1365:H$,L$,R$:H$"00"L$"00"ľA$:A$:5 FH$"@"XX2:85 KH(H$):L(L$):R(R$):H0L0R085 MH120H120 NL70L70 O===PLOTER WEATHER DATA BELOW, RUN AND SAVE.":180:A$;::1:255:A$] 8M(LINE100):M12MM12 9:"] ";LINE;" DATA 00, 00, 0.00: REM ";M;"/";LINE(LINE100)100::"] SAVE WEATHER CHART"::"] RUN":(37)5:G$;: ;===CHART=== <:Y019010:2:Q :" ENTER WEATHER DATA AS FOLLOWS: ":::"1103 DATA 77, 58, 0.36: REM 11/3 %::" OR, TO SKIP A DAY, ENTER: "::9:"----":"1103 DATA S, S, S: REM 11/3":90 (I1365:H$,L$,R$:H$"00"L$"00"LINE(123)(124)256:55 -> 7::A$"ENSELECT: ";:A$:A$:A$"D"60_ A$"Q"ĺ:"]SAVE WEATHER CHART":" IF NECESSARY.":(37)2:n A$"A"5 ===GET DATA=== :"EXAMPLE:":"--------------------":" DATE: NOVEMBER 3":" HIGH TEMP: 77":" LOW TEMP: 58":" RAINFALL: .36";Q$:J ===================== 4-MONTH WEATHER CHART =====================Z===MENU===:::G$(7):Q$(34):7:"WEATHER FOR CITYVILLE":90:"JANUARY 1, 1985 - APRIL 30, 1985":90" = ADD DATA":" = DISPLAY DATA":" = QUIT" :"   1:BBIT(I) Z:B1Ğ* dB;::2);:2 n:O3. ============ BIT SPLITTER ============::8:9]"128 64 32 16 8 4 2 1":9}("--- -- -- -- - - - -"2J0255<I18:BIT(I)(J2(I1)):BIT(I)BIT(I)2(BIT(I)2):F10:4:J100);J10);::J;::": "; PI81 0H hH =lhH 6lh jlLKj wk X c cbl$cl [h`hhHHHHHH`dlelklll`hhhhhhHH`dlelklll`H d$bl%cl kbl$cl [h`' $(o Dl )H'o(hҭ l%cl X` Dl ɍL7k Tlil c c Mkjl6H 6lhH =lh bk wkil $ W۩ il $H h$0H hH =lhH 6lh Mk kililɶL,k'$jl $ W۩ jl H H h J qlyl Glylpl Ȍplmplqlol LhlnlLh c d dɰ k X c cbl$cl [h`H d$bl%clI Dlcl [bl$hl $ hl bl$ d dɰ k c cbl$cl [h`H d$bŠŠŠŠǍԺ²̺ŴŴ:I140:A$A$"-"::70:ATHER. A DEAF POLICEMAN HEARD THE NOISE, AND CAME AND KILLED THOSE TWO DEAD BOYS.":70p <:100:255:22: FI1(A$)::CURSR$;::M$(A$,I,1):M$;:M$" "M$"."āJ125150(M$"."): PM$" "āJ12:S(16336): Z:868:: dA$""% ========= TELETYPER =========:CURSR$"+>":210bI1(CURSR$):CURSR$CURSR$(8):p(:7:100Z 2A$"ONE DAY, IN THE MIDDLE OF THE NIGHT, TWODEAD BOYS GOT UP TO FIGHT. BACK TO BACK,THEY FACED EACH OTHER; DREW THEIR SWORDSAND SHOT EACH O:WW1:10:1(W(W2)20):1);"WORKING";1)Y(WORKING SUBROUTINE HERE)hI1250:wW15100010:1:"DONE";:958:20W 5 ============== HEX DICTIONARY ==============_"HEX DICTIONARY:":"---------------"qA$"ABCDEF10"(A18:B18:C18:D18:(A$,A,1);(A$,B,1);(A$,C,1);(A$,D,1);" ";2:::::A 1) FM1CC14(C1):HH1:H2M11 K40{ P16368,0::11:"THANK YOU FOR PRESSING THE ";Q$;((KEY));Q$;" KEY."|3 ============= ROLLING BATON =============ZCURSR$"!/-\":H1:CH:MH:Q$(34):11:" ::::::: HIT ANY KEY WHEN READY.:::::::"(10:H:" ";(CURSR$,C,1);" ";:I133:2KEY(16384):KEY12780 <M1CC14(C4):HH1:H39M ANOҾSGINABUSFRSCRNPDPOSQRNLOEXCOSITAATPEELESTRVAASCHRLEFTRIGHTMIDNEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALEELSTRACNOTRACNORMAINVERSFLASCOLORPOVTAHIMEMLOMEMONERRESUMHSCRSCRLDSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOCLRKESWATONDEPOKPRINCONLISCLEAGENETABTFSPCTHEANOSTE0oeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL               = k(C) 1983"::"BEAGLE BROS INC.":"4315 SIERRA VISTA":"SAN DIEGO, CA 92103" 768,169:769,76:770,76:771,178:772,165:768================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 =================8,11,169,234,141,86,208,141,87,208,141,88,208,169,76,44,129,192,205,0,224,240,3,44,128,192,96q (1005)1200 A36175:(A)32(A1)120(A2)207ĹA,234:A1,234:A2,234K ::BB$" LOADED":::"BEAGLE BASIC":"BY MARK SIMONSEN":"COPYRIGHT AD "BB$",A$D000", I4241842422:I,234:@ (1005)2180s (46786)32Ĺ46790,130:46793,128:46830,128 46809,131:I768819:V:I,V::768] 44,139,192,44,139,192,173,86,208,201,32,208,25,173,87,208,201,120,208,18,173,88,208,201,207,204,205,0,224,208 P19,42,141,0,224,205,0,224,208,10,44,129,192,44,129,192,169,1,208,6,169,0,240,2,169,2,141,88,3,44,130,192,104,205,0,224,240,3,44,128,192,96,0 ZA(856) d(A)ĺ"NO RAM CARD!": nA2Ĺ828,131:825,131 x830,96:824:(4)"BLO":(1101)6BB$"NEWBASIC IIE"4 ((4)"NOMONICO"L 2FIND LANGUAGE CARDj <I768856:V:I,V::768 F173,0,224,72,44,129,192,104,72,205,0,224,208,56,44,128,192,169,76,205,0,224,208,7,169,40,205,1,224,240,39,44,131,192,44,131,192,169,165,141,0,22================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ==================  ::::(12):FOR 80 COLUMN BOARDS(978)157ĺ"CAN'T BE USED WITH DOS ON THE RAM CARD!": BB$"NEWBASIC II/II+  EEN (Y/N)?' dSCHRLEFTRIGHTMIDMOVE EDITINCHANGEO.K. TO NORMALIZE (Y/N)?STANDARFIND:SORFREETOKE: COMMAND EDITOR TURN PRINTER ON AND PRESS TO CONTINUE OR TO EXIT TOKEN OLD NEW TOKEN OLD NEW PRINT SCRORMAINVERSFLASCOLORPOVTAHIMEMLOMEMONERRESUMRECALSTORSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOWAILOASAVDEPOKPRINCONLISCLEAGENETABTFSPCTHEANOSTEЫANOҾSGINABUSFRSCRNPDPOSQRNLOEXCOSITAATPEELESTRVAA " $( i`iɀi@ɠi` ! #ЩL`` [$H hnH h`ENFONEXDATINPUDEDIREAGTEXPRINCALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALESHLOATRACNOTRACN ↭^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ک`Lv3?2`?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ Lx L>L( HɰɫЉơe$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$LVt~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`^_^^^^W8Ie Ji `eeeeeLi&&&&8坰IiBfffff`IIIIII `ELԢai0ᦠL LN覸^e^`_a`H` Jh`` g R L楝ɑ 률PQ`PHQH RPhQhPL F犠P``  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䆞`" ȱ 0oeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL               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! Ȉ22``H h*:` `YE <ӭpd`HVTQ PS 6" _#%L" X`I`ɍ,,L8L,H !ΰɐx,LHJ) )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`xJ 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 -LaL٥רɭɚ ٠L { R` &%0)`LeP>eQ? I g RQ` ʊ( (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#8H $(*)+!h80LL" H $(*0ؠ L",U,R@ ,T,SWPLL(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ک`Lv3?2`?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ Lx L>L( HɰɫЉơe$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$LVt~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`^_^^^^W8Ie Ji `eeeeeLi&&&&8坰IiBfffff`IIIIII `ELԢai0ᦠL LN覸^e^`_a`H` Jh`` g R L楝ɑ 률PQ`PHQH RPhQhPL F犠P``  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ȑȊ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! Ȉ22``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`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 -LaL٥רɭɚ ٠L { R` &%0)`LeP>eQ? I g RQ` ʊ( (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#8H $(*)+!h80LL" H $(*0ؠ 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, 0,224,205,0,224,208,10,44,129,192,44,129,192,169,1,208,6,169,0,240,2,169,2,141,88,3,44,130,192,104,205,0,224,240,3,44,128,192,96,0 ZA(856) d(A)ĺ"NO RAM CARD!": nA2Ĺ828,131:825,131 x830,96:824:(4)"BLOAD "BB$",A$D000" I424184" ((4)"NOMONICO"- 2FIND LANGUAGE CARDK <I768856:V:I,V::768 F173,0,224,72,44,129,192,104,72,205,0,224,208,56,44,128,192,169,76,205,0,224,208,7,169,40,205,1,224,240,39,44,131,192,44,131,192,169,165,141,0,224,205,0,224,208 P19,42,141,================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ==================  ::::(12):FOR 80 COLUMN BOARDS(978)157ĺ"CAN'T BE USED WITH DOS ON THE RAM CARD!": BB$"NEWBASIC II/II+   NONE"~ ================== NOTES BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== Rx ================== NOTES BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ==================  :::(12);:" NOTES 11/10/83 ":" CHANGES: "::("NONE"2::" UPDATES: ":: <"? )- ?;;----?;; ?  m???.--??-I?--???--?@L$1<GTan):I66#$d- -.--)-5>N?I166.?d )-3-6?6v- ?  -)--  ; Rd-?v- $)e $?v- >6- $d-66?  I 66? -6$$166n  I?--???.--??N>  av ba brbAcabaaa/bba b baaaa (1234....+....1....+....2....+....3....+....4$(@I iɀI i`)"'4$$!4 e4 d dL}d$$! e e 4%# eeiȑ`$(ɠ!``e eHeh 0Le$(@ɀe`e4e e e ee e48`"`;`:`Waa@cbba`e(H(he(eee`e Xbgh d de"% d4 8d%%#ȑeiijhh sLYaȭaamaaaia`$e " ee%%#hhLc$4e ȥ%i 'e$ 'ee4 Dee4 e4 eT De` 6c" [((!(%%#L+c 6c" [!(ȑ(ȩ(%%#L+c 6c pL+c 6c#8H $(*)+!h80" H $(*0ޠ e$eL[%e$e` e]eȌe! eee8ee!8eJee10emeeemeeeee(H(he(ea`LaLa X aLa ɠ ) eHeH` eeI%2$($$!`$!$$%0%"#%%L"$%%#"L[e`e e`e#e䅛e tb !!"#$"L[ !!"#e f tbۥ" [ b "(!(%%#(!    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   !!! ! ! ! ! !!!!!!!!!""" " " " " """""""""     EAGLE BROS INC.":"4315 SIERRA VISTA":"SAN DIEGO, CA 92103"p 768,169:769,76:770,76:771,178:772,165:768 ================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== 1,86,208,141,87,208,141,88,208,169,76,44,129,192,205,0,224,240,3,44,128,192,96b (1005)1200 A36175:(A)32(A1)120(A2)207ĹA,234:A1,234:A2,234< ::BB$" LOADED":::"BEAGLE BASIC":"BY MARK SIMONSEN":"COPYRIGHT (C) 1983"::"BI4241842422:I,234:1(1005)2180d(46786)32Ĺ46790,130:46793,128:46830,12846809,131:I768819:V:I,V::768N 44,139,192,44,139,192,173,86,208,201,32,208,25,173,87,208,201,120,208,18,173,88,208,201,207,208,11,169,234,14   ================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== B4,205,0,224,208 P19,42,141,0,224,205,0,224,208,10,44,129,192,44,129,192,169,1,208,6,169,0,240,2,169,2,141,88,3,44,130,192,104,205,0,224,240,3,44,128,192,96,0 ZA(856) d(A)ĺ"NO RAM CARD!": nA2Ĺ828,131:825,131 x830,96:824 } ":(1101)6BB$"NEWBASIC IIE"4 ((4)"NOMONICO"L 2FIND LANGUAGE CARDj <I768856:V:I,V::768 F173,0,224,72,44,129,192,104,72,205,0,224,208,56,44,128,192,169,76,205,0,224,208,7,169,40,205,1,224,240,39,44,131,192,44,131,192,169,165,141,0,22================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ==================  ::::(12):FOR 80 COLUMN BOARDS(978)157ĺ"CAN'T BE USED WITH DOS ON THE RAM CARD!": BB$"NEWBASIC II/II+ :"4315 SIERRA VISTA":"SAN DIEGO, CA 92103"` 768,169:769,76:770,76:771,178:772,165:768 ================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== 208,141,88,208,169,76,44,129,192,205,0,224,240,3,44,128,192,96R (1005)1200 A36175:(A)32(A1)120(A2)207ĹA,234:A1,234:A2,234, ::BB$" LOADED":::"BEAGLE BASIC":"BY MARK SIMONSEN":"COPYRIGHT (C) 1983"::"BEAGLE BROS INC."2422:I,234:! (1005)2180T (46786)32Ĺ46790,130:46793,128:46830,128} 46809,131:I768819:V:I,V::768> 44,139,192,44,139,192,173,86,208,201,32,208,25,173,87,208,201,120,208,18,173,88,208,201,207,208,11,169,234,141,86,208,141,87, ↭^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ɰɫЉơ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 0,-`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`^_^^^^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䆞`" ȱ