' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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)*++`FG8`0($ p,&"_]` L/浍굺L  !"#$%&'()*+,-./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#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( 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 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@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@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( D Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ 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˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`pAx`pA<<ժժժժժժxժժըժժժՊp!x`p!8ՠժЪժժժժǪժժժժժը~ժժ~ժժժժժժժժdժժՂ|?Ԫժժժ" to continue, to quit ";:A$D$A$"Q"A$"q"ĩSPD:Z$::(4)"PR#0":l$ Z11000::$================== BEAGLE BASIC DEMO BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== #12:13:"21 HI-RES COLORS">#14:13:"NON-FLASH CURSOR"\#16:14:"PRINTER DRIVER"#18:10:"AND MUCH, MUCH MORE!!!"#21:"Beagle Basic is compatible with":"Apple IIe, and II/II+ (with Ram Card)."#255:(4)"PR#0":($255:24:4: ";::" "":"D2000%"NH"X10::": APPLE TIP BOOK #6 :"{"b3::"A whole new collection of tips, tricks""l"and valuable programming goodies.""v6:"Stuff like--""8:11:"BRUN HI-RES PICTURES""10:13:"BEAGLE BLACKJACK" "c!8:" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" "!&8:" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ""08:" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" " 8:" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" "!8:" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::";::"REM SET HI-RES COLOR ":d"50 CALL - 3082: ";::"REM CALL CLEAR SCREEN "::"60 NEXT X"n2000y:2559:8::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" ";::" "B 8:" ";::" ";::" ";::" orget--"6:"INVERSE REM STATEMENTS Too! Make REM"g"statements appear as bold standout head-";"lines in your Applesoft listings."255:"10 ";::"REM HI-RES WEIRDNESS ":"20 HGR2":"30 FOR X = 0 TO 255":"40 POKE 28,X: "5,41,133,43,164,33,136,104,56,233,1,48,17,197,34,144,13,72,32,36,252,177,40,145,42,136,16,249,48,222,160,0,32,158,252,76,34,252hI112:912:Z110::rI121:768:Z110::|I121:912:Z110::30005:"PLUS, how could we ftruction to clear the key-";1""board buffer."d,13:"New one word commands to scroll text UP"6"and DOWN, not possible before Beagle"@"Basic."J3000:3000TI768818:BYTE:I,BYTE:^165,35,56,233,1,72,32,36,252,165,40,133,42,16" PLUS "<3::"BONUS Text Screen Formatter and Editor"h"converts formatted text screens into""Applesoft Print statements."7:"New one word commands to replace Apple's";"awkward Call -958 and Call -868."10:"New CLRKEY ins"control-G bell."2I768786:BYTE:I,BYTE:}169,64,32,168,252,160,192,169,12,32,168,252,173,48,192,136,208,245,96768I110:776,((1)20)10:768:I1020:776,I:768:I19101:776,I:768:2000 18::1:I:23:" ":I1:23::"+"::K150::><JJ1:J1320GFSPDaP10:27:"Pressing a"Z"non cursor-move key returns the normal"d"cursor."n:"BETTER BEEP: You can select one of many"x"more pleasing sounds for your Apple's""when you are in Escape Mode (moving the"X"cursor). With Beagle Basic, pressing" "ESC temporarily changes the normal""cursor to a flashing "Q$;::"+";::Q$".":J2255(I1022:I:23:" ":23::"+"::K150::,2I2311GOTO JAIL"?15:"where MARINE and JAIL have been assigned";k"line number values. Expressions like"18:8:"GOTO 3+X and GOSUB R*1000"20:"are legal too!"200034,1::34,06::"ESCAPE CURSOR: Normally, you can't tell",ժժՊ@ǪժՊ?ԪժժժժժժժՊxժժՂЂ@Ǫժժx xԪժxժժ<@C( )qx(`ЪՊՂЊ"0DD@ """"x?ЪՂЂp!x`p!8pժժժժժ`ժժժ|Ǫժժժժ~ժՊԪժժժԪժժժժժժժՊxwժժբժժժժт|Ѫժժժppժժժժ?ժժ| xժժժժժ@?xժD( @(  ժЪՊԪժՂ~ǪժժѪժժժъ  88|pqC`x?ԪЪՂժժժЂԪժժբղpx`p8xժЪժժժժժxժժժժժՊՠժժ|ǪժժŪժժժժժ!~ժժժժժժժժժժՂxժժՂЂ|?Ъժժժ@Ѫժ@?@ xժժ``ժDD  DX ЪՊЪՂpǪժժЊx?ЪՊԂՂp!x`p!8|ժժժժժժxժժpx?xcp8pxЪժժժժ}ǪժժժՂ1~ժժԪժժժժժժժժժժժՂ|?ժժբժժժժт|?Ԫժժժ p88pqbsy"pѪժըժժժ`?ѪժժŊ`xժժŪժժժpժ| TO EXIT";:23:9:7040:A$:5000"A(A$)32((A$)95)#A48Ĺ767,SLOT:22531F> ADD TXT2....(DELETE IN#).... YES/NO";:" ADD G2......(DELETE PR#).... YES/NO";:" ADD CLRKEY..(DELETE WAIT)... YES/NO";"|"* ADD TEXT & BELL COMMANDS.... YES/NO";:"* ADD HI-RES COMMANDS......... YES/NO";:"* ADD CURSOR COMMANDS....__________________" h" ADD ELSE....(DELETE SHLOAD). YES/NO";:" ADD SWAP....(DELETE LOAD)... YES/NO";:" ADD TONE....(DELETE SAVE)... YES/NO";:" ADD HSCRN...(DELETE RECALL). YES/NO";!r" ADD SCRLDN..(DELETE STORE).. YES/NO";:"֔W55095:W,233:W1,127:W2,170:DהW55555:W,164:W1,104:W2,133:W3,60:W4,132:W5,61:W6,165:W7,105:W8,164:DؔW9,106:W10,133:W11,62:W12,132:DٔW64739:W,208:W1,253:W2,172:W3,32:W4,192:WLUE: 5":12:"CURRENT VALUE: ";:(55055)I12:"CHANGE TO: ";S8000fA40Ĺ55055,ALF(B)0:(55055)5LF(B)1Đ9:1:868::868::868ΐp INVERT REM STATEMENTS zLF(B)LF(B)ԔLF(B)38150ՔW55063:W,16H G9:12:"NORMAL VALUE: 33":12:"CURRENT VALUE: ";:(55048)d12:"CHANGE TO: ";n8000ȌA0A41Ĺ55048,AҌLF(B)0:(55048)33LF(B)1܌9:1:868::868::868挱 CHANGE INDENTATION ,9:12:"NORMAL VAuA66İ36000"uA67İ37000+u775>uLF(B)OLDČDIu35000Tu30080n PRINT SELECTIONS yˆI13̈F1ČDֈLF(I)Ğ35:V1(I):"YES";ꈝ:"/";LF(I)Ğ"NO"F11& CHANGE LIST WIDT________"luF10vu35000lu23:1:"SELECT < > TO EXIT";:23:9:7040:A$:5000uA(A$)32((A$)95)uA48Ĺ767,SLOT:22531:30080uA27A49310uBA64:B1B3İ7030:30080uOLDLF(B):768uA65İ380003":13:"MARK S. SIMONSEN"NNu13:"________________________________________"Xu" INVERT REM STATEMENTS........ YES/NO";:" CHANGE LIST WIDTH............ YES/NO";:" CHANGE INDENTATION........... YES/NO"; bu"________________________________' COMMAND EDITOR '':767,SLOT<$'768:25344:775E.'310c N ERROR MESSAGE EDITOR s*N:767,SLOT4N768:22528:775>N3100u LIST FORMATTER :u::12:": LIST FORMATTER :":Du5:15:"BEAGLE BASIC":12:"COPYRIGHT (C) 19811,155:W12,229:W13,81:W14,176:W15,3:W16,76:W17,16:D6W18,212:W19,32:W20,188:W21,247:W22,76:W23,253:W24,254:D66ֵW62367:W,165:W1,35:W2,56:W3,233:W4,1:W5,72:W6,32:W7,36:W8,252:DD7׵W9,165:W10,40:16,133:W17,80:Dp5W18,134:W19,81:W20,32:W21,205:W22,254:W23,32:W24,188:W25,247:W26,76:D5W27,205:W28,254:D5W62399:W,32:W1,253:W2,254:W3,160:W4,2:W5,177:W6,155:W7,197:W8,80:D@6W9,200:W10,177:W,240:W13,2:W14,169:W15,1:W16,133:W17,234:DE4uW18,96:DK4v]4NBC(B)465504W62367:W,32:W1,217:W2,247:W3,160:W4,3:W5,177:W6,155:W7,170:W8,136:D5W9,177:W10,155:W11,233:W12,1:W13,176:W14,1:W15,202:W11,133:W12,115:W13,133:W14,111:W15,133:W16,60:W17,32:DU3DW18,250:D[3E3rW62396:W,76:W1,163:W2,247:D3sW63395:W,32:W1,185:W2,246:W3,32:W4,17:W5,244:W6,177:W7,38:W8,37:D54tW9,48:W10,41:W11,127:W1215,82:W16,231:W17,230:DJ2W18,81:W19,234:W20,234:W21,96:DP2b2@NBC(B)464502AW62396:W,32:W1,217:W2,247:D2BW63395:W,133:W1,116:W2,133:W3,112:W4,133:W5,61:W6,133:W7,233:W8,104:DD3CW9,133:W10,232:W5,246:W16,166:W17,13:Df1W18,208:W19,239:W20,198:W21,81:W22,208:W23,238:W24,96:D1W63441:W,32:W1,248:W2,230:W3,138:W4,73:W5,255:W6,133:W7,13:W8,32:D2W9,190:W10,222:W11,32:W12,103:W13,221:W14,32:WW13,227:W14,223:W15,169:W16,0:W17,133:D_0ⴹW18,20:W19,76:W20,240:W21,216:De0㴱0W55472:W,32:W1,209:W2,247:W3,173:W4,48:W5,192:W6,136:W7,208:W8,4:D1W9,198:W10,80:W11,240:W12,7:W13,202:W14,208:W1:W13,32:W14,240:W15,216:W16,32:W17,205:D|/ߴW18,254:W19,32:W20,1:W21,217:W22,76:W23,205:W24,254:D/W63441:W,148:W1,133:W2,60:W3,165:W4,149:W5,133:W6,61:W7,96:W8,169:D20ᴹW9,64:W10,133:W11,20:W12,32:4:W49,145:W50,133:W51,136:W52,16:W53,243:Db.W54,96:W55,76:W56,118:W57,221:Dh.z.ܴNBC(B)46350.ݴW55472:W,56:W1,165:W2,175:W3,229:W4,103:W5,133:W6,80:W7,165:W8,176:D3/޴W9,229:W10,104:W11,133:W12,811:W24,104:W25,69:W26,130:Dz-W27,48:W28,26:W29,160:W30,2:W31,36:W32,129:W33,48:W34,16:W35,36:D-W36,130:W37,48:W38,2:W39,160:W40,4:W41,177:W42,131:W43,72:W44,177:D5.W45,133:W46,145:W47,131:W48,1003:D ,h,W55497:W,32:W1,227:W2,223:W3,132:W4,134:W5,133:W6,133:W7,165:W8,130:D,W9,72:W10,165:W11,129:W12,72:W13,32:W14,190:W15,222:W16,32:W17,227:D!-W18,223:W19,104:W20,69:W21,129:W22,48:W23,3W33,76:W34,101:W35,214:Dz+}W36,76:W37,242:W38,212:W39,169:W40,80:W41,160:W42,0:W43,133:W44,60:D+~W45,132:W46,61:W47,169:W48,82:W49,133:W50,62:W51,132:W52,63:W53,132:D,W54,214:W55,96:W56,165:W57,18,103:Df*zW9,101:W10,80:W11,133:W12,105:W13,165:W14,104:W15,101:W16,81:W17,133:D*{W18,106:W19,165:W20,82:W21,133:W22,214:W23,32:W24,1:W25,217:W26,32:D+|W27,253:W28,254:W29,36:W30,214:W31,16:W32,3:25,208:W26,239:Dq)JW27,32:W28,152:W29,217:W30,160:W31,0:W32,198:W33,254:W34,16:W35,230:D)KW36,76:W37,225:W38,217:D)L)xNBC(B)46250*yW55497:W,32:W1,240:W2,216:W3,32:W4,253:W5,254:W6,24:W7,165:W63349:W,76:W1,220:W2,217:W3,165:W4,157:W5,208:W6,29:W7,133:W8,254:D(HW9,168:W10,177:W11,184:W12,240:W13,242:W14,200:W15,201:W16,173:W17,208:D)IW18,4:W19,230:W20,254:W21,208:W22,243:W23,201:W24,154:W0,202:W21,134:W22,62:W23,229:W24,80:W25,72:W26,165:D'W27,116:W28,168:W29,232:W30,208:W31,1:W32,136:W33,132:W34,63:W35,229:D'W36,81:W37,197:W38,110:D''FW55768:W,76:W1,120:W2,247:W3,234:DU(GW8,82:D5FW9,192:W10,96:W11,234:W12,234:DFW13,32:W14,248:W15,230:W16,202:W17,224:W18,2:W19,176:W20,204:W21,189:DFW22,84:W23,192:W24,96:W25,234:W26,234:W27,234:D2GW28,32:W29,248:W30,230:W31,202:0:W39,76:W40,40:W41,248:D1E뻹W45,138:DEW63588:W,41:W1,15:W2,133:W3,48:W4,10:W5,10:W6,10:W7,10:W8,5:DEW9,48:W10,133:W11,48:DEFW61989:W,32:W1,248:W2,230:W3,224:W4,2:W5,176:W6,218:W7,189:W14,9:W15,242:W16,138:W17,164:W18,44:W19,192:W20,40:W21,176:DD軹W22,202:W23,164:W24,240:W25,76:W26,25:W27,248:DD黹W28,32:W29,9:W30,242:W31,138:W32,168:W33,192:W34,40:W35,176:W36,188:D E껹W37,165:W38,243ġ:2000:40000CCлIERR1131:766,128NBC(B):767,I:24576:VCڻ:2000:40000hC仭NBC(B)48150CW61989:W,32:W1,236:W2,241:W3,138:W4,164:W5,240:W6,192:W7,40:W8,176:DC滹W9,215:W10,76:W11,0:W12,248:DKD绹W13,32:WȹW2,252:D2B1W62031:W,76:W1,112:W2,252:D8B2UB ADD HI-RES COMMANDS tBNBC(B1)NBC(B1)İ7030:BERR0:NBC(B)NBC(B):I1316:766,128NBC(B):767,I:24576B(767)ERRI:I16BBERR48100BNBC(B)NBC(B)CƻERR161989:W,32:W1,236:W2,241:DFAW62002:W,32:W1,9:W2,242:DkAW62017:W,32:W1,9:W2,242:DAW62031:W,32:W1,248:W2,230:DAA.W61989:W,76:W1,58:W2,255:DA/W62002:W,76:W1,156:W2,252:D B0W62017:W,76:W1,66:)İ7030:H@ERR0:NBC(B)NBC(B):I912:766,128NBC(B):767,I:24576`@(767)ERRI:I12f@v@ʷERR47100@ԷNBC(B)NBC(B)@޷ERR9ġ:2000:40000@跁IERR191:766,128NBC(B):767,I:24576:@:2000:40000@NBC(B)47150!AW92:W19,141:W20,198:W21,251:W22,44:W23,128:W24,192:W25,96:DO?a?4NBC(B)46950?5W59268:W,32:W1,70:W2,231:W3,134:D?6?fW59268:W,141:W1,16:W2,192:W3,96:D?g? ADD TEXT & BELL CMNDS @NBC(B1)NBC(B2:W21,208:W22,238:W23,169:W24,4:W25,208:W26,242:D>W64713:W,44:W1,131:W2,192:W3,44:W4,131:W5,192:W6,141:W7,76:W8,248:D>W9,44:W10,128:W11,192:W12,96:W13,44:W14,131:W15,192:W16,44:W17,131:DI?W18,1:W22,5:W23,160:W24,50:W25,136:D.=ֶ=W63414:W,44:W1,83:W2,192:W3,169:W4,8:W5,32:W6,201:W7,252:W8,76:D=W9,64:W10,251:W11,169:W12,8:W13,32:W14,214:W15,252:W16,76:W17,57:D=>W18,251:W19,169:W20,4239:W25,224:W26,165:Dv<ӶW64713:W,160:W1,75:W2,32:W3,219:W4,252:W5,208:W6,249:W7,105:W8,254:D<ԶW9,176:W10,245:W11,160:W12,33:W13,32:W14,219:W15,252:W16,200:W17,200:D(=նW18,136:W19,208:W20,253:W21,14450;`;жW63414:W,252:W1,169:W2,3:W3,76:W4,2:W5,255:W6,24:W7,165:W8,155:D;ѶW9,101:W10,80:W11,133:W12,62:W13,165:W14,156:W15,101:W16,81:W17,133:D<ҶW18,63:W19,160:W20,4:W21,177:W22,155:W23,32:W24,:W,32:W1,248:W2,230:W3,138:W4,76:W5,139:W6,254:Dd:nW62358:W,76:W1,64:W2,251:Dy:oNBC(B1)46800:p:W61918:W,44:W1,85:W2,192:W3,76:W4,193:W5,247:W6,0:D:W62358:W,76:W1,201:W2,247:D;NBC(B1)468,76:W5,149:W6,254:D>9 W62364:W,76:W1,57:W2,251:DS9 NBC(B1)46800Y9 9:W61925:W,44:W1,86:W2,192:W3,76:W4,182:W5,247:W6,0:D9;W62364:W,76:W1,205:W2,247:D9:mW619187,252:W8,177:Dn8۵W9,40:W10,145:W11,42:W12,136:W13,16:W14,249:W15,48:W16,216:W17,160:D8ܵW18,0:W19,32:W20,158:W21,252:W22,76:W23,34:W24,252:D8ݵ8NBC(B)466509 W61925:W,32:W1,248:W2,230:W3,138:W4W11,133:W12,42:W13,165:W14,41:W15,133:W16,43:W17,164:D7صW18,33:W19,136:W20,104:W21,56:W22,233:W23,1:W24,48:W25,23:W26,76:D7ٵW27,191:W28,243:D8ڵW62399:W,197:W1,34:W2,144:W3,13:W4,72:W5,32:W6,36:W================== CREATE NEWBASIC BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== 60060UA27A493106UBA64:B1İ7030:60060>U20JUꥫ60160qU:(4)"BSAVE "BB$",A$D000,L$3000"|U216,0USV1:60060U216,0:6:1:958:7030:7030:12:15::" DISK ERROR "::23:11:" TO CONTINUE ";:A$:60000zVN"6T~15:"________________________________________"JT" SAVE "BB$zT"________________________________________"T23:1:"SELECT < > TO EXIT";:23:9:7040:A$:5000TA(A$)32((A$)95)UA48Ĺ767,SLOT:22531:S,S&W55614:W,32:W1,156:W2,247:DtS'W63388:W,32:W1,123:W2,221:W3,32:W4,82:W5,231:W6,96:DzS(S` SAVE NEWBASIC Sj::12:": SAVE NEWBASIC :":Tt5:15:"BEAGLE BASIC":12:"COPYRIGHT (C) 1983":13:"MARK S. SIMONSE R޺(7)-RNMF(B)0:(64485)12NMF(B)1MRޢ9:1:868::868::868SRޱnR MODIFY GOTO/GOSUB RNMF(B)NMF(B)RNMF(B)58150RW55614:W,32:W1,12:W2,218:DRW63388:W,144:W1,2:W2,208:W3,3:W4,76:W5,16:W6,212:D1101)6Ĺ64802,238:64803,252:DaQ[ۭ(1101)6Ĺ64816,238:64817,252:64419,238:64420,252:DgQ\۱|Q޲ MODIFY BELL Qޢ9:12:"NORMAL VALUE: 12":12:"CURRENT VALUE: ";:(64485)Qޖ12:"CHANGE TO: ";Qް8000QޭA0A100Ĺ64485,A9:W8,107:DhPW۹W9,145:W10,40:W11,104:W12,230:W13,78:W14,208:W15,2:W16,230:W17,79:DPX۹W18,44:W19,0:W20,192:W21,16:W22,245:W23,145:W24,40:W25,173:W26,0:DPY۹W27,192:W28,44:W29,16:W30,192:W31,96:D!QZۭ(W25,69:W26,47:DJO(۹W27,133:W28,47:W29,192:W30,128:W31,96:DrO)ۭ(1101)6Ĺ64802,12:64803,253:DO*ۭ(1101)6Ĺ64816,12:64817,253:64419,12:64420,253:DO+۱ PVW64748:W,0:W1,0:W2,164:W3,36:W4,177:W5,40:W6,72:W7,1650[N%W64748:W,162:W1,8:W2,72:W3,32:W4,250:W5,252:W6,104:W7,42:W8,160:DN&۹W9,58:W10,202:W11,208:W12,245:W13,96:W14,32:W15,253:W16,252:W17,136:DO'۹W18,173:W19,96:W20,192:W21,69:W22,47:W23,16:W24,248:75MĭNMF(B)OLDČD!Mİ55000,Mī50080FMֲ PRINT SELECTIONS QMցI13]M֭F3ČDkM֭NMF(I)ĞMז35:V3(I):"YES";M ם:"/";M׭NMF(I)ĞM׺"NO"M(םM2ׂM TO EXIT";:23:9:7040:A$:5000\LA(A$)32((A$)95)~LíA48Ĺ767,SLOT:22531:50080LíA27A49310LBA64:B1B3İ7030:50080LOLDNMF(B):768LíA65İ56000LíA66İ57000LíA67İ58000MÌ7___________________________________"Kxú" ADD ESCAPE CURSOR............ YES/NO";:" MODIFY BELL.................. YES/NO";:" MODIFY GOTO/GOSUB SYNTAX..... YES/NO";Kú"________________________________________"KF30Kð55000BLâ23:1:W1,102:W2,252:D:JW62017:W,76:W1,16:W2,252:DaJW62031:W,76:W1,244:W2,251:DgJJPò OTHER FEATURES JZ×::12:": OTHER FEATURES :":Jdâ5:15:"BEAGLE BASIC":12:"COPYRIGHT (C) 1983":13:"MARK S. SIMONSEN"$Knâ13:"_____76:I¿:2000:40000)I̿NBC(B)49150PIͿW61989:W,32:W1,236:W2,241:DuIοW62002:W,32:W1,9:W2,242:DIϿW62017:W,32:W1,9:W2,242:DIпW62031:W,32:W1,248:W2,230:DIѿIW61989:W,76:W1,26:W2,252:DJW62002:W,76: ADD CURSOR COMMANDS 5HrNBC(B1)NBC(B2)İ7030:uH|ERR0:NBC(B)NBC(B):I1720:766,128NBC(B):767,I:24576H(767)ERRI:I20HHERR49100HNBC(B)NBC(B)HERR17ġ:2000:40000IIERR1171:766,128NBC(B):767,I:245W32,224:W33,2:W34,176:W35,189:W36,189:DiGW37,86:W38,192:W39,96:W40,234:W41,234:DzGW45,202:DGW63588:W,224:W1,2:W2,144:W3,3:W4,76:W5,6:W6,242:W7,189:W8,80:DGW9,192:W10,96:W11,234:DGHh f&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` ڽR` ̽T` V` 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 ^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`ENFONEXDATINPUDEDIREAGTEXPRINCALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALESHLOATRACNOTRACN0H 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$ c c =l 6l c cflglbl$cl [h`HmlH d$bl%cl2 Dl c c,ml gml dɰ k c cbl$cl [h`H d$bl%cl X@ Dl c c 6l =ljnl c clnlH)qlhol qlmolH)ylhpl ylɠ 6l0 6l 6lilө$ [ilhlilil"$i$($% "L)gbl$cl [h`H d$bl%cl Dl g dɰ k c cbl$cl [h` [$ c c< d0 6l0 =l$i$( $% " 6l =lLg d`H d$bl%cl Dl )ٙƙ.ș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䆞`" ȱ ↭^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ک?`g3?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բ$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 FOERRORETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGALMIPAGRESHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALEELSTRACNOTRACNORMAINVERSFLASMODPOVTAHIMEMLOMEMONERRESUMRECALSTORSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOWAILOATONDEPOKPRINCONLOOCLEAGENETABTFSPCTHEANOSTEЫ0oeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCAL                               ? )- ?;;----?;; ?  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 "(!(%%#(!   "SAN DIEGO, CA 92103"# (4)"FP" ================== NEWBASIC LOADER BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== +4241842422:I,234:) (1005)2200> (46786)32190M 46790,130\ 46793,128k 46830,128z 46809,131 ::"NEWBASIC LOADED":::"BEAGLE BASIC":"BY MARK SIMONSEN":"COPYRIGHT (C) 1983"::"BEAGLE BROS INC.":"4315 SIERRA VISTA":,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)"BLOAD "BB$",A$D000" I OF BASIC ((4)"NOMONICO"5 2FIND LANGUAGE CARDS <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================== 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":NAME    6l =lhlil c cilil*ɠ ) 6l 6l0 =l =lH 6l =lh08flklflglgl c cbl$cl [h`H d$bl%cl: DlllLf$ )ɍɈllɕ(ɡ($LEg(llil cS  l d$8$Le% " $hlh`Hhlj d$ i$L>e% "$hlh`H d$bl%cl Dlcl [bl$$(ɠklgl mflllklmflflgliglLe$ )ɍɈllɕ(ɡ($LVfkl(ll c c0`,)`ol [ ol$H 6lh%oliol`$bl%cl Dl N Tl "$glofl o$D Tlglfl $bl$clL[$()?(`$()?  @ (`H% d% "hl8hlh`Hhlf d% "hlihlh`HhW5,LcLk c c8dlflelgl [$hl d Fd dɋ dɊ dɈ dɕ eɲ Ceɳ {fɶ Rgɸ gɷ /hɴ xhɵ iɹ iɰ kɱuɛqL+cЅ`l`o`l`o`$dlel [H dlel 6lh穠  #'+/58<@DHLPTZ^bhmpsw{92:W30,128:W31,96:D2M(ۭ(1101)6Ĺ64802,12:64803,253:DpM)ۭ(1101)6Ĺ64816,12:64817,253:64419,12:64420,253:DvM*۱MVW64748:W,0:W1,0:W2,164:W3,36:W4,177:Hh,a`? aL`Ii-aBm-a? ,b,0/bCaHh`+a H D`h0𱣰MOVE EDITINCHANGEO.K. TO NORMALIZE (Y/N)?STANDAR: ERROR MESSAGE EDITOR TURN PRINTER ON AND PRESS TO CONTINUE OR TO EXIT OLD NEW 49240JBA64:B1B3İ7003:50040JOLDNMF(B):768JíA6THOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGAL DIRECTYPE MISMATCSTRING TOO LONFORMULA TOO COMPLECAN'T CONTINUUNDEF'D FUNCTIOERRORINBREAK    *5EMZkx  ^ $Y^Y  ^ $^^^  X vX X$] [h`H Y%] ]$] [h`Lc`` [$H h_H h`NEXT WITHOUT FOSYNTARETURN WI$] [h`H]H Y%]/ ] X X,] Z] VYɰ ] vX X$] [h`H Y%] XO ] ɍLy] ] vX XH h$0H h X^ei vX^ei ^ $Q^Q 2] Y: vX^ei X^eiL9[ ] ]LZ ]Q^ YL^[ ]Y^ YLy[ ]^^ YL[h]`H Y%] ] )H vX XH ] ]h^Q^Y^^ vX X ]] []$]^]( $ )ɍɈ]ɕ(ɠ($H] vX]^ei)] ]] ]]  vX X$] [h`H Y%] ] Z VYɰ ] vX X$] [h` [$]H vX X]] vX]^eiLX Q  Y  ^ `,)`$]%] ] 7 ] ]$]L[]]^ʤ$()?(]`]^ʤ$()?  @ (`H% Y% "]h`H] Y% "]h`H Y$]%]XLXL] vX X [$] Y eY VYɈɋ YɊɕ Yɲ Yɶ Zɸ [ɷ \ɹ K\ɰ ]ɱɛ LX`҅`݅]`݅]`$ [] ]^ʠH ]h ]]`$ [] ]^ʠH ]h          z#?   ŠŠ ŠàϠ!Ůà""ŠàP®ʰàҠ à2 ԠΠҠ   ٠ˠΠé   ϠŠӠ   ŠӠ   Ӡ    ŠǠ̠Š Ӡɠà 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& &&`0iLP``J G&(JJJJ)`:; H:J jɢ )Jb y.)/) JJJ Ȉ` H:  J/Ȑh,--& W :L ` `  eȱe ` -L -LaL٥ɭɚ ٠LِLԅtp=hso< LeP>eQ? I g RQ` ʊ( (H hL$`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ` g RQPHH, hh`L `*U e (978)189304"EXEC DO PLE DOS MOVER":H"BRUN PLE.DM"d("BRUN DOUBLE-TAKE.DM"MONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== ;:A$:A$. <A$"A"ĺ(4)"RUN BEAGLE NEWS":Y FA$"B"ĺ(4)"RUN BEAGLE BASIC DEMO": PA$"C"ĺ(4)"RUN CREATE NEWBASIC": ZA$"D"ĺ(4)"RUN NEWBASIC LOADER": dA$"Q"Ā n50: ================== HELLO BEAGLE BASIC MARK SIMONSEN":"(C) COPYRIGHT 1983"::"BEAGLE BROS INC.":"4315 SIERRA VISTA":"SAN DIEGO, CA 92103": (" RUN BEAGLE NEWS":" RUN BEAGLE BASIC DEMO"::" RUN CREATE NEWBASIC":" RUN NEWBASIC LOADER"::" QUIT" 222:1:"SELECT < >"(8)(8);v================== HELLO BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ==================  ::::(12):FOR 80 COLUMN BOARDS(4)"NOMONICO"a "--------------"::" BEAGLE BASIC "::"--------------"::"BY MARK SI   J11::S(16336)::22:16368,0:UTX49237:K1NB:TX,0:::22:16368,0:160:VV2:I23V1:I:1::(A$,N);::(A$,(A$)N);:958:S(BZ)::'VV1:V:I0N1(N69):H:I;:J12:S(16336):::70:V13:H3:9999:N4:V19:H33:9999:N26:V21:H3:9999:N21:V23:H3:9999 n49385,0:A$" GET ON OUR LIST. WE MAIL GREAT MAIL! ":49384,0:I2039:24:I:(A$,I,1);:40I:(A$,40I,1);:J15:: NB123:160:23:&TX49237:K1NB:TX,0::0 100 PROGRAMS FROM TIP BOOKS 1-":N13:999 UA$" TYPEFACES ....................... 20.00 FONTS FOR APPLE MECHANIC":N11:999 ZA$" UTILITY CITY .................... 29.50 USEFUL UTILITIES ON ONE DISK":N14:999M d::N12:V7:H3:9999:NUT HARDWARE":N11:999s <A$" FRAME-UP ........................ 29.50 TEXT AND GRAPHICS PRESENTATIONS":N10:999 FA$" PRONTO-DOS ...................... 29.50 TRIPLE-SPEED LOADING AND SAVING":N12:999, PA$" TIP DISK #1 ..................... 20.0A$" DOS BOSS ........................ 24.00 COMMAND EDITOR, PROGRAM PROTECTOR":N10:999 -A$" DOUBLE-TAKE ..................... 34.95 2-WAY-SCROLL FOR LISTS & CATALOGS":N13:999 2A$" FLEX TEXT ....................... 29.50 -COLUMN TEXT WITHO.............$39.50 HI-RES GRAPHICS AND TEXT PLOTTER":N12:999:160 A$" APPLE MECHANIC .................. 29.50 SHAPES, ANIMATION AND BYTE-ZAPPER":N16:999 #A$" BEAGLE BAG ...................... 29.50 -GAMES-PLUS ON ONE DISK":N12:999Z (;  BUY DOS BOSS & PREVENT LISTING! FPt:V1:NB51:BZ16336:160:NB1:I124:160:::::" BEAGLE BROS DISKLIST ";::" (APRIL 1983)----------------------":I151:170::NB19:160:NB9E A$" ALPHA PLOT .........     jQ$"patches"Q$" (changes) may be instantly"Wt"added to your Apple at NO COST in"f~"memory."9:"GOTO and GOSUB may now be followed by""variables and expressions. Use English-""like commands such as" 13:8:"GOSUB MARINE or witch Pokes."9"Use these commands and never look up"X$"those darn Pokes again!"f.::34,0p82000vBL7::": PROGRAMMING ENHANCEMENTS :"V3::"In addition to the new commands just"`"mentioned, any or all of the following". like Text Page 1, for"F"printing, listing, etc. Switching pages"t"opens up all kinds of programming pos-""sibilities.""MIX, PAGE, RESL, and MODE <-- With""these commands you won't have do any" "more awkward screen-sL"0:"HSCRN <-- If you have ever used the"^"Lo-Res SCRN command, you'll appreciate""HSCRN for finding the on/off status of""any hi-res dot.":"HSCRN X,Y":"TXT2 <-- This command allows you to use";"Text Page 2 just4"this--">23:"SWAP X,Y"CH23:"SWAP Y,X":23:"SWAP X,Y"IRv\"TONE <-- Beagle Basic's TONE command"f"plays a note of pitch P, for a length"p"of L. It's simple--no messy Pokes or"z"Calls are ever necessary.":"TONE P,15:"IF X=2 THEN PRINT "Q$"Yes"Q$": ELSE PRINT "Q$"No"Q$;o 17:"SWAP <-- Normally, to swap two variable";"values, you need a third variable and an"; "extra split second (TEMP=X:X=Y:Y=TEMP)."*"Exchange values in one quick step like" rand""new commands."<8:"Here are a few of them:"F34,9{10:"ELSE <-- This command is common in many";"programming languages, but missing from""Applesoft until now. ELSE follows If-""Then statements, like this--": POP to PADRE"@v21:3:"Change SYNTAX ERROR to SMOOTH MOVE!"J2000Pw8::": NEW APPLESOFT COMMANDS :"3::"In addition to being able to change the""names of the commands and error mes-""sages, Beagle Basic gives you 20 b"can be renamed. Beagle Basic lets you"X:"literally re-write Applesoft for program";D"protection, encryption, or even foreign"N"language translation!"X9:12:"Change HOME to CLS"b13:10:"Shorten INVERSE to INV"l17:11:"ChangeI140 10:41I:(A3$,I)4 11:1:(A4$,I)L 12:41I:(A5$,I)R ^ I140s 14:1:(A6$,I) 15:41I:(A7$,I)  2000  8::": RENAME BASIC COMMANDS :" &3::"Any Applesoft Command or Error Message"'0dom access memory), letting you "X hA5$"customize and enhance it. " rA6$"The following enhancements may be added " |A7$"at NO COST IN MEMORY-- " I140 7:41I:(A1$,I) 8:1:(A2$,I)  ista" 16304,02 11:"San Diego, CA 92103"@ 16303,0J "2000P ,Y 6255 @A1$"Normally, Applesoft is unchangeable. " JA2$"What you see is what you get. " TA3$"BEAGLE BASIC puts Applesoft into RAM "% ^A4$"(ran6304,0" 13:": :"0 16303,0S 6:12::"APPLESOFT ENHANCER"a 16304,0 11:13:"By Mark Simonsen" 16303,0 12:"Copyright (C) 1983" 16304,0 14:13:"Beagle Bros Inc" 16303,0 12:"4315 Sierra V(1101)6Ĺ54,96:55,3:1002B 2:(4)"BLOAD BEAGLE.PIC,A$4000"d <I1500:(16384)127I500t F:16368,0~ P:: Z16298,0:16304,0 d:Q$(34):SPD125 n2:13::": :" x16303,0 13:" BEAGLE BASIC " 1================== BEAGLE BASIC DEMO BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ==================  (12)(21)I864882:BYTE:I,BYTE:72,165,243,201,64,240,8,104,201,224,144,4,233,32,72,104,76,240,253 (               " DD"""~Ѫժ`?|xժժp|ЪժժՂxǪժժx?ЪՊՂՂpAx`pA ժժժժժժxժժpAx`pA8Ԫժժժժ}ǪժժxԪժЪժժժ~ժժժժժժժժdԪժՊժժժժł|?Ԫժժժ @D@p" " `ъԪՠժժժ@ѪժժxժժժժժpժpժЪժՠժՂ~ǪժժŪժժժŪ<@c qqx `ժЪՊԪժբՂЪժժՊԂpAx``pA@ԪժժժժժxժժըժժժժpAx|`pAx?ՠժԪժժժժǪժժժժժբ x?ԪժxժժժժԪժժժ?ЪժՊp?Ԫժժժ x80pqx"|тԪՂՂxժժp@?Ъժժ@ǪժժD D |ЪՊՂԂp!x@`p!8Ъժժժժժx~ժժԂpAx`pA8ժժժժժ`Ǫժժ x?ԪժѪժժժժժЪժժժ|ժՊժժժժł?Ԫժժժ DD """@?ЪЪբժժժxԪժժՠղ~ժժժժժpժՊ~?ՠժՀժpǪժժŪժժժDD I HpժЪՊԪժՂѪժժժԊ px?x`ppxЪժժժժժx}ժժՠժժժժЂpAx`pA8@ժՊժժժժժ`]ժժժժժՂ!! ! ! ! ! !!!!!!!!!     A$SECND0%A(A1$)10(A2$)-A$GA$(8)ĺ(8);:8090[ A$(13)8180a {(# SCREEN LOCATIONS 2#I13:V1(I):<#I111:V2(I):F#I13:V3(I):P#15,16,17Z#9,10,11,12,13,14,15,16,17,18,19d#15,16,17n#$#^A$(21)FIRSTA$A1$:8060>hA$(13)A1000:8210VrA$"0"A$"9"8020_|A$;jA1$A$vFIRST0A(A1$):A$A$(21)SECNDA$A2$:8140A$(8)ĺ(8);:8020A$(13)8210A$"0"A$"9"8090A$;A2$68,3,73,138,32,168,3,136,208,244,32,63,255,96,170,202,208,253,44,48,192,96vv919,150:925,234:D:919,20:925,138:K15:ZZ(16336)(16336)::K150:K15:ZZ(16336)(16336)::@ INPUT NUMBERS JFIRST1:SECND1TA0:AC(8)1 (61990)58NBC(9)1<(61990)248NBC(10)1W(61990)26NBC(11)1p(64748)0NMF(1)1(64485)12NMF(2)1$(55615)156NMF(3)1.X FUNNY NOISES bD915:ID943:J:I,J::Jl32,74,255,160,20,152,32,1(55048)33LF(2)13(55055)5LF(3)1M(55768)76NBC(1)1h(55498)227NBC(2)1(55472)32NBC(3)1(62396)76NBC(4)1(62367)165NBC(5)1(61925)44NBC(6)1(61918)44NBC(7)1(59268)141NBE SPACE ERROR 6:1:958:7030:7030:12:5::" NOT ENOUGH SPARE CHARACTERS IN ":13:" COMMAND TABLE! "::23:11:" TO CONTINUE ";:A$: REMOVE SELECT LINE 23:1:958:p CHECK STATUS z775(55063)32LF(1)1A6710000A6920000,A7630000<A6640000LA7950000\A8360000|A48Ĺ767,SLOT:22531:3607030360 RAM CARD ROUTINES I768778:V:I,V:: 44,131,192,44,131,192,96,44,128,192,96 NO FREIC":" QUIT"ph32,0:19:12:"SELECT < >";(8);(8);:7040:A$:19:12:" ":A(A$)32((A$)95)rA81400|19:12:" "::22:SVĖ3:BB$" HAS NOT BEEN SAVED TO DISK!"" TO START OVER, TYPE "Q$"RUN"Q$".";:  :":`T5:15:"BEAGLE BASIC":12:"COPYRIGHT (C) 1983":13:"MARK S. SIMONSEN"^32,7:9::" COMMAND EDITOR":" ERROR MESSAGE EDITOR"::" LIST FORMATTER":" ADD NEW BASIC COMMANDS":" OTHER FEATURES"::" SAVE NEWBAS ,46809,131 6:::Q$(34) @:2:": :":I320:I:1:" ";:40:" ";::": :";J1:11:": :":10::" ";::" CREATE NEWBASIC ";::" "::11:": : A2230 220D 830,96:824:(4)"BLOAD "BB$",A$D000"M 230V 768 216,0:1000:6000:7000:9000:768:8186,1:775 I4241842422:I,234: (1005)2310 (46786)32300 46790,130 46793,128 "46830,128 0,3,44,128,192,96,0 A(856)A COPY APPLESOFT OVER (MAYBE)Z I768803:V:I,V: 44,129,192,44,129,192,169,0,133,238,169,208,133,239,160,0,177,238,145,238,200,208,249,230,239,165,239,208,243,44,131,192,44,131,192,96 (A)ĺ"NO RAM CARD!",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 x19,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,24EMORY!": 289286 (BB$"NEWBASIC":NAME OF BASICJ 2NBC(11),V2(11)x <(12);(21): TURN OFF 80 COLUMN BOARD F(4)"NOMONICO" P(4)"BLOAD CNB.OBJ0" ZFIND LANGUAGE CARD dI768856:V:I,V::768 n173,0,224,72,44,129,192,104,72{N================== CREATE NEWBASIC BEAGLE BASIC MARK SIMONSEN BEAGLE BROS COPYRIGHT (C) 1983 ================== SLOT1:PRINTER SLOT  (978)157ĺ"CAN'T BE USED WITH DOS ON THE RAM CARD!": (176)87(116)114ĺ"NOT ENOUGH M"" " " " " """""""""