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 XFFEF : EtFH B E CHH B8eLD E CH H( ! ҨCOMPARE.TESTl\ @a0COMPARE.PROq@FP.PRO{!p_ -LINE.SPLITTERf!@NOTES?F!'STARTUP y!TITLEp" !i!&PRODOSK: ! 2,BASIC.SYSTEMr $'COMPACT) ^}; !@}; 'COMPARE !@%D.BUG 5!@5*D.BUG.DEMO(!+D.CODE.LOGO!@D.CODE' *************** ĠŠ * ٠ΠĠ* é* BEAGLEBROS**************** >dLԡ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(8R0LDLAL2AEFEFLEIFHF : {D g8h gB +B Ƀ LDLBL@BL@BLB B |B; LA |B) OFNF :ۦ BEFF ^B "BL]ARFQF :ۦ BEF %&' !"# ` ȱ 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$(3NEE"PEEWEE R EE :LVD LVDFF $'%d  JLJ B BHIvFuF :LVD ByFxF :LVD |BްLHL HLHL1HL.HLHLHL3HLsHLHLHLHLHLHEFEF̍FLFEFFLF aF`F :۬dFcF :ۮFF BEgFfF :ۦ BEjFiF :ۮFF BEmFlF :ۮFF BE EFHtpFoF : {DL@LFKF :L )ɠ H h  :L{D`HsFrF :h{F|Fz~FFnFFbFFV^@EEFEE:EEE.^F]F :۩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 ";YN$:(YN$,1)"Y"ĺ:"TURN ON PRINTER, PRESS KEY ";YN$:10000 216,0:9:O$"NW.TIPS.SYS":6000::"ADD NEW PROGRAMMING TIPS"::*"I$" ":H$" "K -A$(D)H$", "I$:A%(D)D:D$:22:"READING USER #";D: hD$"CLOSE":DX1:216,0::60003:(4)"OPEN NW.USERLIST.SYS":(4)"DELETENW.USERLIST.SYS":(4)"OPENNW.USERLIST.SYS":(4)"WRITE NW.USERLIST.SYS":I1D:(A$(I))01900 0((Z$,1)"V"3900' \(Z$,1)"E"47809 p(37)1:820y 216,0::" CREATE NEW USERLIST? [Y/N]";YN$:(YN$,1)"N"Ĭ 1640 D$"OPEN NW.USERS.SYS,L64":D1X1:D$"READ NW.USERS.SYS,R"D:744:I$(E$,1):744:H$(E$,1):744:744:744:(E$,1)""PRESS RETURN KEY: ";C$: O$"NW.USERS.SYS":6000:D$"UNLOCK NW.USERS.SYS,S"S",D"D",V"V:D$"OPEN NW.USERS.SYS,L64":D$"READ NW.USERS.SYS,R0":X:O:N:D$"CLOSE"::D1::"ENTER DATE:"; "-";DA$:(DA$)6800 4:"(V)ERIFY OR (E)DIT USERS? ";Z$:TALOG DISK"= 23:"COMMAND-";:" ";C$:(C$)1(C$)5420o (C$)520,1960,2380,2840,2860,2900,3600,3660 ::"JUST A SECOND......":D$(4):600 D680 X:"FILE: NW.USERS.SYS -- WON'T VERIFY.":"SELECT CONFIGURATION OPTION TO CORRECT"::n'>37887:5600:S6:D1:V0:60002:D$(4):A$(600),A%(600) 216,0:54915:::"SYRINX UTILITY PROGRAM"::5:6);"<1> EDIT/SORT/VERIFY USERS"::6);"<2> EDITOR/NEW FILE UTILITY"::6);"<3> LOAD SYRINX"::6);"<4> CONFIGURE SYRINX"::6);"<5> CA              ,INK,JUJUBES,KING KONG,LADDER,MOO-OOO,NITPICK,OSTRICH,PROWLER,QUAIL,ROOSTER,SAN DIEGO ZOO,TULSA,UNCLE LOUIE,VALENTINE,WAXY BUILD-UP,XEBEC,YOOHOO,ZULU4,119: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,HELICOPTER9812,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:2390S 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:1TRING 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 VARIABLE9+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 SI823: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::* U*|`C P" U*T*|*|? @@ x cS|+ 9p UD*U x ~ xT \{* e~ p@T*E*U p ?p`~@|A|?pcyx *E*U*@ `(U*U(Q U*e?  @Q**U* Q(&DDd@ *~)U U*U*@ D(D?~O?@??~ ~'EA\#(U*Ub x@?(U*U*U*x ><88?``@xAx?~@@ P 'upB?T*U*x `? o)( |?` U*pO*U*U*|? x PASSWORD : ";::F3$:::"CORRECT? (Y/N): ";:744:A8$(E$,1):(A8$,1)"Y"3500\ 2900S O$"NW.CONFIG.SYS":6000::"FILING 'NW.CONFIG.SYS' AT SLOT #"S:26:"DRIVE #"D:28:"VOL #"V:(4)"OPEN NW.CONFIG.SYS,S"S",D"D",V"V:(4)"DELETE NW.CONFIG.SYS SUPPORTED BY NET-WORKS. YOU CAN":"STILL USE THIS CLOCK, BUT BE SURE YOU":"READ INSTRUCTIONS BEFORE YOU RUN PROGRAM":3440\ "CLOCK MADE BY = ";A7$Rp :"INFORMATION ABOUT YOU (SYSOP):"::" SYSTEM OPERATOR: "SO$:" PHONE NUMBER : "F4$:" YOUR :"VERIFY DATA":::"CURRENT YEAR = ";Q$:"PROGRAM TITLE = ";X$:"CALL PER DAY = ";W$:"MODEM SLOT NO = ";U$:"CLOCK SLOT NO = ";N$:L$"1"A7$"THUNDERWARE"4 L$"2"A7$"MT. HARDWARE"|H L$"3"ĺ:"THE CLOCK YOU HAVE IS NOT ONE OF THE 2":"CLOCKS" "F2$Y "PHONE NUMBER: ___-___-____";:15:744:F4$(E$,1):(F4$)12Ģ(37):3222{ L((1)100):L65L903223 K((1)100):K65K903224 H((1)100):H65H903225 F3$(L)"1"(K)(H):F5$"JAN 1":F6$"00101000009"::5:LOCK":10:"4 = NO CLOCK AT ALL"bX :"WHICH DO YOU HAVE (1-4): ";:744:L$(E$,1):L$""L$"4"ul L$"4"N$"0" (L$)1(L$)43160 :"ENTER SYSTEM OPERATOR'S":" FIRST NAME: ";:744:F1$(E$,1):" LAST NAME: ";:744:F2$(E$,1):SO$F1$,1):(U$)1(U$)73019f :"ENTER CLOCK CARD SLOT (0=NONE,1-7): ";:744:N$(E$,1):N$""N$"0" (N$)0(N$)73020  :"THESE CLOCK CARDS ARE SUPPORTED:"::10:"1 = THUNDERCLOCK PLUS":10:"2 = MOUNTAIN HARDWARE":10:"3 = ANOTHER BRAND C""D$(Y)(D)Y (37):28:D$(Y);:36:V;:36:744:V$(Y)(E$,1):V$(Y)""V$(Y)(V)r (37):36:V$(Y):Y :"CALLS PER DAY PER PERSON (1-99): ";:744:W$(E$,1):(W$)1(W$)993010 :"WHICH SLOT IS MICROMODEM IN (1-7): ";:744:U$(E$":B$(2)"PUBLIC BOARD":B$(3)"EXTRA BOARD":B$(4)"E-MAIL LETTERS":B$(5)"DOWNLOAD PRGS.":S6:D1:V0:Y15:B$(Y);:21:S;:28:D;:36:V; 21:744:S$(Y)(E$,1):S$(Y)""S$(Y)(S) (37):21:S$(Y);:28:D;:36:V;:28:744:D$(Y)(E$,1):D$(Y)900M1900(Q$):Q$(M) :"ENTER A SHORT TITLE FOR YOUR SYSTEM.":"DEFAULT IS 'NET-WORKS II': ";:744:X$(E$,1):(X$)3X$"NET-WORKS II" :"FUNCTION SLOT DRIVE VOL.":"------------------ ---- ----- ---":B$(1)"SYSTEM FILESTOR,S"S",D"D",V"V, :O$"NW II":6000::"AFTER DRIVE STOPS REPLACE THE DISKETTE":"WITH THE DATA DISK IF NEEDED ":"AND TYPE 'RUN'":(4)"LOAD NW II,S"S",D"D",V"VT ::"NET-WORKS CONFIGURATION"::5:"ENTER CURRENT YEAR: ";:744:Q$(E$,1):(Q$)1: ";B$:A$(D)A$(D)B$:DD1:2560P 60003::D$"UNLOCK NW.ABBS.SYS":D$"OPEN NW.ABBS.SYS":D$;"DELETE NW.ABBS.SYS":D$;"OPEN NW.ABBS.SYS":D$;"WRITE NW.ABBS.SYS":I1D:A$(I):I:D$;"CLOSE":216,0: ::O$"NW II EDITOR":6000::(4)"RUN NW II EDI '-' TO BACK UP, TYPE '/EX' TO END":::D$(4):2540 D$;"OPEN NW.ABBS.SYS,S"S",D"D",V"V:D$;"READ NW.ABBS.SYS":D1600:A$(D):D D$;"CLOSE" "NEW ABBS: ";A$(D):A$(D)"/EX"DD1:2640 (A$(D))27A$(D)A$(D)".":2580!( "PHONE # |@*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@          4:H$(E$,1)0((Z$)4Ģ9:16:744:K$(E$,1)U((Z$)5Ģ10:16:744:F$(E$,1)y((Z$)5(F$,1)"*"F$DA$"*"((Z$)5(F$,5)"EMPTY"F$"EMPTY "(F$"EMPTY "I$"":H$"":M$"":K$"":J$""((Z$)6Ģ11:16:744:J$(E$,1)8)D$"W:5:" FIELD 3 = ";M$;" - * LOCKED *":5'" FIELD 4 = ";K$:5:" FIELD 5 = ";F$:5:" FIELD 6 = ";J$:15:5:"ANY OTHER KEY TO EXIT"'L13::" WHICH FIELD";::" #";Z$:(Z$)1(Z$)65180'`(Z$)1Ģ6:16:744:I$(E$,1) (t(Z$)2Ģ7:16:74WHICH RECORD #";Z$:(Z$)X14780-&5180('A(Z$):D$"OPEN NW.USERS.SYS,L64":D$"READ NW.USERS.SYS,R";A:744:I$(E$,1):744:H$(E$,1):744:M$(E$,1):744:K$(E$,1):744:F$(E$,1):744:J$(E$,1):D$:6:5:" FIELD 1 = ";I$:5:" FIELD 2 = ";H$;I:F$"EMPTY "4580%F$DA$M%I$:H$:M$:K$:F$:J$:F$"EMPTY "4640f% F$"EMPTY "F0FIt%4IG4700%HII1:4240%\D$"CLOSE":F0GF%D$"OPEN NW.USERS.SYS,L64":D$"WRITE NW.USERS.SYS,R0":X:G:N:D$"CLOSE":1500"&::"EDIT 640<$D:"IS ABOVE VERIFIED?";::" ";Z$:(Z$,1)"Y"4520[$X(Z$,1)"N"Ģ(37):4420$l:"(R)EMOVE OR (H)OLD? ";Z$:(Z$,1)"H"4640$(Z$,1)"R"Ģ(37)1:4460$I$" ":H$" ":M$" ":K$" ":F$"EMPTY ":J$" "%D$"WRITE NW.USERS.SYS,R"0S#I$" ":H$" ":M$" ":K$" ":F$"EMPTY ":J$" ":D$"OPEN NW.USERS.SYS,L64":D$#:I$" "H$:M$:K$:F$:J$;:20:"RECORD #";I::(G$)04400#(H$,(G$))G$I$G$K$G$(F$,(G$))G$(J$,(G$))G$4640$0(R$,1)"A"(F$,1)"*"4ECIFIED RANGE,":"VERIFY (A)LL OR (N)EW ONLY? ";R$:R$""R$"NEW"p"@:D$"OPEN NW.USERS.SYS,L64":4320x"|IA#D$"READ NW.USERS.SYS,R";I:744:I$(E$,1):744:H$(E$,1):744:M$(E$,1):744:K$(E$,1):744:F$(E$,1):744:J$(E$,1):D$:434:"HIGHEST RECORD IS #";X1:" STOP WITH RECORD #";Z$:(Z$)A(Z$)X1Ģ(37)2:4040e!G(Z$)!:"MATCH PARAMETERS? ";G$:(G$,1)"Y"G$"":4140!"ENTER MATCH CHARACTERS: ";G$:G$""4080!R$"ALL":4160H",:"FROM THE ABOVE SPSOFTDOC."C" 744:(E$,1):3840G :(4)"PR#0":(4)"CLOSE":3660 <216,0:AO::"LAST VERIFIED RECORD WAS #";A:" CONTINUE FROM THERE? ";Z$:(Z$,1)"Y"4040 "ENTER STARTING RECORD -->#";Z$:(Z$)1(Z$)X1Ģ(37):4000 A(Z$)Y!3 SOFT-DOCUMENTATION FILES.":"WHICH DO YOU WANT TO READ?"::"ENTER (1-3, Q=QUIT) ";RD$:C(RD$):C1C3Ĭ:"USE CTRL-S TO START & STOP.":"USE CTRL-C TO QUIT READING."::(SL$)0ĺ(4)"PR#"(SL$) (4)"OPEN NW II SOFTDOC."C:(4)"READ NW II CATALOG":6000:(4)"CATALOG,S"S",D"D",V"V:::"PRESS FOR MENU";::" ";Y$:240hL::3860t"DO YOU WANT TO PRINT DOCUMENTATION ON":"YOUR PRINTER (Y/N)? ";PR$::(PR$,1)"Y"Ą"WHAT SLOT IS YOUR PRINTER IN (1-7)? ";SL$:l"THERE ARE SERLIST.SYS":D$"OPEN NW.USERLIST.SYS":D$"WRITE NW.USERLIST.SYS":F2$", "F1$:D$"CLOSE":(4)"OPEN NW.USERS.SYS,L64":(4)"WRITE NW.USERS.SYS,R0":2:1:1 (4)"WRITE NW.USERS.SYS,R1":F1$:F2$:F3$:F4$:F5$:F6$:(4)"CLOSE":216,0:Y:O$"DISK ":(4)"OPEN NW.CONFIG.SYS":(4)"WRITE NW.CONFIG.SYS":Q$:X$:X15:S$(X):D$(X) V$(X)::W$:U$:N$:L$:SO$:(4)"CLOSE":3566 (4)"UNLOCK NW.USERS.SYS":(4)"OPEN NW.USERS.SYS,L64":3572 216,0:D$"OPEN NW.USERLIST.SYS":D$"DELETE NW.UþԊѾԊԺӠϠŠŠŠԠĠƍͿٯΩٯΩٯΩң„ңң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 [LOIJIBCưƯ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     ӠŠȠŠȠ٠ҠŠōԠéΠčŠӬîҡŠŠϠӠŠϠŭҠōؠŠԠˠɯϠŠӠŠGLeGLiGLHGLWGLuGLGLGLHLHLGLZHLGLGLhHLHLHLHLHLMLNŠŠȠŠĺӺӍϠҠſٯΩӠŠԠŠŠӠȠԠŠӿٯΩ٠G/G :LZE LZE1G2G $'%d  JLJ C, C'=G=GMN1߬G AFF :ۭAG@G AGFF :ۭ;G:G AFF :ۭ=GK(16384):K128830R16368,0:19:1:958:K$(K):KK176:K0 L%CA:CL%AL%L%1= V$((R)):(V$)1V$"00"V$T (V$)2V$"0"V$t F$(F):(F$)1F$"00"F$ (F$)2F$"0"F$ :"SL:";S;" DR:";D;" VOL:";V$;" FREE:";F$;" PAGE ";P;" OF ";L%:JP1:I1A:(JAI)C810( N$(JAI)"1"(C))2S$(C)"0"S$(C)E bZ(Y2):L$(C)" ":Z64L$(C)"*":ZZ128X lZ0T$(C)"T"k vZ1T$(C)"I"~ Z2T$(C)"A" Z4T$(C)"B" Z8T$(C)"S" Z16T$(C)"R" Z32T$(C)"A" Z64T$(C)"B" N$(C)(M$,G,30) Y:XR ENTER DRIVE #";:I$:I$(13)490I I$"1"I$"2"Ģ5:1:958:440^ I$:D(I$):L,D X1511:U,X:768:G34:YQO35:GG35:Z(Y33):Z0690 &CC1:(Y)255N$(C)"1":670 :FFZ:S$(C)(Z):(S$(C))1S$(C)"00"S$(C) X(S$(18455)16:D(18454):K0:W,S16:L,Df TV,17:F496:P1:C0:::13:"DISK CATALOG..."::K0490 |K8ĺ"INSERT NEW DISK IN SLOT:";S;",DRIVE:";D:"AND PRESS RETURN.";:R$:490 "CURRENT SLOT IS ";S# :"CURRENT DRIVE IS ";D:"PRESS RETURN O64:A15:M27136:WB1:LB2:VB4:UB5:RB14:OSB15:ODB16:QM11:OM221:L$"TYPE 'LETTER' TO RUN, OR 0=EXIT":J$"1=LOAD 4=DELETE 7=PAGE BACK":H$"2=LOCK 5=RENAME 8=ANOTHER DISK"( G$"3=UNLOCK 6=PAGE AHEAD 9=CHANGE DRIVE":S 255:M$"":H(106)256(105):H2,240:H3,14:H4,150:169,3,160,9,32,217,3,96,0,1,96,1,0,17,15,251,183,0,150,0,0,1,0,254,96,1:I768793:X:I,X:I:E$"":I140:E$E$(160):I:N$(105),S$(105),T$(105),L$(105):1290 D$(4):B$(7):B777:T400,S"S",D"D",V"V:m/cED:V$"S0R0":I03:760I,((V$,I1))::764,E(E256)256:765,(E256):37888:03:760I,((V$,I1))::764,E(E256)256:765,(E256):37888:$"CLOSE":(4)"PR#0":216,0:.'" USER NAME";:36,31:"P-WORD";:36,42:"VOICE PHONE";:36,58:"CALLED";:36,68:"STATUS CODE":" ---------";:36,31:"------";:36,42:"-----------";:36,58:"------";:36,68:"-----------":/b(4)"BLOAD NW.SRT,A$9 Y$(35)XX14%F1406 X((1)90)C X6510R Y$(F)(X)jC$(XX)C$(XX)Y$(F)qFy#XX2C$(1):C$(2):C$(3):C$(4) P> KEY ";YN$:10000216,0::DC$"NW.TIPS.SYS":6000::"ADD NEW PROGRAMMING TIPS":::"TYPE '-' TO BACK UP, TYPE '/EX' TO END":::X1600"ENTER #";X:744:S0$(X)(IN$,1):S0$(X)"-"XX1:2020 S0$(X)"/EX"XX1:D$(4):21204(4)"OPEN NW.USERLIST.SYS":(4)"WRITE NW.USERLIST.SYS":I1D:(S0$(I))01900h 0(S0$(I))651900 DS0$(I)S0$(I1)1900 XS0$(I)lI:(4)"CLOSE":216,0::"PRINT USERS ON PRINTER? ";YN$:(YN$,1)"Y"ĺ:"TURN ON PRINTER, PRESS p(37)1:820~ 216,0::" CREATE NEW USERLIST? [Y/N]";YN$:(YN$,1)"N"Ĭ 1640 D$"OPEN NW.USERS.SYS,L64":D1X1:D$"READ NW.USERS.SYS,R"D:744:C1$(IN$,1):744:C2$(IN$,1):744:744:744::"PRESS RETURN KEY: ";C$: DC$"NW.USERS.SYS":6000:D$"UNLOCK NW.USERS.SYS,S"S",D"D",V"V:D$"OPEN NW.USERS.SYS,L64":D$"READ NW.USERS.SYS,R0":X:X1:X2:D$"CLOSE"::D1::"ENTER DATE:"; "-";DA$:(DA$)6800 4:"(V)ERIFY OR (E)DIT USERS? CATALOG DISK"? 23:"COMMAND-";:" ";C$:(C$)1(C$)5420q (C$)520,1960,2380,2840,2860,2900,3600,3660 ::"JUST A SECOND......":D$(4):600 D680 X:"FILE: NW.USERS.SYS -- WON'T VERIFY.":"SELECT CONFIGURATION OPTION TO CORRECT":(@37887:5600:S6:D1:V0:60002:D$(4):S0$(600),R0%(600) 216,0:54915:::"SYRINX UTILITY PROGRAM"::5:6);"<1> EDIT/SORT/VERIFY USERS"::6);"<2> EDITOR/NEW FILE UTILITY"::6);"<3> LOAD SYRINX"::6);"<4> CONFIGURE SYRINX"::6);"<5>              $ȱ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;A3$:"MODEM SLOT NO = ";A4$:"CLOCK SLOT NO = ";A5$:A6$"1"A7$"THUNDERWARE"o4 A6$"2"A7$"MT. HARDWARE"-H A6$"3"ĺ:"THE CLOCK YOU HAVE IS NOT ONE OF THE 2":"CLOCKS SUPPORTED BY NET-WORKS. YOU CAN":"STILL USE THIS CLOCK, BUT BE SURE YOU":"RE(1)100):H165H1903223@ H2((1)100):H265H2903224e H3((1)100):H365H3903225O F3$(H1)"1"(H2)(H3):F5$"JAN 1":F6$"00101000009"::5::"VERIFY DATA":::"CURRENT YEAR = ";A1$:"PROGRAM TITLE = ";A2$:"CALL PER DAY = "$"4"A5$"0") (A6$)1(A6$)43160 :"ENTER SYSTEM OPERATOR'S":" FIRST NAME: ";:744:F1$(IN$,1):" LAST NAME: ";:744:F2$(IN$,1):SO$F1$" "F2$ "PHONE NUMBER: ___-___-____";:15:744:F4$(IN$,1):(F4$)12Ģ(37):3222 H1($)0(A5$)73020 :"THESE CLOCK CARDS ARE SUPPORTED:"::10:"1 = THUNDERCLOCK PLUS":10:"2 = MOUNTAIN HARDWARE":10:"3 = ANOTHER BRAND CLOCK":10:"4 = NO CLOCK AT ALL"X :"WHICH DO YOU HAVE (1-4): ";:744:A6$(IN$,1):A6$""A6$"4" l A6ALLS PER DAY PER PERSON (1-99): ";:744:A3$(IN$,1):(A3$)1(A3$)993010 :"WHICH SLOT IS MICROMODEM IN (1-7): ";:744:A4$(IN$,1):(A4$)1(A4$)73019 :"ENTER CLOCK CARD SLOT (0=NONE,1-7): ";:744:A5$(IN$,1):A5$""A5$"0" (A5:D;:36= V;:21:744:S$(Y)(IN$,1):S$(Y)""S$(Y)(S) (37):21:S$(Y);:28:D;:36:V;:28:744:D$(Y)(IN$,1):D$(Y)""D$(Y)(D) (37):28:D$(Y);:36:V;:36:744:V$(Y)(IN$,1):V$(Y)""V$(Y)(V) (37):36:V$(Y):YM :"CET-WORKS II" :"FUNCTION SLOT DRIVE VOL.":"------------------ ---- ----- ---":AF$(1)"SYSTEM FILES":AF$(2)"PUBLIC BOARD":AF$(3)"EXTRA BOARD":AF$(4)"E-MAIL LETTERS":AF$(5)"DOWNLOAD PRGS.":S6:D1:V0:Y15:AF$(Y);:21:S;:28AD NW II,S"S",D"D",V"VT ::"NET-WORKS CONFIGURATION"::5:"ENTER CURRENT YEAR: ";:744:A1$(IN$,1):(A1$)1900YR1900(A1$):A1$(YR)  :"ENTER A SHORT TITLE FOR YOUR SYSTEM.":"DEFAULT IS 'NET-WORKS II': ";:744:A2$(IN$,1):(A2$)3A2$"NRITE NW.ABBS.SYS":I1D:S0$(I):I:D$;"CLOSE":216,0: ::DC$"NW II EDITOR":6000::(4)"RUN NW II EDITOR,S"S",D"D",V"V, :DC$"NW II":6000::"AFTER DRIVE STOPS REPLACE THE DISKETTE":"WITH THE DATA DISK IF NEEDED ":"AND TYPE 'RUN'":(4)"LO2 "NEW ABBS: ";S0$(D):S0$(D)"/EX"DD1:2640\ (S0$(D))27S0$(D)S0$(D)".":2580( "PHONE # : ";B$:S0$(D)S0$(D)B$:DD1:25608P 60003::D$"UNLOCK NW.ABBS.SYS":D$"OPEN NW.ABBS.SYS":D$;"DELETE NW.ABBS.SYS":D$;"OPEN NW.ABBS.SYS":D$;"WW.TIPS.SYS":216,0:L :DC$"NW.ABBS.SYS":6000::"ADD NEW ABBS NAMES & PHONE NUMBERS":::"TYPE '-' TO BACK UP, TYPE '/EX' TO END":::D$(4):2540 D$;"OPEN NW.ABBS.SYS,S"S",D"D",V"V:D$;"READ NW.ABBS.SYS":D1600:S0$(D):D D$;"CLOSE"KHD$;"OPEN NW.T,S"S",D"D",V"V:D$;"WRITE NW.T":Y1X:S0$(Y)::2280}D$"UNLOCK NW.TIPS.SYS":D$"OPEN NW.TIPS.SYS"D$;"READ NW.TIPS.SYS":744:A$(IN$,1):D$;"WRITE NW.T":A$:2200D$;"CLOSE":D$;"DELETE NW.TIPS.SYS":D$;"RENAME NW.T,NF :::(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":C5$"EMPTY ":C6$" ":D$"OPEN NW.USERS.SYS,L64":D$$:C1$" "C2$:C3$:C4$:C5$:C6$;:20:"RECORD #";I::(V1$)04400$(C2$,(V1$))V1$C1$V1$C4$V1$(C5$,(V1$))V1$(C6$,(V1$))V1$4640$0(V0$,1)"A"(C5$,1)"*"46404%D";V0$:V0$""V0$"NEW"?#@:D$"OPEN NW.USERS.SYS,L64":4320H#|ID1#D$"READ NW.USERS.SYS,R";I:744:C1$(IN$,1):744:C2$(IN$,1):744:C3$(IN$,1):744:C4$(IN$,1):744:C5$(IN$,1):744:C6$(IN$,1):D$:43405$C1$" ":C2$" ":C3$" ":C4$" $)D1(Z$)X1Ģ(37)2:4040+"D2(Z$)m":"MATCH PARAMETERS? ";V1$:(V1$,1)"Y"V1$"":4140""ENTER MATCH CHARACTERS: ";V1$:V1$""4080"V0$"ALL":4160#,:"FROM THE ABOVE SPECIFIED RANGE,":"VERIFY (A)LL OR (N)EW ONLY? ":3660n!<216,0:D1X1::"LAST VERIFIED RECORD WAS #";D1:" CONTINUE FROM THERE? ";Z$:(Z$,1)"Y"4040!"ENTER STARTING RECORD -->#";Z$:(Z$)1(Z$)X1Ģ(37):4000!D1(Z$)":"HIGHEST RECORD IS #";X1:" STOP WITH RECORD #";Z$:(Z1-3, Q=QUIT) ";RD$:RD(RD$):RD1RD3Ĭ :"USE CTRL-S TO START & STOP.":"USE CTRL-C TO QUIT READING."::(SL$)0ĺ(4)"PR#"(SL$) (4)"OPEN NW II SOFTDOC."RD:(4)"READ NW II SOFTDOC."RD 744:(IN$,1):3840!:(4)"PR#0":(4)"CLOSENU";::" ";Y$:240"L::3860t"DO YOU WANT TO PRINT DOCUMENTATION ON":"YOUR PRINTER (Y/N)? ";PR$::(PR$,1)"Y"Ą"WHAT SLOT IS YOUR PRINTER IN (1-7)? ";SL$:) "THERE ARE 3 SOFT-DOCUMENTATION FILES.":"WHICH DO YOU WANT TO READ?"::"ENTER (, "F1$:D$"CLOSE":(4)"OPEN NW.USERS.SYS,L64":(4)"WRITE NW.USERS.SYS,R0":2:1:1 (4)"WRITE NW.USERS.SYS,R1":F1$:F2$:F3$:F4$:F5$:F6$:(4)"CLOSE":216,0::DC$"DISK CATALOG":6000:(4)"CATALOG,S"S",D"D",V"V:::"PRESS FOR ME):D$(X)B V$(X)::A3$:A4$:A5$:A6$:SO$:(4)"CLOSE":3566 (4)"UNLOCK NW.USERS.SYS":(4)"OPEN NW.USERS.SYS,L64":3572T 216,0:D$"OPEN NW.USERLIST.SYS":D$"DELETE NW.USERLIST.SYS":D$"OPEN NW.USERLIST.SYS":D$"WRITE NW.USERLIST.SYS":F2$"3500 2900 DC$"NW.CONFIG.SYS":6000::"FILING 'NW.CONFIG.SYS' AT SLOT #"S:26:"DRIVE #"D:28:"VOL #"V:(4)"OPEN NW.CONFIG.SYS,S"S",D"D",V"V:(4)"DELETE NW.CONFIG.SYS":(4)"OPEN NW.CONFIG.SYS":(4)"WRITE NW.CONFIG.SYS":A1$:A2$:X15:S$(XAD INSTRUCTIONS BEFORE YOU RUN PROGRAM":3440I\ "CLOCK MADE BY = ";A7$p :"INFORMATION ABOUT YOU (SYSOP):"::" SYSTEM OPERATOR: "SO$:" PHONE NUMBER : "F4$:" YOUR PASSWORD : ";::F3$:::"CORRECT? (Y/N): ";:744:A8$(IN$,1):(A8$,1)"Y"P162,0,32,117,253,160,2,138,145,105,200,169,0,145,105,200,169,2,145,105,76,57,213:,pS6:D1:V0::"ENTER LOCATION FOR":"FILE:";::DC$;::21:"SLOT DRIVE VOL.":"------------------ ---- ----- ---":21:S;:28:D;:36:V:(37):21:744:S$(:C6$"".*(Z$)6Ģ11:16:744:C6$(IN$,1)w*D$"WRITE NW.USERS.SYS,R";D1:C1$:C2$:C3$:C4$:C5$:C6$:D$:4940*<D$"CLOSE"*P22:"ANOTHER RECORD? ";Z$:(Z$,1)"Y"4780*d(Z$,1)"N"5200*x216,0:R+:IN$"X":J744766:I:J,I::4:C1$(IN$,1)4)t(Z$)2Ģ7:16:744:C2$(IN$,1)Z)(Z$)4Ģ9:16:744:C4$(IN$,1))(Z$)5Ģ10:16:744:C5$(IN$,1))(Z$)5(C5$,1)"*"C5$DA$"*")(Z$)5(C5$,5)"EMPTY"C5$"EMPTY "*C5$"EMPTY "C1$"":C2$"":C3$"":C4$"" 1 = ";C1$:5:" FIELD 2 = ";C2$:5(" FIELD 3 = ";C3$;" - * LOCKED *":5:" FIELD 4 = ";C4$:5:" FIELD 5 = ";C5$:5:" FIELD 6 = ";C6$:15:5:"ANY OTHER KEY TO EXIT"(L13::" WHICH FIELD";::" #";Z$:(Z$)1(Z$)65180)`(Z$)1Ģ6:16:742'::"EDIT WHICH RECORD #";Z$:(Z$)X14780='5180#(D1(Z$):D$"OPEN NW.USERS.SYS,L64":D$"READ NW.USERS.SYS,R";D1:744:C1$(IN$,1):744:C2$(IN$,1):744:C3$(IN$,1):744:C4$(IN$,1):744:C5$(IN$,1):744:C6$(IN$,1):D$:6:5:" FIELD:C5$"EMPTY "4580&C5$DA$T&C1$:C2$:C3$:C4$:C5$:C6$:C5$"EMPTY "4640p& C5$"EMPTY "D30D3I&4ID24700&HII1:4240&\D$"CLOSE":D30D2D3'D$"OPEN NW.USERS.SYS,L64":D$"WRITE NW.USERS.SYS,R0":X:D2:X2:D$"CLOSE":1500:"IS ABOVE VERIFIED?";::" ";Z$:(Z$,1)"Y"4520S%X(Z$,1)"N"Ģ(37):4420%l:"(R)EMOVE OR (H)OLD? ";Z$:(Z$,1)"H"4640%(Z$,1)"R"Ģ(37)1:4460%C1$" ":C2$" ":C3$" ":C4$" ":C5$"EMPTY ":C6$" "&D$"WRITE NW.USERS.SYS,R";I";: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"