8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL L8stR @ ? /) Ƀȱ @ ȩJ  e ȱ e 8e/ @J@@ ӭ@@L@LJFFFFFFvHH X=FdLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@LLnSOS BOOT 1.1 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!)? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8R0LDLAL2AEFEFLvE@F?F : rD g8h ^B "B Ƀ LCLAL7BL7BLA B sB4 sB) FFEF :ۦ 9EFF UB BL]AIFHF :ۦ 9EFFLALF %&' !"# ` ȱ 8 ȩW  e ȱ e `L$) @ :LBBB LAAꍉsAtoUpU ImUnUsUqUrUUߢAWAA ӢE@ st荶UUL+PL{=LWLEB I 9nU nU ^FLDnU)nUL@ĮǠ٠ĮϠŭĬŠТΠΠĮǮĮǍԠéΠčŠӬîĠҠà͠ů@尰 ~@ 8stSȅ A  / A @L@/  > A @L@ 8e/:36,(33)1:" ";::I1(33):" ";:::_ A49200:I15:J120:B(A)::J115:::r 36,9:TĹ36,Tx  1)ĺA$ A$"6"A$"0". A$"Q"A$"6"K A$"1"A$"6"İ900:170 (A$"0"A$"7")Ģ12(A$):1000:"--> ";::A$((A$)): A$"6"Ģ23: R$"RUN ":A$"4"R$"BRUN " 22::D$R$A$((A$)):- 11::I1(33):" ";::I1322:" ";Y D$(4):I16:A$(I)::COMPACT,COMPARE,D.BUG,D.BUG.DEMO,NOTES,QUIT:(33)80T29::D$"BLOAD TITLE":212:800:13:I16:1000:"("I") "A$(I);:I5ĺ" (CHANGES TO MANUAL)";x: 18:1000:"(Q)"::1000:" SELECT: "(8);:A$:A$(3E"PEEWEE R EE :LMD LMD~FF $'%d  JLJ |B BHImFlF :LMD BpFoF :LMD sBްLGLHL HL(HL%HLHL HL*HLjHLHLHLHLHLHEFEF̍FLFEFEFčFWF :۬[FZF :ۮFF 9E^F]F :ۦ 9EaF`F :ۮFF 9EdFcF :ۮFF 9E E=HtgFfF : rDL@CFBF :L )ɠ H h  :LrD`HjFiF :hrFsFzuFvFnxFyFb{F|FV^@EEFEE:EEE.NEӲLB|Dx||?``|@xAx?p $@ABCDEFGHIT*`P wp*@*|C**Ux  xo)}( |p*A (U*U | | @@U U*? ( | U*pHx F| 9p U*U*U*E` U*| x ӠîĠΠŬŠàΠϬ((((PPPPLtddD88?``|@xAx?r ~? U*(U* |` x(U*U"U*@"U*U*| pyp a<?~L@?~pc y U `P U*U*q*~? p E @~ acGpI8pU*U*UU*U|U*Ux ` +,-./0123456789:;<=>8` bL M` MLbL L MLL /J K` M; M L` M M` bL` OLM O MLL M M M M M` L5J L5J M M M M MLJ M΢LMץHH S @JLOJ Shh` P&Q PPPQP/J L MLO MLK M J M Lɢ MLL O MLL M O M` L M MLbL M bL J٢: M` M; M N M` M M M M` NLM M pMLO L M M L` M` N$ MLK L M` L M M M` M M M` L ML*M M ME M M M` M M M` M M M` M M` M M >K K M`,,,,,%,$,,,(,),.,,,φ 8` O0:L/J" /J&"L/J M L MLM M M M`A[L͐ M @M` /J( Kܰ3 M O M ,K L M MLLL pM @M pM` Mi LLK L HPHQHPQ hQhPhB8` 2/ ^& &^ &^e^e&e  ` L MLL M M M`І LؤЦф 5JLpM MAN BIRD - BEAGLE BROS, INC.":214::I20002039:I,32:J11:S(C)::J11:::246::24:1::39);:2039,32:23::35,23:J116:I15:S(C)::I133:::::B$"-- M A I N F E A T U R E S --":240:258 $"ONE OF THE MOST FRUSTRATING THINGS A B176:C49200:D1:(21)::::B:Q$(34):G$(7):A255:230,64:(4)"BLOAD D.CODE.LOGO,A$4000":16368,0:16302,0:16297,0:16304,0:16299,0::272::A$": :"::214:A$" D CODE "::214:A$": :"::214: A$"BY ALM M M M O`LLLO LLeOҐЪ8`簤8`ׅҥPQ $əɄ˹ʩ \2?2ɦɽ$0˱ CLrKLtKYU S KLK 2H2 h2{$` ` M* L%LM M pMLKȐѸ uU줊 uU uU `8`湄`` QC J8ɝ  :LSJ HK`DɀW I M3 M9 M M M#LL ?  L%O L`LNL M` M MLpM8` SHSHL/J L: M ͶUU`LFZU %oUoUʆ%`U2bUeU{oU#aU{%L[ oU"mU!!!sU$qU{fU{## [LKmU lU8mU!# HoU" [ KLK ZU2`U{aUbU{eU e!lU`kU0 DƊ` =:uU-x ]H,ɓɠ ɠ<Ɉ ɕɃ-gUhU KLZC$c0$c0cx : K ELG$c0LF HA,dULH /JŸ幐QPLwHPwQx`{$`PQP HͷU ͶUdU HhU gU FLHPQ`iUjU8U ?F ZCLHG ZCLF ZCLHG xRuݸVЙvݹVВV޻V޺VЅV KW R: 88 sآxc{gUhU H A QCgU hUL-Hȱ wx K ELHh:g6䰰1 qH K$c R > WۦPQ $ C kCPQwK `莱U؍U؍UUUSSuvUU`UحUUUUUuv`oU %H K "# HoU [ Bh [`ȥeS SdUiUjUUU`0WjM QC yRmSSij FtU gݩtP*QJ.ep@P*U*x x ~o)9*P`(E*`*U*U*|?  SQS)8SPHPSQH8Q hUhUdULFL,nU S tP Db`3 S`Lޠ: UU,nU ILDL|8|?~N@?~ ~'eP X#*U*Ur |*U*U*U*x ?``@xAx?~ & DOWN ARROWS ACTIVATE TRACE FIRST NO ERRORS", AND UP ֩ҥ NK S QC8 LS)Ѹ@#湠`8ɝLSPQ'%PQPdQ P Q JPQ $ HLS X LS LS8 LSP LSQ`TH \h` LLALULVLUNNNONLlONNK-+ \ۢh S $ \f)f C xRV  C \` C xRVV $, \ WۤVVL$ ` LRɆ͆̆ L] SvHv .ՆЄhvE K SЦх Yբ0 K K S K S $ KL< WnU @nU`L0W`  ڦQP ʆ ɼ^: ɭqɴgLަ0 ڦW xRPVQVVV  g R禊PVQV Q` N QLQLK…0 xR LS: VƋLީVWLQW* 8s^tN @ ? /) ɾȱ @_ ȩN  e ȱ e 8e/ Ţ@^N@@ өL@@ů@尰-@ :LuHĠҠà͠L@L^N[N\N]NL JI8gh JJ :LuHJY T R A C E R --":226-"D CODE INVISIBLY MONITORS PROGRAMS AS THEY RUN AND AUTOMATICALLY KEEPS TRACK OF WHICH STATEMENTS HAVE BEEN EXECUTED."::"FOR EXAMPLE, SUPPOSE YOU HAVE A PROGRAM THAT CRASHES WITH AN ERROR...":246::A.G$"?ILLEGAL QU"1.":3:"2.":3:"3."::14:18:"<#>":14:"";:28,""::20:3:"1. A GOSUB TO A NON-EXISTENT LINE <#>":3:"2. AN ILLEGAL STRING ASSIGNMENT ":3:"3. AND A SYNTAX ERROR ":246::14:18:"<#>":14:"";:28:"":B$"-- H I S T O R :A$"CHECK":N4:248:::" 10 GOSUB 12345";::"<#>"G$::+" 45000 A$ = ";::""G$;::"100: INPPUT";::""G$;::" NAME$"::B::"UH-OH!";:246::1:"UH-OH! LINES 10 & 45000 HAVE PROBLEMS.":246:"THREE KINDS OF ERRORS WERE REVEALED:"::3: ------":I18:18:13:"^^^ ^^^";:J199=*:1:868:J199:::246:21:1:868::B:"FIND HIDDEN BUGS THAT ARE READY TO BITE!";:226:"YOU MAY ALSO CHECK AN ENTIRE PROGRAM FORERRORS IN A COUPLE OF SECONDS. WATCH..."::3:"]";TERED A PROGRAM LINE..."::A$"500 GOSUP100: PRNNT"Q$"HOTDOG"Q$@)N2:4:"]";:248:A::" 500 GOSUP";::""G$;::"100:PRNNT";::""G$;::" "Q$"HOTDOG"Q$:B:246:A::" ERRORS ARE REPORTED IMMEDIATELY, BEFORE YOUR PROGRAM IS RUN. ":24:" STOMP ":A:B$"-- P R O G R A M P R O O F E R --":226D("D CODE CONTAINS AN AUTOMATIC APPLESOFT ERROR CHECKER. IF YOU TYPE A PROGRAM LINE (OR ANYTHING) CONTAINING AN ERROR, YOU WILL IMMEDIATELY BE NOTIFIED.":246::"SUPPOSE YOU EN24:23:I:A$(I(I2)2):J155:::I1523:I:26:"STOMP":I1:26:" "::I120:S(C)::A:22:24:" CRASH ":868:I199::22:5:868::24:" STOMP":J15:S(C)::A:22:24I '"# *":24:" \STOMP/ ":B.7:22:24:" S":J199::A:24:1::39)::I199::I1721:I:1:"BUGS":I1:" | ":J1150:::246:J15:21:1:"BBUGG*";:I150::1:"BUGS ":I113:::21:1:868:23:1:"BUG*":J15:S(49200): &246:A:A$(0)" BUG* ":A$(1)" BBBUGG*":I1BOUTAPPLESOFT PROGRAMMING IS TRYING TO FIND THOSE GOOD-FOR-NOTHING PROGRAM BUGS."::246:"D CODE'S "Q$"D.BUG"Q$" PROGRAM GIVES YOU THE POWER TO TRACK DOWN (AND STOMP ON) THOSEBUGS... ";:246:"F A S T !":246 %15:1::"BUGS";:1::246:"BUGS":"BUGF CLBLC B,ȥьȥ CLCLC "GA=J[JJ FL Cei`LD B" F$ aGJ B FɴqɥmɫɱɀɿɦGɭ^ɬ  $0Ш F:ɲeŊ勐UJJ :LuH |F |F%$ (   BŁȥьȥь` CLOB8 Bȥȥȑȑȑ``Յ`,JP X,J67KK67JJ :۩" B#ȱ "GJJ (*ghijkmJ : F F湥Іѥ᭖JJJ FLB F?ɫiɰeɬ ɲɃ SLRA FLRA LzA" F LzA",J } Bȱ둌ꑌLzA ڥƹƸPQuv aG A, LALOAuȥvANTITY ERROR IN 110 ]";:G4:256:1:"]"::255:"(DON'T PANIC--WE'RE JUST PRETENDING.)":17:2:G6:256:17:1:120):18:B:"WE CAN LOOK AT THE LAST 10 STATEMENTS THAT WERE EXECUTED BY TYPING..."::4:"]";:A$"DUMP10"/N4:248::34,7:35,23:222:" 90 TEXT : HOME : NORMAL : GOSUB 5000 5000 XX = 887: PRINT: RETURN 100 PRINT "Q$"DOGFOOD"Q$" 110 VTAB Y: HTAB XX"::::::246::20:"A-HA!";::K(37):98:K1:1:B0"A-HA! WE NOW HAVE A BRIEF HIST 6":246::B:"ALL OCCURRENCES OF THE SEARCH WORD ARE LISTED AND HIGHLIGHTED IN INVERSE.":246:B$"-- P R O G R A M P A C K E R --":226~#"D CODE LETS YOU COMPACT ANY APPLESOFT PROGRAM SO IT TAKES UP THE LEAST AMOUNT OF MEMORY AND DISK SPACE POSSRCH FOR:";:A$"CAR":248:::222:X$" 80 A$ = "Q$:168:"ROT"Q$": GOSUB 5000":X$" 300 ":168:X$" = 500: PRINT "Q$"INDY "Q$";":168::X$" 5020 PRINT "Q$:168:X$"LOS S":168:X$"ED ":168:"L."Q$:170!X$;::A$;::":" OCCURRENCES:46::B:"THIS SHOWS US ALL OF THE PROGRAM LINES THAT CONTAIN THE SEARCH-WORD "Q$"GOSUB 50"Q$".";:246:"SEARCH MOST PROGRAMS IN UNDER 2 SECONDS!":226:"FIND & LIST? (THOUGHT YOU'D NEVER ASK!)---- ----":246::3:"]";!A$"FINDL":250::A:" SEA ANY WORD OR CHARACTER IN AN APPLESOFT PROGRAM...F-A-S-T !"::3:"]";:A$"FIND":248::255:" SEARCH FOR:";:A$"GOSUB50":248::246::210:" 10 50 65 590 2000 6010 5480 5490 12000 12150": " OCCURRENCES: 10":2GRAM STATEMENTS":868:I1100J::15:" "::"PROGRAM STATEMENTS":I1100J:::15:26::"VARIABLE VALUES":15:26:868::26:"VARIABLE VALUES"::16:20:"/ \"::B$"-- F A S T F I N D E R --":226"D CODE WILL FIND;:22:"*":34,15:222"200 X=20: VTAB 16: X =20 HTAB 1: SPEED= 255 X*50 =1000 210 PRINT "Q$"AND"Q$";: A$(X)=FREE CASH INVERSE : PRINT Y =191 "Q$"VARIABLE VALUES."Q$80):255:246:J12:15:1::"PRO;:868::" X*50 ="X50:K1250XJ::::I920:I:1:868::12:1:B" D CODE'S ADJUSTABLE-SIZE TRACE WINDOW WORKS IN 40 & 80-COLUMNS, AND MAY SIMULTANEOUSLY DISPLAY PROGRAM STATEMENTS AND VARIABLE VALUES":21:1:"-"RING ARRAY A$(X) AS THIS PROGRAM RUNS."::13:10:" X ";:26:"X*50":14:"A$(X)":::X(37):A:21:1:958:"*---------------------------------------":X1:3N"]";:G2:256:A$"RUN":248:J12::X126:A$:22:1:" X ="X" ";:21:"A$(X)="A$:H(36)1:Q:O:A$;:J1P::~B$"-- V A R I A B L E T R A C E R --":226:"D CODE ALSO LETS YOU TRACE A PROGRAM'S VARIABLE VALUES.":A:"-------- ------":B"WATCH WHAT HAPPENS TO THE VALUES OF VARIABLE X , EXPRESSION X*50, AND ST40:A$"%":124::P500::A$"D CODE'S TRACE DOESN'T MESS UP YOUR":124::A$"SCREEN LAYOUTS LIKE APPLESOFT'S TRACE.":124:M:H:34,21h" PRINT : PRINT : NOTRACE"::126"|Q(37)1:O(36)1:22:34,21:M:H:"PRINT "Q$A$Q$";: ";:J1P::M(37)1124:A$"IN ":124:A$"THE":124:A$"WINDOW ":124:A$"BELOW ":124:A$"AS ":124:P75:A$"IT ":124:A$"IS ":124:A$"EXECUTED ":124:A$"HERE ":124:A$"ON":124g:A$"THE ":124:A$"SCREEN...":124:A$"UNDISTURBED BY THE TRACING!":124:P0:A::I1B:I113:24:26I:"=";:15I:"=";::1:"<";:2039,190:246:22:1:868::868:X1:3:"]";:A$"RUN":248:11:1:120):22:1:958:12:1:M22:H1:P123:255fA$"NOTICE ":124:A$"HOW ":124:A$"EACH ":124:A$"STATEMENT ":124:A$"APPEARS ":-":226:"YOU MAY ALSO TRACE YOUR PROGRAM'S STATEMENTS "Q$"LIVE"Q$" DURING EXECUTION. ----":246:3:"]";:A$"TRACE":G1:256:248::A:X(37):21:1e"----------------------------------------";:958:B:24:15:"TRACE WINDOW";:ORY OF OURPROGRAM, AND WE CAN LOCATE THE PROBLEM--ANY NUMBER OF STATEMENTS MAY BE TRACED! --- ------":98:18:25:"<---CRASHED HERE":98:23:1:868:100bA:I19:16:1:"-->";:J199::1:3);:J199:::dB$"-- W I N D O W - T R A C E R -IBLE."::"A TYPICAL RESULT MIGHT BE...":246:255::" OLD LENGTH : 4321":" NEW LENGTH : 3210":" -----------------"h$" BYTES SAVED: 1111":246:15:27:"UNUSED CODE:":28:"LINE 50":28:"LINE 3000":28:"LINE 5050":246:B:15:27::"UNUSED CODE:"::20:Q$"UNUSED CODE"Q$" MEANS THAT THE PROGRAM LINES SHOWN CANNOT POSSIBLY BE EXECUTED."e%B$"-- T H A T ' S A L L F O L K S --":226::" D CODE ";::" APPLESOFT COMPACTOR & DE-BUGGER":"COMPATIBLE WITH: APPLE II+, IIE AND IIC";:I33 :::(21):I17:A$A$"NOTES "::I120:A$;::I123:I:1:40):::7:" NOTES "::144::"THERE ARE NO D CODE MANUAL CHANGES THAT WE CAN THINK OF. THANKS FOR CHECKING."::I1999::255::" QUIT":" STARTUP (D CODE MENU)": " NK,JUJUBES,KING KONG,LADDER,MOO-OOO,NITPICK,OSTRICH,PROWLER,QUAIL,ROOSTER,SAN DIEGO ZOO,TULSA,UNCLE LOUIE,VALENTINE,WAXY BUILD-UP,XEBEC,YOOHOO,ZULU119:23905,6:23906,94:23907,15:23908,119/23909,118:23910,125:246:(16384)128Ĺ230,64:3:I115155:I,145I,151::246/K(16384):FF1:K128F5272016368,0::ARITHMETIC,BELL,COASTER,DING-DONG,ELEPHANT,FROG,GOLF BALL,HELICOPTER,I12,118:19813,86:19814,125:20832,7:20833,7:20834,95-/20835,119:20836,6:20837,55:20838,125:21856,87:21857,119:21858,95:21859,119:21860,86:21861,119:21862,124:22880,55:22881,119:22882,95:22883,119:22884,54:22885,119:22886,125:23904,IN A SEALED-OFF WINDOW":=-B$"-- I N T R O --":226:369.17760,7:17761,7:17762,6:17763,118:17764,6:17765,119:17766,125:18784,119:18785,118:18786,95:18787,119:18788,118:18789,102:18790,125:19808,119:19809,118:19810,95:19811,119:198ING IN 2 SECONDS";:::A:" BREAKPOINTS ";:B:-" PRE-SETS ERROR TRAPS"::A::A:" HISTORY TRACER ";:B::" SHOWS THE MOST-RECENTLY USED STATEMENTS AFTER A PROGRAM STOPS":::A:" WINDOW TRACER ";:B::" NEATLY TRACES STATEMENTS AND VARIABLES 9+255:K1G:"";:J1250::" ";:J1250:::2,A::" COMPACTOR ";:B::" PACKS PROGRAMS TO SAVE SPACE";::A::" SYNTAX CHECKER ";:B::" PROOFREADS PROGRAMS AND FINDS ERRORS BEFORE THEY OCCUR"::A::" FINDER ";:B::" LOCATES ANY STRI823:I:1:40(I16)):::24:39):2039,32:8:::B:e*:24:39):2039,32:8:::B:v*J1999::*G2:256*I1(A$):"";:254:" ";:254:(A$,I,1);:(A$,I,1)" "G1:256*254:I:G1:256+K((1)25)N:J1K::F0:16368,0i)24:4:" ";:I199::4:"RETURN";:I1888::FF1:K(49152):K128F15230)49168,0:K141F14240)K209230):A:24:1::958:23:)A:7:1::40):7:21(B$)2:B$::RāI823:I:1:40)::244@* ":"] ";:A:23:Z(A:L(A$):P((33)LD3(D1))2(D0):S1:EL:D1SL:E1(ISED:Z(C):36,P:PPD:(A$,I,1);::::D0D:)246:255:24:1::A$" TO CONTINUE TO QUIT ":2039,32:24:I3911:I:(A$,I,1);::)::A:23:6:"# *":7:"\POW/";:B.7:23:6:" ":7:" POW ";:A:246:246:A$"]":I1324:I:1:A$;:I1:1:" "::I120:S(C)::A:23:1:A$:" ";(I199::23:1:868::1:A$;:J15:S(C)::A:23:1:"!!":A$;:B.5:23:1:"I:A$(I(I2)2);:J155:::868:A$(0)" *BUG ":A$(1)" *BBBUGG ":I3061:24:I:A$(I(I2)2);:J155:::I1824:I:8:"POW";:I1:8:" "::I120'S(C)::A:23:7:"CRASH":868:I199::23:1:868::8:"POW";:J15:S(C:186:" GPLE AND DOUBLE-TAKE";:I23:186::" PLUS: DOS 3.3 AND PRODOS";z%I26:186::188%:I:"AND";:J1200::I::"AND":I:"---";:1:&" PRICE: $39.95"::" POWERFUL: VERY!":246:A:I131:24: SELECT:";:A$:A$:A$"Q"Ā? FA$"S"ĺ:(4)"RUN STARTUP"E PU*~`G P U*U*x*~? `?@ `? acG| 9pQ*U*U*~ U*Ux | pU*U*U* U x ~?`O*U*U*U*` D|d?~`O@A?~ @'@{$ U@ j?` p| U*U*U*~ <)yxp(@ |#U*Ux p p?(U* Q~ `@*U T*U*U*~? ~ T*@) y`(UT*U*U ?(U |? ~@ @ Ux'U*\pA*P*a*Ux p xP*T px ~T@*U*E"| pQqpqhxx?~`O@A?~ D  P*U*Ux@ @@*)"T~  `?T**U* U*p?D>8x8 (E*U*U*U*@ <<88?``@xAx?~@@ P 'upB?T*U*x `? o)( |?` U*pO*U*U*|? x |P*U*U EHx ~?TT"Q"U(U| 2 ?~@O?@?~`Cx @@T*U*|  P*pP*|  Tp)9` U U*U*UB(U*|? | x U*p?T*npA**xG*(Ux `? ݁(݉(`}(`e`H)hJJ?(0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <((ȱ( Y'( ' f'L&`L' 'L' Y' L& Y'L'8ei` ,$`ee` `( '( (` *( ' (`hh8`8`(l&j"L  <8# ȱ)ɀ  )t& ` (Xp< @t& )mt&t&.t&w& Mt&i  ``rȱȱȱȱ0]cȱeem(ȱ(ȱ((ȱԠŠҬîʎ1DžϠl&8f ZHH)hh8JhJJJJJ j&Hk&8H) 12 (j21 h!hH h %)Ђ12H)M0 h10200I20h2 |&`L($_뿩 8!@8` MNЩUMܩ  L 5   8 0 8 `0 / x X$$%&%0`ŠӠЭ[ V7 c L '0%O '8O JmO * ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ ͍B B(8`;YYZLYLYLY"7"Y"/"ll"*# HQ$WON!-PB}OBiB ,m# m# J Qڨ)̰n]e мȱ ; ̀𩠙< iO P F V >Z SY ɘL` X _ JLMNOPQRSTUVWXYZ[\]^_`abcdnop)f 8'  )ɀ)4,- U JNT)  !N)Gi/ "4 "" " " iL X%!L!ΠΠҠ`C! $ " " &#M8nf $ ) L! " " &J, )7(P0  ( @p !"0 *%"0"" &/) )"" &ЭL!)0I0 (Щ ߍ |@*U*U qap |P*U U*D*U*| xqx 8?~O?@??~ D( @OU*U*~  ~U*)| ?xU*U*U*A"U(| ~?pO*U*U*U*` DDD?p`~@|A|?b `'`%UP b`? p~ U*U*U* DD@?``@xAx?~pp pw(\)}@p*A ~!U*U x @ x*U*U"Q|D>D88 @@*UB?T(U*U*~  ,<ʆ>*=?BC8 é&'112`HB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`bLJCAB@=?0٭)ܝ٭*ܝ٥F٥G٭'ܝ٭(ܝ`) 8ʈ` )0ٝ)i `8`R "ꍜ NمFمG < Μ0 FGL鮑0 ٭٭ٽ8`H8`  ,0 d01 E8`100 v$0ʩGF 밽 谸 谳`12)1`0`Ȏi 0U`)8`θ` )W G JA)H ܝʈh٭ )ȱHθ`Κ8QeHI SBF0Y ٙWٙUFZSʈ {猺`8m0`,0H hi L荸Ƚθhٍ0GF8yאFG  `* ΙQ8`5IF܅G 됾`\܍]^ {8D`F` tlH)HFȍZHG[ $%܍&܍!ܢ8* J8` L ܝJ)I 'ܝF`R8i^F\G]`R5IH3H (  밯ZF[G 밠S%܈P" X)Im'܅F(܅G)܍^*܍Q 4 䭐 $H %HFFHGHG 됨`R8`)` QH_` :R(5IHH__Ѝ_@`8 e ͙_ʈ@}ȱ@oȱ@y{|rZ[_)7_I0ܢܽ \'Q*ܩu 7pqFG (ST L܅I^ mQIH` } }Y0\F]G Q_HZF[G` G8`F@ 0 e LK8`F GI8`FHGH hGhF܌ բFܽܕF芝ܝ 밶FFGG H܅I mIIHHyHȘI Lܝ` @o@ w@Ю׍_)m0JHi 뎑`C8` @ 3N@) d莽 ⭺i`0 v0GF #0 W,0 ).H hȑNWȮّNW8`ٍّNθ0NN,뎞׮Б` L` @>_)I38Ypqם`K8`@Nȱ@O@ IiNȽבN)/ȩ/N`@[ WHJjjjhA <'KI؍'P0ōҍJJJJ ɺi) ɺiLD )?      `l@Hȱ@IױHXATȱH ɯȩ׍̞5H)/@a)_ .0 :A[8@`@~@}J@` ߩ%S @ ~`E hhhߺ0 h ߐ# ߐ ߐ ߐ 0 HϭߍLпllllhh8` QSTV،h@ihAiȱ@JJJJq@)@evȱ@Hȱ@Ah@@cee J) LxL LxJiB LxJ) GxNhHHHHL(  ްƠx@BEOD  ް(`( C)CJJJlBJ,~آ <B*IBGF08Lé'+8H <(h`@ڍL3<>=?<>CAB@?A` 1 L  <>` ڢF]PL8i m L   6< L  BLRAM' hLDL "8`  `ٽJJJJ`H͜hn)NjNjNjN. dH͜ ;٭ *Nۙ۰ڙک `Z8` d# B` . . .8۰*J۩ ٰ`JJJJi LdH8`ͦ ٍ0  ` `ٍyٍiB0H0FG h0`שB5xEDרם__)׍_pFqG 밍 K@ LCɃ/ ٠ В:>LC ɫɰ aG A$0 JJ :ۥvu $ FLC08LD: FLD D F Fȥ Fu Fv F B aGfLyE DLGLdD:` F,J I,J aGեѩ: FLHJAelbc1/Jȱb1:L\A PBLxByB :LA{B|B :LA~BB :LAb:BB :LA ]BBB : A bedcieiijȄ ӥmnijdȩdȑdȥdȥd A PBLԭBB : APQdibeic PQ $) \ۥ$ 8s镅tK @ ? /) Ɉȱ @ ȩC  e ȱ e 8e/ @C@@ өL@@ FBL@L@LC!8 uBvB : ,թ  [Y ֐WbcPiQibȱbȱŁȱł58bb/0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` *L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+>P׽8H  ): e: y8鰕:Jjjj<)yאi8i;i(*=>hPם8`;Zx3QTTSRWVUHEVhEhH)IWHPHHHAHHHLaVEWLӿLL`BLLޢޢޢޢޢޢޢޢޢޢޢޢޢޢޢCOPR. APPLE,1983LM Mh@8nЍLޭ 0J @,,L:,L@   !"#$Ԡ͠ˠĠԠhhhhILhH),dx8 (8`@Ae f!55s+aIJK,-NOPQRSuHUSTON!' J5 s9X(K sXXK تKo`V8`no` < on sI9XX`)HJJJh`OeNeO࿰ s9XАO`@ȭ@` ON YNJKO`HHHHхJJ : ]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8``8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌1֍ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`ԊѾԊԺӠϠŠŠŠԠĠƍͿٯΩϠǠŠΧԠŠԠŠϠŭҠŠҊŮҍԠéΠčŠӬî$ȱb38Єτ >B0 \ >B0 \ \۩ LA`枱`BB :`BB :`LPAbɭć bɭ`LBLBLBLBLCL,CLSCLBLBźҺҠŠҺŠӠԠԠҠǠŠŠӠԍנȠĠȠŠӠŠӠΠŠӠŠӠԠԠƠ͠ŠŠϠҠþξҠĠƠͺŠϠŭҠԍǠϠԠ͠Π١٠׮͠ϠŮӠĺŠǠӠΠӠԠ̠ҠŠĺԍԠéΠčŠӬîĠנӍҠǠŠҠҍξҠǠƠͺҠǠŠҠҍLIJIJLIJIJJJLIJJJIJJIJLuH ɠ H h` LJ)  :L^J``0 JJ :` JJ :LL@LILLmLLLLKLKL^KLLL"ML)NLMLMLLLKL8LL&MLHMLkMLMLMLMLML#NLNivƹƸLdDLyEuv!uvJJJK` XJJ :۬JJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ : ɱ#ɲ/ɳ6ɴ?ɵ\ɶd h :LI`JIJ [L[IJIJCưƯJJ :8gh HJJ :8igjh HJJ :8寪 H K JJJ KK67JJ :LPQPQ'%PQPdQ P Q JPQL$: ȱɲ,J0BH h 40"iuȱL$ G \ۊL\ۢ)(`0 $```) $G ` ,Ն J쥝ɑ 률`L:्uȱveLiG`8` F F` F Fȥ F FⅯㅰ8ЅA;JJ : ^J-Цх<=>?BC ,B XʩXύX X A %  % ɍNH hɛɘɉɈ $ Lc :Lcې)ɮ۰ɺ'Ɲ Lc  : X i % $ɛ$ɘɉ ɈL :Lɍ)ې)ɮ۰ɺH h 'ĝL  LL L)'L L L'L  (L(L $ʩ $$ $L `ީ % Jپھ pHJh` D!hgt}~p `~t}p8n~ni}tpi~~tso8pinii>j?k̈́>~|p|Ii||̈́ l - `>i>L8933LΞAAJL ةޘг uv $ 8LƞaЌ>?@`>?@`B8` K  춼LK ҟ ҟ ( KK`HJJJJ8`HK)` #hhL𚾤3 @LtJ)s@J b  l`a?sa?,E30ɍФ3 E3HD F3 Ʉ%h3 bM E  lLthɍLL3`3,A0s0% Ipn DpnI:L ؅303پھ p H־Ǿh۰8L־Jjjjɾ)Ⱦ8 ѱ OLӜ ĤLLX>(F`־ؾپھ׾` bɄ KDEF vLl v lL bKɍKL?` w  vLl@$݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ]c־Jjjj `O>0O l PODEF޾ p ޾ p($ذ v (0 ( L?ԦʚLeةީa s  lL b,FLg,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ B94 l% bʽ  ՚,S` H EH06172839h` v97L75v^a ?/( va?LLLɍ$?`?a ɍɥAH93827160hH46576879h`,C bL ɍ b w,S0 @ lLޭBYL 8!9 詍` "  à4"/pŠϠŠà͠ӠàԠŬqstuvwxyz|}~JJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IzLLG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"(0`6708" = ***)< &@DEF   %LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ ƠϠ ?Ek?!>Q>>>̀ `` \> ̀ `e>>?́?>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?`|;}=:<~:<=;`||m};>:8o>oȑ>ppȑ>> :op`G DKpnG @p;G=po:SL/id /`H) hJJJJ ɺi` M  ` ת.8 `O`S  AI-L9 ᪰B C VW>m>` _m8injkiljo풼i>?Ek?>Q>> L> \/ e>>?́?ޱ>ȥ1׾ؾ  p p ٷ H rh(`׾ؾ` : ߭׾t8퍼mؾŰ펼t폼 L28` ˌھپLp k V)@W0!XY X6Y7` YX`X:Y;τ<:: <`:8` e eվ'OV)Jj зf Ja l + ѱ:ji Ĥ Ƀ B ,  簰 ` l])Y 񩢍`Ⱦɾ0Ǿ pLLwLLL) `8` ԠŬLLʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~TV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nֵ#ح#׮2}q :IC@@ -!S    !C- !ABELSDFRV@@ !$(19@EüϠž(+@ABCDEFGHIKLMNPSsƬƀ#(ZZV4G_0=( A P FjL\5p-e9ABSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND6D(!쫂8 ( 8о(־Ǿ,G 8`_`W)H־Jjjjh p̭ fLᶢǾ ת..8 ۭ (8mȾȾmɾɾʾiʾ` Lpl8l:/,s`\"׾پӾؾھ pD`־ǾY׾ؾOW)ݩȾɾʾ pD`8`W)CB) 5W) =)W)@! pZ}ȾȾ󰹩 p` ־ǾҾ,G 8`׾ؾ f p vۥs׾tؾE` `޾Lp h־Ҿ,G0^W)TP) ecfdپھ׾ؾӾ p$c d pccddީ 8`ȾɾʾNfne}ȾȾI>Ie f`8` P־ǾҾ,G0C f=W)_`:_`蹀:`V)8`MN; b;`;C b N8` G)̀#:蹀:`V)R ޾,N0MHhHh p' L,N HCNh`M`M N N `9V) ` V) ޾ p`  (8` 8`8`(W)`_V)Ij!؍Í`_ FjЭW)`_ Ͼ pH Lh8`jGMоM  G)p pY)ικ`lP *,N!ǾȾɾʾ pǾ~H h8`8`,C  8` ȾɾM$ mHݓǾ phϾ pH Lh8`Ͼо־ǾҾ_` 볩Ӿ pW) "LEC`C )莼 з l6 7= /& /8Hh /` 6Y׾ؾ+پھ p|پɾʾ`HV)jh츾$-#Ͼ p о־޾Ǿ` 8` 8`ɾ)ɾ̸ ɾɾ0miȾ z#?>    " ĮŮϠ" ŮҠ Ӡ Р Š Ϡ!/ ! "  ԠŠĮǠ ĮǮϠ*   ĠŠ   éΠĠ    ŠӠà  M M M M O`LLLO LLbOҐЪ8`簤8`ׅҥPQ $əɄ˹ʩ \2?2ɦɽ$0˱ pCLoKLqKYU S KLK 2H2 h2{$` ` M* L%LM M mMLK-Ѹ mU줊 mU mU `8`湄`` 9C J8ɝ  :LPJ EK`DɀW I M3 M9 M M M#LL ?  L"O L`LNL M` M MLmM8` SHSHL,J L: M`LFRU %gUgUʆ%XU2ZU]U{gU#%0$ K$YU{%L[% 1I%L>I gU"eU!!!kU$iU{^U{## [LKeU dU8eU!# HgU" [ KLK RU2XU{YUZU{]U e!dU`cU0 DƊ` =:mU ɠ<Ɉ ɕɃ-_U`U KLBC$c0$c0cx : K EL|G$c0LyF HA,\ULH ,JŸ幐QPL_HPwQx`{$`PQP HͯU ͮU\U H`U _U yFLHPQ`aUbU8ͮUU BCLF BCL0G pRuݰVЙvݱVВV޳V޲VЅV KW R: 88 sآxc{_U`U H A 9C_U `ULHȱ wx K ELGh:g6䰰1 YH K$c R > WۦPQ $ C SCPQwx EH,ɓɠU؍UUUSSuvUU`UحUUUUUuv`gU %H K "# HgU [ Bh [`ȥeS S\UaUbUUU`0WjM 9C qRmSSij ElU gݩlU 'F BCL0G U,lU0yz DS,s SLEeUdU 9CSS I E c, yz Wۢ0M:, \Ɗ J \ {$0 4 E%$!{! WL7E 'FLBC {CLgE<=<  < 8劅 =۠<LJ! K `莩U؍gU`bɈ,ɕɋjɊyɼ$ɬ ɮ<ɾ8ɠb`jU`8.cU`gUeU8eUkUiULDgUحeUdU I XeUiLODgU HgUgULDgU HgU [ K gU= I K##ʊ [! E'( eUdU%eU H I XLILF$kU{iU{^U EjUɃ IL DɍjU ILUB``慤 C: C`H Ch8Єτ ,0 ,0Ɗ0 CLC C pCH$ {$hL\NcU`agUhUgUx FFLDbgU H FFgUhUxȘȑ yF0: #P0IW pRVVVVLBGF/\,ULD.ɛɜ ɬGFLLB A L ALzB I BhhLץ THTH`LuPv nF,fUP F,fU I DgUi ISeU8 MIvxuw Kuvwx $ C KC33:186:" GPLE AND DOUBLE-TAKE";:I23:186::" PLUS: DOS 3.3 AND PRODOS";z%I26:186::188%:I:"AND";:J1200::I::"AND":I:"---";:1:&" PRICE: $39.95"::" POWERFUL: VERY!":246:A:I131:2SED CODE:"::20:Q$"UNUSED CODE"Q$" MEANS THAT THE PROGRAM LINES SHOWN CANNOT POSSIBLY BE EXECUTED."e%B$"-- T H A T ' S A L L F O L K S --":226::" D CODE ";::" APPLESOFT COMPACTOR & DE-BUGGER":"COMPATIBLE WITH: APPLE II+, IIE AND IIC";:ISSIBLE."::"A TYPICAL RESULT MIGHT BE...":246:255::" OLD LENGTH : 4321":" NEW LENGTH : 3210":" -----------------"h$" BYTES SAVED: 1111":246:15:27:"UNUSED CODE:":28:"LINE 50":28:"LINE 3000":28:"LINE 5050":246:B:15:27::"UNUS: 6":246::B:"ALL OCCURRENCES OF THE SEARCH WORD ARE LISTED AND HIGHLIGHTED IN INVERSE.":246:B$"-- P R O G R A M P A C K E R --":226~#"D CODE LETS YOU COMPACT ANY APPLESOFT PROGRAM SO IT TAKES UP THE LEAST AMOUNT OF MEMORY AND DISK SPACE PO:F0:16368,0i)24:4:" ";:I199::4:"RETURN";:I1888::FF1:K(49152):K128F15230)49168,0:K141F14240)K209230):A:24:1::958:23:)A:7:1::40):7:21(B$)2:B$::RāI823:I:1:40)::244@*" ":"] ";:A:23:Z(A:L(A$):P((33)LD3(D1))2(D0):S1:EL:D1SL:E1(ISED:Z(C):36,P:PPD:(A$,I,1);::::D0D:)246:255:24:1::A$" TO CONTINUE TO QUIT ":2039,32:24:I3911:I:(A$,I,1);:(C)::A:23:6:"# *":7:"\POW/";:B.7:23:6:" ":7:" POW ";:A:246:246:A$"]":I1324:I:1:A$;:I1:1:" "::I120:S(C)::A:23:1:A$:" ";(I199::23:1:868::1:A$;:J15:S(C)::A:23:1:"!!":A$;:B.5:23:1:4:I:A$(I(I2)2);:J155:::868:A$(0)" *BUG ":A$(1)" *BBBUGG ":I3061:24:I:A$(I(I2)2);:J155:::I1824:I:8:"POW";:I1:8:" "::I120'S(C)::A:23:7:"CRASH":868:I199::23:1:868::8:"POW";:J15:SӠϠǠŠΧԠŠԠŠϠŭҠŠҊŮҍԠéΠčŠӬîWN ARROWS ACTIVATE TRACE FIRST NO ERRORS", AND UP & DOҥ KK S 9C8 DS)Ѹ@#湠`8ɝLSPQ'%PQPdQ P Q JPQ $ HLS X DS DS8 DSP DSQ`TH \h` LLALULVLU~NNNONLiON~N~NL+ \ۢh S $ \f)f C pRV  C \` C pRVV $, \ WۤVVL$ ` LRɆ͆̆ L] SvHv .ՆЄhvE K RЦх Yբ0 K K R K S $ KL< ֩WfU @fU`L0W`  ڦQP ʆ ɼ^: ɭqɴgLަ0 ڦW pRPVQVVV  g R禊PVQV P` N QLQLK…0 pR DS: VƋLީVWLPW* K-PSQS$8SPPSQQ stUU\ULFL,fU S lP Db`3 S`Lޠ: UU,fU ILDL<88?``@xAx?~@@ P 'upB?T*U*x `? o)( |?` U*pO*U*U*|? x S, INC. 3990 OLD TOWN AVE. SAN DIEGO CALIFORNIA 92110 -------------------O5DER,MOO-OOO,NITPICK,OSTRICH,PROWLER,QUAIL,ROOSTER,SAN DIEGO ZOO,TULSA,UNCLE LOUIE,VALENTINE,WAXY BUILD-UP,XEBEC,YOOHOO,ZULUI5------------------- D.CODE.DEMO PROGRAM BY BERT KERSEY D CODE COPYRIGHT (C) 1984 ALAN BIRD PUBLISHED BY BEAGLE BRO|(16384)128Ĺ230,64:3:I115155:I,145I,151::5000d3K(16384):COCO1:K128CO58000316368,0:K141CO5ı3K209ė::38000{4(#ARITHMETIC,BELL,COASTER,DING-DONG,ELEPHANT,FROG,GOLF BALL,HELICOPTER,INK,JUJUBES,KING KONG,LAD0837,55:20838,125:21856,87:21857,1192T21858,95:21859,119:21860,86:21861,119:21862,124:22880,55:22881,119:22882,95:22883,119:22884,54:22885,119:22886,125:23904,119:23905,6:23906,942^23907,15:23908,119:23909,118:23910,125:5000;317762,6:17763,118:17764,6:17765,119:17766,125:18784,119:18785,118:18786,95:18787,119:18788,118:18789,102:18790,125:19808,119'2J19809,118:19810,95:19811,119:19812,118:19813,86:19814,125:20832,7:20833,7:20834,95:20835,119:20836,6:2ISTORY TRACER ";:SP::" SHOWS THE MOST-RECENTLY USED STATEMENTS AFTER A PROGRAM STOPS":0:FF:" WINDOW TRACER ";:SP::" NEATLY TRACES STATEMENTS AND VARIABLES IN A SEALED-OFF WINDOW":0TI$"-- I N T R O --":4200:6901@17760,7:17761,7:SPACE";:l/lFF::" SYNTAX CHECKER ";:SP::" PROOFREADS PROGRAMS AND FINDS ERRORS BEFORE THEY OCCUR":/oFF::" FINDER ";:SP::" LOCATES ANY STRING IN 2 SECONDS";:/r:FF:" BREAKPOINTS ";:SP::" PRE-SETS ERROR TRAPS":[0vFF::FF:" H:6060U.rI1(A$):"";:6050:" ";:6050:(A$,I,1);:(A$,I,1)" "KV1:6060m.u6050:I:KV1:6060.K((1)25)TI:J1K::.255:K1KV:"";:J1250::" ";:J1250::: /bFF::" COMPACTOR ";:SP::" PACKS PROGRAMS TO SAVE -0K2094250.-b:FF:24:1::958:23:|-FF:7:1::40):7:21(TI$)2:TI$::ILāI823:I:1:40)::4570-I823:I:1:40(I16)):::24:39):2039,32:8:::SP:-:24:39):2039,32:8:::SP:-J1999::.pKV25000},m255:24:1::A$" TO CONTINUE TO QUIT ":2039,32:24:I3911:I:(A$,I,1);::CO0:16368,0,24:4:" ";:I199::4:"RETURN";:I1888::COCO1:K(49152):K128CO154250,49168,0,K141CO144550J15:S(BUZ):++FF:23:1:"!!":A$;P+SP.5:23:1:" ":"] ";:FFZ+;23:`+<+nFF:L(A$):P((33)LDIR3(DIR1))2(DIR0):S1:EL:DIR1SL:E1+ISEDIR:Z(BUZ)+36,P:PPDIR:(A$,I,1);+:::DIR0DIR+6,h868::8:"POW";:J15:S(BUZ):H*FF:23:6:"# *":7:"\POW/";t*SP.7:23:6:" ":7:" POW ";:FF*5000:5000:A$"]":I1324:I:1:A$;:I1:1:" "::I120:S(BUZ):+FF:23:1:A$:" ";:I199::23:1:868::1:A$;:|@*U*U qap |P*U U*D*U*| xqx 8?~O?@??~ D( @OU*U*~  ~U*)| ?xU*U*U*A"U(| ~?pO*U*U*U*` DDD?p`~@|A|?b `'`%UP b`? p~ U*U*U* DD@?``@xAx?~pp pw(\)}@p*A ~!U*U x @ x*U*U"Q|D>D88 @@*UB?T(U*U*~  Tp)9` U U*U*UB(U*|? | x U*p?T*npA**xG*(Ux `? |P*U*U EHx ~?TT"Q"U(U| 2 ?~@O?@?~`Cx @@T*U*|  P*pP*|  pU*U*U* U x ~?`O*U*U*U*` D|d?~`O@A?~ @'@{$ U@ j?` p| U*U*U*~ <)yxp(@ |#U*Ux p p?(U* Q~ `@*U T*U*U*~? ~ T*@) y`(UT*U*U ?(U |? ~@ @ Ux'U*\pA*P*a*Ux p xP*T px ~T@*U*E"| pQqpqhxx?~`O@A?~ D  P*U*Ux@ @@*)"T~  `?T**U* U*p?D>8x8 (E*U*U*U*@ < A @L@          3:"3. AND A SYNTAX ERROR O`5000::14:18:"<#>":14:"";:28:""~TI$"-- H I S T O R Y T R A C E R --":4200Q"D CODE INVISIBLY MONITORS PROGRAMS AS THEY RUN AND AUTOMATICALLY KEEPS TRACK OF WHICH STATEMENTS HAVE BEEN EXECUTED."UH-OH! LINES 10 & 45000 HAVE PROBLEMS.":5000L"THREE KINDS OF ERRORS WERE REVEALED:"::3:"1.":3:"2.":3:"3."::14:18:"<#>":14:"";:28:"":V20:3:"1. A GOSUB TO A NON-EXISTENT LINE <#>":3:"2. AN ILLEGAL STRING ASSIGNMENT ":LSO CHECK AN ENTIRE PROGRAM FORERRORS IN A COUPLE OF SECONDS. WATCH...":3:"]";:A$"CHECK":TI4:6000:::" 10 GOSUB 12345";::"<#>"G$::" 45000 A$ = ";::""G$;::"100: INPPUT";::""G$;::" NAME$"-:SP::"UH-OH!";:5000::1:" ERRORS ARE REPORTED IMMEDIATELY, BEFORE YOUR PROGRAM IS RUN. ------"zI18:18:13:"^^^ ^^^";:J199::1:868:J199:::5000:21:1:868::SP:"FIND HIDDEN BUGS THAT ARE READY TO BITE!";4200I"YOU MAY AU WILL IMMEDIATELY BE NOTIFIED."\5000::"SUPPOSE YOU ENTERED A PROGRAM LINE..."::A$"500 GOSUP100: PRNNT"Q$"HOTDOG"Q$:TI2:4:"]";:6000:FFf:" 500 GOSUP";::""G$;::"100:PRNNT";::""G$;::" "Q$"HOTDOG"Q$:SP:5000ZpFF::" *":24:" \STOMP/ "KSP.7:22:24:" ":24:" STOMP ":FFTI$"-- P R O G R A M P R O O F E R --":4200 R"D CODE CONTAINS AN AUTOMATIC APPLESOFT ERROR CHECKER. IF YOU TYPE A PROGRAM LINE (OR ANYTHING) CONTAINING AN ERROR, YO BUG* ":A$(1)" BBBUGG*":I124:23:I:A$(I(I2)2):J155:: I1523:I:26:"STOMP":I1:26:" "::I120:S(BUZ): FF:22:24:" CRASH ":868:I199::22:5:868::24:" STOMP":J15:S(BUZ):FF:22:24:"# 5000:"BUGS":"BUGS":J199: FF:24:1::39)::I199::I1721:I:1:"BUGS":I1:" | ":J1150:::5000:J15:21:1:"BBUGG*";:I150::1:"BUGS " I113:::21:1:868:23:1:"BUG*":J15:S(49200)::5000D FF:A$(0)" G THINGS ABOUTAPPLESOFT PROGRAMMING IS TRYING TO FIND THOSE GOOD-FOR-NOTHING PROGRAM BUGS."::5000 "D CODE'S "Q$"D.BUG"Q$" PROGRAM GIVES YOU THE POWER TO TRACK DOWN (AND STOMP ON) THOSEBUGS... ";:5000:"F A S T !" 5000:15:1::"BUGS";:1::E BROS, INC.":3900 U I20002039:I,32:J11:S(BUZ)::J11:::5000: &24:1::39);:2039,32:23::35,23:J116:I15:S(BUZ)::I133:::: TI$"-- M A I N F E A T U R E S --":4550:7010c "ONE OF THE MOST FRUSTRATIN4):G$(7):FF255:230,64= (4)"BLOAD D.CODE.LOGO,A$4000"} 16368,0:16302,0:16297,0:16304,0:16299,0::8000: A$": :"::3900 A$" D CODE "::3900 ,A$": :"::3900 ^ A$"BY ALAN BIRD - BEAGL,d------------------- D.CODE.DEMO PROGRAM BY BERT KERSEY D CODE COPYRIGHT (C) 1984 ALAN BIRD PUBLISHED BY BEAGLE BROS, INC. 3990 OLD TOWN AVE. SAN DIEGO CALIFORNIA 92110 ------------------- SP176:BUZ49200:DIR1:(21)::::SP:Q$(3               þԊѾԊԺӠϠŠŠŠԠĠƍͿٯΩ¨ٯΩٯΩң„ңңLĺנȠĠȠŠӠŠӠΠŠӠŠӠԠԠƠ͠ŠŠϠҠξҠĠƠͺŠϠŭҠԍǠϠԠ͠Π١٠׮͠ϠŮӠĺŠǠӠΠӠԠ̠ҠŠԍԠéΠčŠӬîĠנӍҠǠŠҠҍξҠǠƠͺҠǠŠҠҍJLIJIJLIJIJJJLIJJJIJJIJLuH ɠ H h` LJ)  :L^J``0 JJ :` JJ :LL@LILLmLLLLKLKL^KLLL"ML)NLMLMLLLKL8LL&MLHMLkMLMLMLMLML#NLNuivƹƸLdDLyEuv!uvJJJK` XJJ :۬JJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ :ۭJ zJJJ : ɱ#ɲ/ɳ6ɴ?ɵ\ɶd h :LI`JIJ [L[IJIBCưƯJJ :8gh HJJ :8igjh HJJ :8寪 H K JJJ KK67JJ :LPQPQ'%PQPdQ P Q JPQL$: ȱɲ,J0BH h 40"i$ȱL$ G \ۊL\ۢ)(`0 $```) $G ` ,Ն J쥝ɑ 률`L:्uȱveLiG`8` F F` F Fȥ F FⅯㅰ8ЅA;JJ : ^J-Цх<=>?BC ,ɭ:ɥQLE$ , F "H F, F:LD FLH,J FLD FLHЫ F: F F"LF  }8` F F Fu Fv` F湠`: ` \ȱH \ Gh0$JJ :۠ \ GJAJJ : LC ɫɰ aG A$0 JJ :ۥvu $ FLC08LD: FLD D F Fȥ Fu Fv F B aGfLyE DLGLdD:` F,J I,J aGեѩ: FLHJ F CLBLC B,ȥьȥ CLCLC "GA=J[JJ FL Cei`LD B" F$ aGJ B FɴqɥmɫɱɀɿɦGɭ^ɬ  $0Ш F:eŊ勐UJJ :LuH |F |F%$ (   BŁȥьȥь` CLOB8 Bȥȥȑȑȑ``Յ`,JP X,J67KK67JJ :۩" B#ȱ "GJJJ : F F湥Іѥ᭖JJJ FLB F?ɫiɰeɬ ɲɃ SLRA FLRA LzA" F LzA",J } Bȱ둌ꑌLzA ڥƹƸPQuv aG A, LALOAuȥv@^8s^tN @ ? /) ɾȱ @_ ȩN  e ȱ e 8e/ Ţ@^N@@ өL@@ů@尰-@ :LuHĠҠà͠L@L^N[N\N]NL JI8gh JJ :LuH     ŠȠŠȠҠŠōԠéΠčŠӬîҡŠŠϠӠŠϠŭҠōؠŠԠˠɯϠŠӠŠӠGLNGLlGLGLGLGLHL|GLQHLGLGL_HLwHLHLHLHLMLNŠŠȠŠĺӺӍϠҠſٯΩӠŠԠŠŠӠȠԠŠӿٯΩ٠٠ :LQE LQE(G)G $'%d  JLJ C, C'4G4GMN1߬3G MNLF C CMNGG :LQE CGG :LQE xCްLHLHLHLIL%KLxML%JLxLL%ILxKLRKLMLHLGLHLhGLdGL\GL`GL?E` GG :۬GG :ۮ9G:G FGG :ۦ F G G :ۮ;GG F0Υ DΥ0Υ DάGG : EL@FF :L )ɠ H h  :LE`HGG :hGG*G G"G#G%G&Gv W ,LDFF :۩LC ,褐` D,L1D DS DLE D800L";:J199::1:3);:J199:::TI$"-- W I N D O W - T R A C E R --":4200r"YOU MAY ALSO TRACE YOUR PROGRAM'S STATEMENTS "Q$"LIVE"Q$" DURING EXECUTION. ----": 110 VTAB Y: HTAB XX":::::5000::20:"A-HA!";::K(37):1460:K1:1:SP:"A-HA! WE NOW HAVE A BRIEF HISTORY OF OURPROGRAM, AND WE CAN LOCATE THE PROBLEM--ANY NUMBER OF STATEMENTS MAY BE TRACED! --- ------""1460:18:25:"<---CRAS"WE CAN LOOK AT THE LAST 10 STATEMENTS THAT WERE EXECUTED BY TYPING..."::4:"]";:A$"DUMP10":TI4:6000:'F34,7:35,23:222:" 90 TEXT : HOME : NORMAL : GOSUB 5000 5000 XX = 887: PRINT: RETURN 100 PRINT "Q$"DOGFOOD"Q$" ::"FOR EXAMPLE, SUPPOSE YOU HAVE A PROGRAM THAT CRASHES WITH AN ERROR...":5000:FF:G$"?ILLEGAL QUANTITY ERROR IN 110 ]";:KV4:6060:1:"]"::255:"(DON'T PANIC--WE'RE JUST PRETENDING.)":17:2:KV6:606017:1:120):18nSP:G ZC CLbBFF :ۦ F;GMMFFMM  <=GvMM XFF :۩RKMFFpKqKFFrKsKFFtKuKFFMMFF   :" BYTES SAVED: 1111":5000:15:27:"UNUSED CODE:":28:"LINE 50":28:"LINE 3000":28:"LINE 5050"&h 5000:SP:15:27::"UNUSED CODE:"::20:Q$"UNUSED CODE"Q$" MEANS THAT THE PROGRAM LINES SHOWN CANNOT POSSIBLY BE EXECUTED."#'| TI$"-- T H A R --":4200%T "D CODE LETS YOU COMPACT ANY APPLESOFT PROGRAM SO IT TAKES UP THE LEAST AMOUNT OF MEMORY AND DISK SPACE POSSIBLE."::"A TYPICAL RESULT MIGHT BE...":5000:255g&^ :" OLD LENGTH : 4321":" NEW LENGTH : 3210":" -----------------"" 5020 PRINT "Q$:2872:X$"LOS S":2872:X$"ED ":2872:"L."Q$K$. 2875_$8 X$;::A$;::$; :" OCCURRENCES: 6":5000::SP:"ALL OCCURRENCES OF THE SEARCH WORD ARE LISTED AND HIGHLIGHTED IN INVERSE.":5000 %J TI$"-- P R O G R A M P A C K E ND & LIST? (THOUGHT YOU'D NEVER ASK!)---- ----":5000:#" 3:"]";:A$"FINDL":6002::FF:" SEARCH FOR:";:A$"CAR":6000:::222A$, X$" 80 A$ = "Q$:2872:"ROT"Q$": GOSUB 5000":X$" 300 ":2872:X$" = 500: PRINT "Q$"INDY "Q$";":2872::X$ 590 2000 6010 5480 5490 12000 12150"\"e :" OCCURRENCES: 10":5000::SP"j "THIS SHOWS US ALL OF THE PROGRAM LINES THAT CONTAIN THE SEARCH-WORD "Q$"GOSUB 50"Q$".";:5000:"SEARCH MOST PROGRAMS IN UNDER 2 SECONDS!"" 4200:# "FI"/ \"5!:TI$"-- F A S T F I N D E R --":4200!. "D CODE WILL FIND ANY WORD OR CHARACTER IN AN APPLESOFT PROGRAM...F-A-S-T !"5"` :3:"]";:A$"FIND":6000::255:" SEARCH FOR:";:A$"GOSUB50":6000::5000::210:" 10 50 65 "Q$"VARIABLE VALUES."Q$80):255 5000:J12:15:1::"PROGRAM STATEMENTS"::868:I1100J::15:" "::"PROGRAM STATEMENTS":I1100J::!15:26::"VARIABLE VALUES":15:26:868::26:"VARIABLE VALUES"::16:20:LAY PROGRAM STATEMENTS AND VARIABLE VALUES"R21:1:"-";:22:"*":34,15& 222:"200 X=20: VTAB 16: X =20 HTAB 1: SPEED= 255 X*50 =1000 210 PRINT "Q$"AND"Q$";: A$(X)=FREE CASH INVERSE : PRINT Y =191 2::X126:A$:22:1:" X ="X" ";:21:"A$(X)="A$;:868::" X*50 ="X50:K1250XJ:::~I920:I:1:868:112:1:SP:" D CODE'S ADJUSTABLE-SIZE TRACE WINDOW WORKS IN 40 & 80-COLUMNS, AND MAY SIMULTANEOUSLY DISPF VARIABLE X , EXPRESSION X*50, AND STRING ARRAY A$(X) AS THIS PROGRAM RUNS."::13:10:" X ";:26:"X*50":14:"A$(X)":4:X(37):FF:21:1:958:"*---------------------------------------":X1:3:"]";:KV2:6060:A$"RUN":6000dJ1INT "Q$A$Q$";: ";:J1P::V2(37)1:H2(36)1:V1:H1:A$;:J1P::|DTI$"-- V A R I A B L E T R A C E R --":4200"D CODE ALSO LETS YOU TRACE A PROGRAM'S VARIABLE VALUES.":FF:"-------- ------":SP"WATCH WHAT HAPPENS TO THE VALUES O":1855:P0:FF::I140:A$"%":1855::P500::A$"D CODE'S TRACE DOESN'T MESS UP YOUR":1855::A$"SCREEN LAYOUTS LIKE APPLESOFT'S TRACE.":1855:V2:H2:34,21:" PRINT : PRINT : NOTRACE"<:1860H?V1(37)1:H1(36)1:22:34,21:V2:H2:"PREARS ":1855:A$"IN ":1855:A$"THE":1855:A$"WINDOW ":1855:A$"BELOW ":1855:A$"AS ":1855P75:A$"IT ":1855:A$"IS ":1855:A$"EXECUTED ":1855:A$"HERE ":1855:A$"ON":1855::A$"THE ":1855:A$"SCREEN...":1855:A$"UNDISTURBED BY THE TRACING!FORI=1TO20:HTAB1+I:PRINT" ";:HTAB40-I:PRINT" ";:NEXTM22:1:868::868|X1:3:"]";:A$"RUN":6000:11:1:120)22:1:958:12:1:V222:H21^P123:255:A$"NOTICE ":1855:A$"HOW ":1855:A$"EACH ":1855:A$"STATEMENT ":1855:A$"APPP1)25)TI:J1K::M.255:K1KV:"";:J1250::" ";:J1250:::.bFF::" COMPACTOR ";:SP::" PACKS PROGRAMS TO SAVE SPACE";:.lFF::" SYNTAX CHECKER ";:SP::" PROOFREADS PROGRAMS AND FINDS ERRORS BEFORE THEY OCCUR":8/oFF::4570H-I823:I:1:40(I16)):::24:39):2039,32:8:::SP:n-:24:39):2039,32:8:::SP:-J1999::-pKV2:6060-rI1(A$):"";:6050:" ";:6050:(A$,I,1);:(A$,I,1)" "KV1:6060-u6050:I:KV1:6060.K((368,0c,24:4:" ";:I199::4:"RETURN";:I1888::COCO1:K(49152):K128CO154250p,49168,0,K141CO144550,0K2094250,b:FF:24:1::958:23:-FF:7:1::40):7:21(TI$)2:TI$::ILāI823:I:1:40)::)LDIR3(DIR1))2(DIR0):S1:EL:DIR1SL:E1L+ISEDIR:Z(BUZ)j+36,P:PPDIR:(A$,I,1);~+:::DIR0DIR+6+h5000,m255:24:1::A$" TO CONTINUE TO QUIT ":2039,32:24:I3911:I:(A$,I,1);::CO0:165000:5000:A$"]":I1324:I:1:A$;:I1:1:" "::I120:S(BUZ):*FF:23:1:A$:" ";:I199::23:1:868::1:A$;:J15:S(BUZ):*FF:23:1:"!!":A$;*SP.5:23:1:" ":"] ";:FF*;23:*<4+nFF:L(A$):P((33I2)2);:J155){:W)~I1824:I:8:"POW";:I1:8:" "::I120:S(BUZ):)FF:23:7:"CRASH":868:I199::23:1:868::8:"POW";:J15:S(BUZ):)FF:23:6:"# *":7:"\POW/";)SP.7:23:6:" ":7:" POW ";:FFK*3::2955A( :I:"AND";:J1200::I::"AND":I:"---";:1:b( " PRICE: $39.95":( " POWERFUL: VERY!")y5000:FF:I131:24:I:A$(I(I2)2);:J155:::868:A$(0)" *BUG ":A$(1)" *BBBUGG ":I3061:24:I:A$(I(T ' S A L L F O L K S --":4200' :" D CODE ";::" APPLESOFT COMPACTOR & DE-BUGGER":"COMPATIBLE WITH: APPLE II+, IIE AND IIC";:I33:2953 ( " GPLE AND DOUBLE-TAKE";:I23:2953::" PLUS: DOS 3.3 AND PRODOS";:I26:295 $ȱb38Єτ >B0 \ >B0 \ \۩ LA`枱`BB :`BB :`LPAbɭć bɭ`LBLBLBLBLCL,CLSCLBLBźҺҠŠҺŠӠԠԠҠǠŠŠb/ȱbc1/Jȱb1:L\A PBLxByB :LA{B|B :LA~BB :LAb:BB :LA ]BBB : A bedcieiijȄ ӥmnijdȩdȑdȥdȥd A PBLԭBB : APQdibeic PQ $) \ۥ$@8s镅tC @ ? /) Ɉȱ @ ȩC  e ȱ e 8e/ @C@@ өL@@ FBL@L@LC!8 uBvB : ,թ  [Y ֐WbcPiQibȱbȱŁȱł58b   P ΍ԍčī̫̍Ǎǫ͍ͫōΫ ӍرزƍűŲҠōŮűĠ ōؠčҍؠҫī čؠīӍؠӫҠղ΍ԫҫԫҫԍԠРԍĠРčҩٍٍҩٍàԫҩٍԍҠ ȍÍàȍҍàōàҫӠō΍ԍ ōϠÍԠ ōؠԍҍؠҫҩٍРԍٍҩٍàԍԠԠӬ Χ ԍ٠ īīРҩٍٍīàҩٍԠԠӬ Χ ԍ٠ҩٍÍàԍԠ ԍҍԍҫō٠ҩٍѠԠ ǍҠӲȍРŠԠ ΍ ſ٠ ԍĠÍ ōà čōϠӍàī Ӎԍūàīōàčԍūàč΍ԫULU4------------------- D.CODE.DEMO PROGRAM BY BERT KERSEY D CODE COPYRIGHT (C) 1984 ALAN BIRD PUBLISHED BY BEAGLE BROS, INC. 3990 OLD TOWN AVE. SAN DIEGO CALIFORNIA 92110 -------------------41CO5ı3K209ė::$380004(#ARITHMETIC,BELL,COASTER,DING-DONG,ELEPHANT,FROG,GOLF BALL,HELICOPTER,INK,JUJUBES,KING KONG,LADDER,MOO-OOO,NITPICK,OSTRICH,PROWLER,QUAIL,ROOSTER,SAN DIEGO ZOO,TULSA,UNCLE LOUIE,VALENTINE,WAXY BUILD-UP,XEBEC,YOOHOO,Z2882,95:22883,119:22884,54:22885,119:22886,125:23904,119:23905,6:23906,942^23907,15:23908,119:23909,118:23910,125:50002|(16384)128Ĺ230,64:3:I115155:I,145I,151::50002K(16384):COCO1:K128CO58000 316368,0:K1490,125:19808,1191J19809,118:19810,95:19811,119:19812,118:19813,86:19814,125:20832,7:20833,7:20834,95:20835,119:20836,6:20837,55:20838,125:21856,87:21857,119P2T21858,95:21859,119:21860,86:21861,119:21862,124:22880,55:22881,119:2;:SP::" NEATLY TRACES STATEMENTS AND VARIABLES IN A SEALED-OFF WINDOW":q0TI$"-- I N T R O --":4200:6901@17760,7:17761,7:17762,6:17763,118:17764,6:17765,119:17766,125:18784,119:18785,118:18786,95:18787,119:18788,118:18789,102:187" FINDER ";:SP::" LOCATES ANY STRING IN 2 SECONDS";:u/r:FF:" BREAKPOINTS ";:SP::" PRE-SETS ERROR TRAPS":/vFF::FF:" HISTORY TRACER ";:SP::" SHOWS THE MOST-RECENTLY USED STATEMENTS AFTER A PROGRAM STOPS":L0:FF:" WINDOW TRACER "F :::(21):I17:A$A$"NOTES "::I120:A$;::I123:I:1:40):::7:" NOTES "::144::"THERE ARE NO D CODE MANUAL CHANGES THAT WE CAN THINK OF. THANKS FOR CHECKING."::I1999::255::" QUIT":" STARTUP (D CODE MENU)": "   PРűŲŮǍؠŲŲҠύҮǍРȍŲŮčؠŲŲҠύҠԲҮčРűԲ̲ŠԲ̍ԲҠōŠŲѠűӍŲƍ̲ҠұŠŲƍ̱ōōѠԍŮ͍ؠŲŲҠύԠҮ͍ȠҠԱҠԲ ̧ űԲű ű РŲàōŠōűРŲŠŠӍРűӠѠύРŲύűҠҲѠŲōҠұРѠԍ˱˱ ˱ ŠԱ˲˲Ӭ ˲ ŠԲԠðӬ ԍРԍԲРŲԱ˲˲ ˲ ŠԲРűӬ αàҫϠӍōҠұ ӍҠұ ɍҠҲҠҲ΍ҠԱ̍ҠԲ̍ ΍ű̱̲ð̭ ĿР A$::020 $ A$::200 = A$;::::" ";:36,(33)1:" ";:0 4I1(33):" ";:8 R:j A49200:I15:J120:B(A)::J115:::} 36,9:TĹ36,T 36,T 120:B(A)::J115::: 36,9:TĹ36,T  20:1000:A$" LOADING ... ":(33)40Ğ:2020 "(8);:A$:A$(31)ĺA$+ A$"6"A$"0"> A$"Q"A$"6"{ (A$"0"A$"7")Ģ12(A$):1000:"--> ";::A$((A$)): A$"6"Ģ23: R$"RUN ":A$"4"R$"BRUN " 22::D$R$A$((A$)) 900:170 11::I1(33):" ";: *I1322:J D$(4):I16:A$(I)::COMPACT,COMPARE,D.BUG,D.BUG.DEMO,NOTES,QUIT](33)80T29e:dD$"BLOAD TITLE":212i800n13:I16:1000:"("I") "A$(I);:I5ĺ" (CHANGES TO MANUAL)";x: 18:1000:"(Q)"::1000:" SELECT:     P ԍؠ٠ō΍ԩ٠ ΍٠΍ԩٍٍԩ٠ ٠̍ԩ٠ ҍ ҍ͍٠ŠƍРҍƠ٠ЩٍѠƍ٠ŠưƠЩٍ٠ōԩٍٍ ԩٍ٠ōԍԩ٠̫̫ԍ̫ԫÍ͍Р̍ōͫЫ٠٠ЍưЩٍٍЩٍЫЍŠƠ ōЫ ѠҍРŠҍ٠ōԩٍР΍Ҡ؍ά؍РѠҍӍ΍ ǍϠӍҠҍàαРҠΧ ҍαҠҍРӧѠԍРħѠōҠ ҍРҍԠҠҍÍàɠҍѠҍРŠҍ٠ԍԩٍРŠҠҍÍàɠҍō΍ѠӍıά؍؍ά؍РѠРŠıӍIJά؍؍ؠԠIJӠӍҠҍРѠؠЍРӍؠЍҠ̠ ؠ ؍٠Ѡ̍РŠı̠ؠ ōıٍѠō؍؍ٍŠıŠؠ ȍӍ";:36,(33)1:" ";::I1(33):" ";:::_ A49200:I15:J120:B(A)::J115:::r 36,9:TĹ36,Tx (31)ĺA$ A$"6"A$"0". A$"Q"A$"6"K A$"1"A$"6"İ900:170 (A$"0"A$"7")Ģ12(A$):1000:"--> ";::A$((A$)): A$"6"Ģ23: R$"RUN ":A$"4"R$"BRUN " 22::D$R$A$((A$)):- 11::I1(33):" ";::I1322:" yY D$(4):I16:A$(I)::COMPACT,COMPARE,D.BUG,D.BUG.DEMO,NOTES,QUIT:(33)80T29::D$"BLOAD TITLE":212:800:13:I16:1000:"("I") "A$(I);:I5ĺ" (CHANGES TO MANUAL)";x: 18:1000:"(Q)"::1000:" SELECT: "(8);:A$:A$ ŠӠîĠΠŬŠàΠϬ((((PPPPLtdd":14:"";:28,""::20:3:"1. A GOSUB TO A NON-EXISTENT LINE <#>":3:"2. AN ILLEGAL STRING ASSIGNMENT ":3:"3. AND A SYNTAX ERROR ":246::14:18:"<#>":14:"";:28:"":B$"-- H I S T O ";:A$"CHECK":N4:248:::" 10 GOSUB 12345";::"<#>"G$::+" 45000 A$ = ";::""G$;::"100: INPPUT";::""G$;::" NAME$"::B::"UH-OH!";:246::1:"UH-OH! LINES 10 & 45000 HAVE PROBLEMS.":246:"THREE KINDS OF ERRORS WERE REVEALED:"::. ------":I18:18:13:"^^^ ^^^";:J199=*:1:868:J199:::246:21:1:868::B:"FIND HIDDEN BUGS THAT ARE READY TO BITE!";:226:"YOU MAY ALSO CHECK AN ENTIRE PROGRAM FORERRORS IN A COUPLE OF SECONDS. WATCH..."::3:"]ENTERED A PROGRAM LINE..."::A$"500 GOSUP100: PRNNT"Q$"HOTDOG"Q$@)N2:4:"]";:248:A::" 500 GOSUP";::""G$;::"100:PRNNT";::""G$;::" "Q$"HOTDOG"Q$:B:246:A::" ERRORS ARE REPORTED IMMEDIATELY, BEFORE YOUR PROGRAM IS RUN ":24:" STOMP ":A:B$"-- P R O G R A M P R O O F E R --":226D("D CODE CONTAINS AN AUTOMATIC APPLESOFT ERROR CHECKER. IF YOU TYPE A PROGRAM LINE (OR ANYTHING) CONTAINING AN ERROR, YOU WILL IMMEDIATELY BE NOTIFIED.":246::"SUPPOSE YOU 124:23:I:A$(I(I2)2):J155:::I1523:I:26:"STOMP":I1:26:" "::I120:S(C)::A:22:24:" CRASH ":868:I199::22:5:868::24:" STOMP":J15:S(C)::A:22:24I '"# *":24:" \STOMP/ ":B.7:22:24:" UGS":J199::A:24:1::39)::I199::I1721:I:1:"BUGS":I1:" | ":J1150:::246:J15:21:1:"BBUGG*";:I150::1:"BUGS ":I113:::21:1:868:23:1:"BUG*":J15:S(49200): &246:A:A$(0)" BUG* ":A$(1)" BBBUGG*":I ABOUTAPPLESOFT PROGRAMMING IS TRYING TO FIND THOSE GOOD-FOR-NOTHING PROGRAM BUGS."::246:"D CODE'S "Q$"D.BUG"Q$" PROGRAM GIVES YOU THE POWER TO TRACK DOWN (AND STOMP ON) THOSEBUGS... ";:246:"F A S T !":246 %15:1::"BUGS";:1::246:"BUGS":"BALAN BIRD - BEAGLE BROS, INC.":214::I20002039:I,32:J11:S(C)::J11:::246::24:1::39);:2039,32:23::35,23:J116:I15:S(C)::I133:::::B$"-- M A I N F E A T U R E S --":240:258 $"ONE OF THE MOST FRUSTRATING THINGS( B176:C49200:D1:(21)::::B:Q$(34):G$(7):A255:230,64:(4)"BLOAD D.CODE.LOGO,A$4000":16368,0:16302,0:16297,0:16304,0:16299,0::272::A$": :"::214:A$" D CODE "::214:A$": :"::214: A$"BY         ! ! ! ! ! !!!!!!!!!       P EARCH FOR:";:A$"CAR":248:::222:X$" 80 A$ = "Q$:168:"ROT"Q$": GOSUB 5000":X$" 300 ":168:X$" = 500: PRINT "Q$"INDY "Q$";":168::X$" 5020 PRINT "Q$:168:X$"LOS S":168:X$"ED ":168:"L."Q$:170!X$;::A$;::":" OCCURRENCE246::B:"THIS SHOWS US ALL OF THE PROGRAM LINES THAT CONTAIN THE SEARCH-WORD "Q$"GOSUB 50"Q$".";:246:"SEARCH MOST PROGRAMS IN UNDER 2 SECONDS!":226:"FIND & LIST? (THOUGHT YOU'D NEVER ASK!)---- ----":246::3:"]";!A$"FINDL":250::A:" SND ANY WORD OR CHARACTER IN AN APPLESOFT PROGRAM...F-A-S-T !"::3:"]";:A$"FIND":248::255:" SEARCH FOR:";:A$"GOSUB50":248::246::210:" 10 50 65 590 2000 6010 5480 5490 12000 12150": " OCCURRENCES: 10":ROGRAM STATEMENTS":868:I1100J::15:" "::"PROGRAM STATEMENTS":I1100J:::15:26::"VARIABLE VALUES":15:26:868::26:"VARIABLE VALUES"::16:20:"/ \"::B$"-- F A S T F I N D E R --":226"D CODE WILL FI-";:22:"*":34,15:222"200 X=20: VTAB 16: X =20 HTAB 1: SPEED= 255 X*50 =1000 210 PRINT "Q$"AND"Q$";: A$(X)=FREE CASH INVERSE : PRINT Y =191 "Q$"VARIABLE VALUES."Q$80):255:246:J12:15:1::"PA$;:868::" X*50 ="X50:K1250XJ::::I920:I:1:868::12:1:B" D CODE'S ADJUSTABLE-SIZE TRACE WINDOW WORKS IN 40 & 80-COLUMNS, AND MAY SIMULTANEOUSLY DISPLAY PROGRAM STATEMENTS AND VARIABLE VALUES":21:1:"STRING ARRAY A$(X) AS THIS PROGRAM RUNS."::13:10:" X ";:26:"X*50":14:"A$(X)":::X(37):A:21:1:958:"*---------------------------------------":X1:3N"]";:G2:256:A$"RUN":248:J12::X126:A$:22:1:" X ="X" ";:21:"A$(X)="1:H(36)1:Q:O:A$;:J1P::~B$"-- V A R I A B L E T R A C E R --":226:"D CODE ALSO LETS YOU TRACE A PROGRAM'S VARIABLE VALUES.":A:"-------- ------":B"WATCH WHAT HAPPENS TO THE VALUES OF VARIABLE X , EXPRESSION X*50, AND 140:A$"%":124::P500::A$"D CODE'S TRACE DOESN'T MESS UP YOUR":124::A$"SCREEN LAYOUTS LIKE APPLESOFT'S TRACE.":124:M:H:34,21h" PRINT : PRINT : NOTRACE"::126"|Q(37)1:O(36)1:22:34,21:M:H:"PRINT "Q$A$Q$";: ";:J1P::M(37)":124:A$"IN ":124:A$"THE":124:A$"WINDOW ":124:A$"BELOW ":124:A$"AS ":124:P75:A$"IT ":124:A$"IS ":124:A$"EXECUTED ":124:A$"HERE ":124:A$"ON":124g:A$"THE ":124:A$"SCREEN...":124:A$"UNDISTURBED BY THE TRACING!":124:P0:A::I;:B:I113:24:26I:"=";:15I:"=";::1:"<";:2039,190:246:22:1:868::868:X1:3:"]";:A$"RUN":248:11:1:120):22:1:958:12:1:M22:H1:P123:255fA$"NOTICE ":124:A$"HOW ":124:A$"EACH ":124:A$"STATEMENT ":124:A$"APPEARS --":226:"YOU MAY ALSO TRACE YOUR PROGRAM'S STATEMENTS "Q$"LIVE"Q$" DURING EXECUTION. ----":246:3:"]";:A$"TRACE":G1:256:248::A:X(37):21:1e"----------------------------------------";:958:B:24:15:"TRACE WINDOW"STORY OF OURPROGRAM, AND WE CAN LOCATE THE PROBLEM--ANY NUMBER OF STATEMENTS MAY BE TRACED! --- ------":98:18:25:"<---CRASHED HERE":98:23:1:868:100bA:I19:16:1:"-->";:J199::1:3);:J199:::dB$"-- W I N D O W - T R A C E R:35,23:222:" 90 TEXT : HOME : NORMAL : GOSUB 5000 5000 XX = 887: PRINT: RETURN 100 PRINT "Q$"DOGFOOD"Q$" 110 VTAB Y: HTAB XX"::::::246::20:"A-HA!";::K(37):98:K1:1:B0"A-HA! WE NOW HAVE A BRIEF HIP!U*~`G P U*U*x*~? `?@ `? acG| 9pQ*U*U*~ U*Ux | pQ\{.( e~ @?`E U*U*` ?``|@xAx? ~?*U*~?` p(U*U U*U*E  S*U*U Q ~%|8|?~N@?~ ~'eP X#*U*Ur |*U*U*U*x ?``@xAx?~ P*QJ.ep@P*U*x x ~o)9*P`(E*`*U*U*|?  U `P U*U*q*~? p E @~ acGpI8pU*U*UU*U|U*Ux ` pUn) e `?@U*U*U*`? >D88?``|@xAx?r ~? U*(U* |` x(U*U"U*@"U*U*| pyp a<?~L@?~pc y ~G*U*U Q |P$DD @TxU*U*U*  |'%(U*#A*U*Ux |~ U*U*U*p ?``|@xAx?p T*EH`?pp@ ~Q*A*x | |o)9*@`*E @?*U*U*|? p Tb@@ U*U*A (~ x U*~~ c@A?8pU*U*U*U*UxU*Ux pp `U l! ex@? `? T"U*Q*@? D$DD?``@xAx? ~*Q"(yp x@*U("*U*U*u} p @?~N@?~ DH |O*U*U"Qx0$DDDD @(UbU*U*U*  x*U* A*U(U| ~|*U*E*U*p >|Dx||?``|@xAx?p T*`P wp*@*|C**Ux  xo)}( |p*A (U*U | | @@@U U*? ( | U*pHx F| 9p U*U*U*E` U*| x " " " " """""""""     P"