-not a Macintosh disk Kk"CHJJJJ -HǍ,HFGDEB EEFhhh /L H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B`   >J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?HIHLHHHhHH݌hHhHh݌H6 H ߼HȄGDH &GFHJfAeFFGHHHH Fi FGiGhJH CH>ȱH? -hh8E@ HH) Hj D>>D@E hh߼!h> H(`B @+ Hhh8$AE`   LDcpq` [` ~  LӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L׭Lܫ &RL &QL d L4 We)n ``@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜ! Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i ӠӠ㮬ᬠֶ ͳ󠨶󠤲ծӮ򠤲󩮍占砤堤占Ӡ썠䮍򠳰占Ӡ􍠠𠠠Ӻ󩮍Ӡ堨󮍍򍍠Ӡ®嬠􍠠穠ɺ堯嬠堯㬠䍠󍠠嬠Ӯ׮썠報䬠Ҭۨݮ䮠ɠ썠栳@pacpq?x<`ԂժժժՂՀЊժ`Ϡ  ΅`  ϩ Lk  ΥНЏЉ8`2B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(` d z#ӮϠήŠӮϠ&ӮĠӮԠȮĮŠȮĮӠڍzz  ` *#` L  #ле``tinue)";:80::(J216,0:"":63990bJ(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000iJ0I31,30,31,31,30,31,30,31@M%(2)28((YR%4)YR%4):@1403,X:36,X:@ 54915:::J1:A$"OFF DAYS"ZA ::A$::"CURRENT PLAN: "T$::"I16302,0:Pİ63000!I100wI N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IS IN DRIVE"::63000}I!NIR60008,(994):60010,(993):(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000I RJ23:"(Press to conB%7:D%D%C:D%7D%D%7'H3:S%09H38:(A)250AH20^HAA1:D%D%1:D%7D%1HDY%DY%1:DY%M%(MN%)DY%1:MN%MN%1:MN%13MN%1:YR%YR%1:3HDY%YD%ĭMN%NM%ĭYR%RY%400H180HHPė:(13):D$"PR#0":D$"PR#3":" "((A$,5,2)):DY%((A$,2))WGA$(ED):RY%((A$,4)):NM%((A$,5,2)):YD%((A$,2))GXYR%1985:C%(4352X):CC%:C7CC7GMN%1B%0:170GA%26441792:C%7A%26681792GA%A%2(MN%1):B%(A%)(A%1)256HBB%DY%1:B%B7:D%B84FVA8ĺ" ";:83#FWA3284[FXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84nFYA$B$:(13):FZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"Fd:I6Fi17::15:A5120GA$(SD):YR%((A$,4)):MN%WORKING..."::"PRESS P TO PRINT":=EPF(16384):F12880mEQ16368,0:FF128:(F27J1)10:A$(F):{ER(95);:ESY:B$"":X15:1403,14:82ETY:1403,X1:80:AF:A1389FU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:0N).":mD,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045D.1:(13):CR%A:D4(CR$(1))13āA1CR%1:CR$(A);::(13);D5#EJ"----------------------------------------------------------":IC&(3):D+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL IF121F89F7817bBP0:F89F121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52hB{BS%D%ĺ:II1BX(D%1)11:8:MN%"/"DY%"/"YR%;:S%D%BI60PāQW170I:::I4BP(37)20ıB63000:15=C"-------------------PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210rA((A$)27)90:100A:"Sunday Monday Tuesday Wednesday Thursday Friday Saturday":30AB:"Want a printout? (y/n): ";:80:F110j )@:A$"":(4)"PR#3":" ":63990:F@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@M%(2)28((YR%4)YR%4):@1403,X:36,X:@ 54915:::J1:A$"OFF DAYS"ZA ::A$::"CURRENT PLAN: "T$::"     mmmmmmmnnnnnnn;Zx0Nm<[y1On% "iiji ȩБȩ$ߤȑ(ɍk&eɛVɈ"ߤ(ȩ(L0$ Lɠeʥב()ȩߑ(L0Lȑ(LE^ _  !^_  ` ХL ѥЅХх ȱȱꨄ_^  ߥ Ѡ ȱ ȱ LNѥх Ѡ Ƚ Ƚ ХL;L Lopst``8 LL7L7L L ߅e߅ieЅi&eꪘeee` xki liܩ ` ȱȱ ԥե ȱȱL rȥȥ ꈈȥȥԥЅީХ ԥե ȱȱ ԑꈱԑꈱԑȥȥ ԥޅЩ8ӥL DHHPH`HkHxHHHHXhpxhpxhpxhpxhpxhpxhpxhpxnT14>A<G NT14>ET14>eT14>qT14>QT14>pT14>PT14> 0   0 0`` $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((PPPP @?05:?DINSX]16;@EJOTY^27CHMRW\aH   ,  q  hɛhhLɠ `, qHH hΔh  `!8xʭix`n譐荏 0dd   MΖΕL` ȹ  q` Β0 x qLq qLq` q q qLq qLqL`   q`   q` }ЪΜ  }, 0], J.~~=m MΛ ͍͎L } LLHi #i)`, 0`Jx,T,U,T(`   L L m m m m    m  m      }} \H)?%)  hJJJe = Θ0Μ߭}H)?%)  hJJJe̋`͌V = Θ0Λ߭ ΞΝ0Λ ΞΝ, 0], J.~~=m MΜ } L 0$̋͌L    ȹ Ωȹ ȹ  , 0L 8 ~ m~im m   m  m ΊΉ      `8H hlH0h``8H hlH)h` HHPH`HkHxHHHHXhpxhpxhpxhpxhpxhpxhpxhpxnT14>A<G NT14>ET14>eT14>qT14>QT14>pT14>PT14>:(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000CV R}V:"(PRESS SPACE TO CONTINUE) ";:ER$:ER$:(13)::V216,0:"":63990V21000V(222)5(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000V0c: ";A$:(T$""(A2:B%(0)A:74:D$"OPEN"T$;A$:D$"DELETE"T$;A$:D$"OPEN"T$;A$:D$"WRITE"T$;A$:A%(1):A:B0A%(1):C0A:A$(C,B):::D$"CLOSE":24U N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IS IN DRIVE"::63000U!N=VR60008,(994):60010,(993)8807T&NS%S%M%0:S%S%1:A%A%(NM%(S%1)1):9880]T&D$"CLOSE":74:(637)223Č2270T&(10)1ė:"SORTING FOR 1-45 SECONDS...":55T&74:A1A%(1)T&((A$(1,A),1))33L(A$(1,A)):A$(1,A)(A$(1,A),L1):9892T&T&U&Z%70,71,70:9866BS&NS%S%T%0:RS%0:S%S%1:A%A%(NT%(S%1)1):9866ZS&S%0:T%0:A%1:D%1S&94:NT%(S%)T%T%T%1:A%A%(Z%1):9874S&NS%S%T%0:S%S%1:Z%9874:A%A%(NT%(S%1)1):9874S&S%0:M%0:A%1T&96:NM%(S%)M%M%M%1:A%A%1:9:A%1*R&90:ML%(S%,M%)L%L%L%1:9858UR&NM%(S%)M%M%M%1:A%A%1:L%0:9858R&NS%S%M%0:L%0:S%S%1:A%A%(NM%(S%1)1):9858R&S%0:T%0:RS%0:A%1R&92:NR%(S%,T%)RS%RS%RS%1:A%A%(Z%1):9866S&NT%(S%)T%T%T%1:A%A%1:RS%RS%RS%RS%1:A%A%(Z%1):9844MQv&NT%(S%)T%T%T%1:A%A%1:RS%0:9844Qx&NS%S%T%0:RS%0:S%S%1:A%A%(NT%(S%1)1):9844Qz&S%0:M%0Q|&A%,A%,ML%(S%,M%),A%,A%,A%:NM%(S%)M%M%M%1:9852Q~&NS%S%M%0:S%S%1:9852R&S%0:M%0:L%0)L%L%L%1:9830=Ph&NT%(S%)T%T%T%1:L%0:A%A%1:9830vPj&NS%S%T%0:L%0:S%S%1:A%A%(NT%(S%1)1):9830Pl&S%0:T%0Pn&NR%(S%,T%),A%,A%:NT%(S%)T%T%T%1:9838Pp&NS%S%T%0:S%S%1:9838Pr&S%0:T%0:RS%0:A%1!Qt&77:NR%(S%,T%)(NM%(S%1)1):9812"OX&S%0:B%0MOZ&A%,A%,A%,A%:NL%(S%)B%B%B%1:9818lO\&NS%S%B%0:S%S%1:9818zO^&S%0:T%0O`&A%,A%,A%,A%,A%,A%,TL%(S%,T%):NT%(S%)T%T%T%1:9824Ob&NS%S%T%0:S%S%1:9824Od&S%0:T%0:L%0:A%1Pf&75:TL%(S%,T%D"T$:T$,ST$,NS%:S%0HNL&NT%(S%),NM%(S%),NL%(S%):NS%S%S%S%1:9804[NN&S%0:T%0:M%0}NP&A%:NT%(S%)T%T%T%1:9808NR&NS%S%T%0:S%S%1:9808NS&S%0:A%1NT&B%:(Z%3)104:NM%(S%)M%M%M%1:A%A%1:9812OV&NS%S%M%0:S%S%1:A%A%):A$(D,C)A$(D,C1):A$(D,C1)A$::F14M:F5820@MAB1:M(#7,(T$):A1(T$):720A,((T$,A,1)):::A$"":D$(4):A1(7):T$T$((720A))::Z%(10):K%(1000):Z%1010,2010,3010M)#4010NH&(T$"")63990:B%(0)A:74:D$"OPEN"T$:D$"REA(13):24)LDA0:"WAIT 1-160 SECONDS..."hLNAA1:(AA%(1))5730:A$(1,A)A$(1,A1)CTA:BA1:5800rLX5710xLbL(BA%(1))5810:BB1:A$(1,A)A$(1,B)5800LBB1LBB1LF0:CCTB:(A$(4,C))(A$(4,C1))5840&MD15:A$A$(D,CA16:9900IK 1000,K%:Z%3:10,Z%:998,0:999,0:(997)24:997,1:9000K A$(6,24),A%(1),B%(13),C(13),M%(13),DC%(13),ES(13),N%(13):A6:9800:A6:9900K1000,K%:Z%4:10,Z%:998,0:999,0:997,0:9000LA%(1),B%(13),C(13),M%(13),DC%(13),ES(13),N%997,0:(999)24:999,1:9000vJA$(5,216),A%(1),B%(13),C(13),M%(13),DC%(13),ES(13),N%(13):A5:9800:5700:A5:9900J1000,K%:Z%2:10,Z%:997,0:999,0:(998)24:998,1:9000 KA$(16,54),A%(1),B%(13),C(13),M%(13),DC%(13),ES(13),N%(13):A16:9800:A$:B,B:A%A%1:&IhA$(6,A%)(B%):\IjA$(4,A%)A$(4,A%1):A$(5,A%)A$(5,A%1):A%A%1:fIn1000pIx2000zI3000I2000I3000I4000I1000I2000I2000I2000I1000I1000I1000J1000,K%:Z%1:10,Z%:998,0:(B%):H]B%:Z%100:lH^Z%60:(10)2İ3:A$(5,A%)A$:3:A$(6,A%)A$:3:A$(7,A%)A$:3:A$(8,A%)A$:{H_B,B,B,B:H`(10)3İ3:A$(5,A%)A$:HaB:Hb20000:D$"CATALOG":63000:21000:5HdA$(3,A%)(B%):If3:A$(4,A%)A$:3:A$(5,A%)$(L%1,A%):A%(1)A%:GLA$:*GMA$,B%GNZ%1L(A$):A$(1,A%)(A$,L3):A$(2,A%)(B%):A%(1)A%:A$(4,A%)(S%):A$(5,A%)(T%):A%(1)A%:GO(10)2A$(RS%9,A%)A$:GPGZ(10)3ĄA$(L%1,A%):A%(1)A%:G[A$:H\Z%2ĄB%:A$(13RS%,A%)(0)1:208,5:210,A%(1):2440:kF7206,0:A1A%(1):A$(0,A)(A)::252,B%(0)1:208,1:210,A%(1):2440:F<(A$(4,A%))S%(A$(5,A%))T%ĴD%102,106:D%2:60F=D%1:FFA$".R":FGA$".T":FHA$".M":FJ::"WORKING...":GK(10)2ĄAOADHRCG4":D$"BLOADCHAIN,A520":520"GREPORT"4E41@E&(3):zE)D$"BLOAD]FRE":D$"BLOAD]CALENDAR":D$"BLOAD]CONVERT"E+D$"BLOAD]WSORT":D$"BLOAD]WSORT2"E,17872,K%64E-D$"BLOADCHAIN,A520":520"A"F2206,0:A1A%(1):A$(0,A)(A)::252,B%60,170,180,190,200,210,220,230jDD$"BLOADCALENDAR."T$:D$"OPENCAL."T$:D$"READCAL."T$:SD,ED:D$"CLOSE"D74:(K%2K%3K%9)55:(K%4K%5K%8K%10)50,E21000:K%11ĺD$"BLOADFRE":D$"BLOADCALENDAR":D$"BLOADCONVERT":D$"BLOADALLCHAR":D$"BL:"(L) ONE RESOURCE, MONTHLY (GRAPHICS)":"(M) ALL RESOURCES, MONTHLY (GRAPHICS)":C1002:16368,0:(13):"(A-M OR FOR NEW PLAN): ";:A$:A(A$):A$:K%(A$)64((A$)96)32:((A$)27)0:K%1K%1310D20000:38:K%110,120,130,140,150,1 TASKS, CHRONOLOGICAL":"(E) MILESTONES, CHRONOLOGICAL":"(F) OFF DAYS":"(G) RESOURCE COST TO DATE":"(H) TASK EXPENSES, CHRONOLOGICAL"SC "(I) TASK/RESOURCE COSTS, ALPHABETICAL":"(J) TASK/RESOURCE COSTS, CHRONOLOGICAL":"(K) RESOURCES, MONTHLY (TEXT)"$)0)5:A$"?"98?A(A$)0T$A$:Z%0:999,0:998,0:997,0cA(A$)0Ģ6:12:T$:QW1999:A ::"MENU FOR EVERYBODY'S PLANNER REPORTS ":::::"(A) RESOURCES, ALPHABETIZED":"(B) TASKS, ALPHABETIZED":"(C) MILESTONES, ALPHABETIZED"B "(D)@A$"":63990:MENU%@D$(4)l@D$"BLOADFRE":D$"BLOADWSORT2":D$"BLOADWSORT":1015,29:1014,0:5}@B:A$(B):A::"CURRENT PLAN: "T$:::"PRESS TO STAY WITH CURRENT PLANOR ? FOR DISK CATALOG":::"PLAN NAME: ";A$:(T$""(A                  63000 I0:(4)"PR#3":" ":63990:B@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@@1403,X:36,X:@ 54915:::J1:A$"TASKS, ALPHABETIZED"KA ::A$::"CURRENT PLAN: "T$::"PRESS TDISK IS IN DRIVE"::63000 H!N}HR60008,(994):60010,(993):(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000H RH23:"(Press to continue)";:80::H216,0:"":63990I(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":1:A$(1,0)A$(1,1)NGrA$(A$(5,A%),5,2)"/"(A$(5,A%),2)"/"(A$(5,A%),3,2)VGs20bGA%A%1uGA%A%(1)114G(13)GPė:D$"PR#0":D$"PR#3":" "G16302,0:Pİ63000G100H N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA 1403,14:Y:B$;:XX1:82:" ";:847FVA8ĺ" ";:83DFWA3284|FXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84FYA$B$:(13):FZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"Fd:I6Gi17::15:4:A%CR%1:CR$(A);::(13);E5HEJ"WORKING..."::"PRESS P TO PRINT":bEPA(16384):A12880EQ16368,0:AA128:(A27J1)10:A$(A):ER(95);:ESY:B$"":X15:1403,14:82ETY:1403,X1:80:A1389$FU(B$)1A8B$(B$,(B$)1):N OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":D,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045D.1:(13):CR%A:E4(CR$(1))13āA1-------------------------------------------------------------------":bC!XX((A$)1):8:A$;:nC&(3):,D+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TUR89A7817XBP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52^BBX0:8:A$(1,A%)" "A$(2,A%)" "A$(3,A%)" "A$(4,A%);:X71:8:A$BII1:I60PāQW170I:::I4BP(37)20ıB63000:15FC"------------O GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210cA((A$)27)90:100A:"Task Early Start":30A B:"Want a printout? (y/n): ";:80:A110A121A )@:A$"":(4)"PR#3":" ":63990:B@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@@1403,X:36,X:@ 54915:::J1:A$"TASKS, ALPHABETIZED"KA ::A$::"CURRENT PLAN: "T$::"PRESS T          iq imo 膢 ȱ " [67 l67  8ij  o>) ȱȑ𽥡 f x op`ꈱ0 $ ȥȥ˩8ij `e 6 ş>0ȱ׈iȱȱ` lkFnm ȱHȱeȱeh֊0`L ɽ5 o@Dȱu> ,ʵCn ,`LJ  f ) enmop0  , ߅ j  N cLޅ f x;尐 0䱝ȑȩ0 L &>)     +7DHPXfnuz &/=LZfr$,6@LXdo| *6@LYdpw-%--e+'"$*um)--5???.--5???.--5???.--5???09+"Iw6-Iw6166n  566-66 $ 6666  u66)u6?$66.- ?)5668$66  uI:?-??I-666v- $$6 $6v $b$$M 6-%$?----I-sw- )us?  )--5???.--5???.--5???.--5???09+"-6$$)-?66n  -3-?)-366166- $$$16v $$166f r$$$1n  $16. $)-5.--166.-$$,-)-566>?g $$ -- )56.8 -166.pe$I9?6--I 666$ u)u>?6-Iu-6) 5?$166.`u66#IIII--??  - -6?$$6%66M!?d )-;?I1?I ?6v- ?)-56 -?v- $$ -6?@-~ +7DHPXfnuz &/=LZfr$,6@LXdo| *6@LYdpw-%--e+'"$*um)--5???.--5???.--5???.--5???09+"RATION ROUTINES ON YOUR 3.5 INCH EVERYBODY'S PLANNER, DO SO NOW. ONCE YOUR PRINTER CONFIGURATION IS SAVED, USE AND THEN TYPE IN:"::"BLOAD P "^:"(YOUR 3.5 INCH EVERYBODY'S PLANNER PROG-RAM DISK MUST HAVE BEEN IN THE DRIVE.)): ";:A$:A$:(13):(A$)89(A$)78(A$)121(A$)110350]r(A$)78(A$)1106|:"HERE ARE THE INSTRUCTIONS FOR FORMATTINGPRINTER ROUTINES SO THEY WORK WITH THIS PROGRAM:":63000"IF YOU HAVEN'T YET USED THE PRINTER CON-FIGUA:"PRINTER FORMAT FILES MUST BE INSTALLED BEFORE YOU CAN PRINT OUT PICTURES ON YOUR PRINTER. SEE MANUAL. AND IF YOU CHANGE PRINTERS, NEW PRINTER FORMATS MUST BE INSTALLED.":C_"WOULD YOU LIKE TO INSTALL A PRINTER FORMAT AT THIS TIME? (Y/NES OF YOUR DATA DISKS AFTER EACH USE."::"(B) ALWAYS HAVE AT LEAST ONE INITIALIZED DATA DISK HANDY THAT'S NEARLY EMPTY."-" (THIS MUST BE A DOS 3.3 DATA DISK, NOT PRODOS. CONSULT THE MANUAL FOR MORE INFORMATION.)"::63000^:(13):(S$)78(S$)89(S$)110(S$)121160 993,(A$)48:994,(B$)48:995,(C$)48:996,(E$)48:992,(S$"Y"S$"y")::(13):(4)"BSAVEZ,A992 ,L5":7,:"PLEASE A L W A Y S FOLLOW THESE TWO RULES:"::"(A) ALWAYS MAKE BACK-UP COPI(13):(B$)52(B$)49130q 17:"SLOT YOUR DATA DISK IS IN? (2-7): ";:C$:C$:(13):(C$)55(C$)50140 19:"DRIVE YOUR DATA DISK IS IN? (1-4): ";:E$:E$:(13):(E$)52(E$)491503 21:"WANT DISK SWITCH PROMPTS? (Y/N): ";:S$:S$:E ANYTHING? (Y/N): ";:10:A$"Y"A$"y"55 118? s117T t(4)"BLOADZ":7_ u216,0k v63990 x13:"SLOT YOUR PROGRAM DISK IS IN? (2-7): ";:A$:A$:(13):(A$)55(A$)50120 15:"DRIVE YOUR PROGRAM DISK IS IN? (1-4): ";:B$:B$:AXFILES1":(4)"RUNMENU" ::"PROGRAM DISK SLOT: "(993):"PROGRAM DISK DRIVE: "(994):"DATA DISK SLOT: "(995):"DATA DISK DRIVE: "(996):"DISK SWITCH PROMPTS: Y":(992)0Ģ5:22:"N" A$:(13):31 A$:(13):::, 12:"WANT TO CHANG B (104)9ĺ(4)"BRUNDDMOVER":104,9:2304,0:(4)"RUNHELLO" 999,0:998,0:997,0::P(65535):P(P192):49246P49240,0:63990 16302,0:(4)"BLOADTITLE":16297,0:16304,0:16301,0::900:10:115 300 104,64:16384,0:(4)"M,-.C> DURING BOOT FOR 48K DOS"NS 1"-N409D$(4)\(55)170(40222)78ī12000r D$;"BLOADASMDIV"} 38400 C$""(38403)0C$"*"AD819237264256,0:257,0:259,0:AD6 :"DIVERSI-DOS(TM) VERSION 4.1-C";C$000'JF$"DDMOVER,A$8700,L$AFA":6000ITF$"PATCH,A$9190,L$470":6000{'(24):"PRESS TO RETURN TO MENU ";A$'20*"READ ERROR ON DIVERSI-DOS MASTER":"USE A BACK-UP DISK" +7000."REQUIRES 48K DOS - PLEASE RE-BOOT"::"HIT ";]A$:pD$;"BSAVE";F$"FILE WRITTEN ONTO DISK"10000"UNABLE TO WRITE ONTO THIS DISK"810000X216,0::D$;"FP"@F$"BUFFER,A$8000,L$6FA":6L16II4:I16I32(I12I16532893,ICA$(I4)aI4A$A$"K - STANDARD"sI4A$A$S$I1(A$)I32893,((A$,I,1))5600:32912,IL|8000:"ENTER SLOT # (0-7)";:A$A$"0"I0:5630I5600:32911,I-P:"ENTER RAM CARD SIZE":CUS$"K - SATURN "mZ"1 - 16K (MOST COMMON)":"2 - 32";S$d"3 - 64";S$:"4 - 128";S$f"5 - 64K LEGEND":"6 - 128K LEGEND":L0i5200nIxI6I1ī5200}I4II2:S$"K - LEGEND ":32913,I."DISABLE PRINT BUFFER(Y/N)?";A$;32882,0OI0:A$"Y"I1\32914,IlI0ī5500:"ENTER PRINTER CARD TYPE":I1NCI;" - ";:256,I1:30721 :5100I(I1INCī51002256,I1:30724< TRYING BRUN" D$;"BRUN";A$% - ADT :"* * * * * * * * * * * * * * *"x "UNABLE TO RUN PROTECTED DISK" 10000"RUNNING COPYA":D$;"RUN COPYA"NC(30720)"DISABLE KEYBOARD BUFFER(Y/N)?";A$:I0:A$"Y"I1 8L (I)128ĺ:"* * ERROR * *":"THIS IS A NON-BOOTABLE DISK":AD:10000^ A$A$((I))d j! & :"START-UP PROGRAM IS --> ";A$' + :"NOW RUNNING ";A$v 3250 D$;"RUN";A$ 3500 (222)13ī3500  :"RUN FAILED -HE PUBLISHER CAN ADD":" DIVERSI-DOS TO THE PROTECTED DISK." ::"REMOVE THIS DISK (DIVERSI-DOS MASTER)":" AND INSERT PROTECTED DISK"::"PRESS RETURN WHEN READY";A$ AD3 (256)0ī3500 AD 3070:3115 A$"" I62965 "THIS PROGRAM WILL ATTEMPT TO RUN":" A PROTECTED DISK. THIS ATTEMPT":" WILL FAIL IF THE PROTECTION SCHEME":" USES A NON-STANDARD DISK FORMAT." :"IF THE PROTECTED PROGRAM WILL NOT":" START, OR RUNS ABNORMALLY, THEN"? " ONLY T3 (256)0ī2100!3070,2200=D$;"INIT H"MD$;"CLOSE"b(256)0ī2200 :"DIVERSI-DOS NOW ADDED TO DISK"*100004ADR:"***UNABLE TO READ"f10000AD:"***UNABLE TO WRITE"10000 3500"*** IF UNSURE, PRESS ")B$:gB$"B"Ĺ34633,52:40514,52:"BINARY START ENABLED":2017B$"4"Ĺ44725,160:48894,40:"40-TRACKS ENABLED":2020B$"X"Ĺ8491,56B$"D"Č37264:8520,173:8563,76:8527:8563,322100ADISK"8491,24:8520,76_:"* * * * WARNING * * * *"::"DO NOT INSERT A PROTECTED DISK"::"PRESS '4' FOR 40-TRACKS":"PRESS 'D' FOR 64K DOS":"PRESS 'B' FOR BINARY START PROGRAM(RARE)":"PRESS FOR NORMAL DOS":::120037264"INSTALL FREE SECTOR PATCH?":"(DISABLES CALL 1005 FEATURE)"::"*** IF UNSURE, HIT 'Y'"::"ENTER Y OR N --> ";:A$:A$:A$"Y"Č32576:"REMOVE THIS DISK (DIVERSI-DOS MASTER)":"THEN INSERT THE UNPROTECTED DOS 3.3 D)128ī1230NMI=" * * ENTER SELECTION (0-";NM;")";F20MIa I0INMī1260nI0ī20}I1ī1400(256,I1:257,0:259,0:AD6:1200xI1256,I:257,0:259,0:II1:AD6(49152)3ī20(258)128ī14105~256,I:AD6:II1(M2ī1170>(258)128ī1150X(12):D$;"PR#0":20q:"INSTRUCTIONS:":"0 - RETURN TO MAIN MENU":"1 - ALL INSTRUCTIONS"I1I1;:I9ĺ" ";"- ";256,I:II1:257,0:259,1:AD6 (258ONS":D$;"RUN INSTRUCTIONS"& .216,0F L:"WHERE IS THE PRINTER":P V5600W [I ]::"1 - ALL MESSAGES":"2 - ERROR MESSAGES ONLY"::"ENTER SELECTION(1 OR 2) ";:A$:A$:M(A$) ^M1M2ī1117 `D$;"PR#";I j257,1 tI0yM2I001 d:"PLEASE ENTER A NUMBER BETWEEN 1 AND 9"; n:30Z "SEND INSTRUCTIONS TO:":c 20v "1 - PRINTER" :"2 - SCREEN" :"ENTER SELECTION (1 OR 2) ";:A$:I(A$) I2ī1200 I1ī20 1070 $A$:D$;"VERIFY INSTRUCTI,35:40206,187:40514,6:34633,6[ PI(0)::"ENTER SELECTION (1 TO 9) ->";:A$::I(A$) RA$"P"Ĺ216,0:D$;"BRUN DOGFIGHT" SA$"R"Ĺ216,0:D$;"RUN RDCONFIG" TA$"G"Ĺ216,0:D$;"BRUN GINST" Z:I1000,2000,3000,4000,5000,8000,8010,8020,70I"7 - BSAVE DDMOVER FILE":; J"8 - BSAVE PATCH FILE":s K"9 - EXIT TO BASIC / G - ";::"GARB. COLLECT":: L"P - PLAY DOGFIGHT / R - ";::"RAMDISK": M(45886)173Ĺ45889,24:45890,234:45891,234 NAD9 O49107,141:44725,140:48894* "C1983 DSR, INC / BY BILL BASHAM"F :"1 - INSTRUCTIONS":o ("2 - PUT DIVERSI-DOS ONTO A DISK": 2"3 - RUN A PROTECTED PROGRAM": <"4 - MAKE COPIES OF THIS DISK": F"5 - MODIFY BUFFER ROUTINES": H"6 - BSAVE BUFFER FILE":  11000$(4);"MAXFILES 1"-N409D$(4)\(55)170(40222)78ī12000r D$;"BLOADASMDIV"} 38400 C$""(38403)0C$"*"AD819237264256,0:257,0:259,0:AD6 :"DIVERSI-DOS(TM) VERSION 4.1-C";C$     z12 ?????????? &ӮĠ'ӮԠ(ȮĮŠ)ȮĮӠ*Ġ+Ҡ /ڠ Š Ƞ !ɠ "ʠ #ӮϠ$ήŠ%ӮϠ& ŠҠԠɠǠĠ à  Ԡ Š!ˠԲԠԠ Р ԠԲҠҠƠ àϠ Ҡ Š Ǵ Π   ՠ(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000@I RpI23:"(Press to continue)";:80::I216,0:"":63990I(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000I0I ALPHABETIZED"\A ::A$::"CURRENT PLAN: "T$::1)470"HxNN1:D%D%(A$(2,A%)).HA%A%17H114=H_HPė:D$"PR#0":D$"PR#3":" "xH16302,0:Pİ63000H100H N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IS IN DRIVE"::63000H!N:IR60008,(994):60010,(993):::::::::::\GZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"fGd:I6Gi17::15:4:A%1:A$(1,0)A$(1,1)HrB$(A$(4,D),5,2)"/"(A$(4,D),2)"/"(A$(4,D),3,2):A$(1,A%)A$(1,A%1)A%A%1:20:4:A%A%1:DA%:A%A%((B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84TFVA8ĺ" ";:83aFWA3284FXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84 GY::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::A:5E4(CR$(1))13āA1CR%1:CR$(A);::(13);;E5eEJ"WORKING..."::"PRESS P TO PRINT":EPA(16384):A12880EQ16368,0:AA128:(A27J1)10:A$(A):ER(95);:ESY:B$"":X15:1403,14:82ETY:1403,X1:80:A1389AFURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":D,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045E.1:(13):CR%63000:15cC"-----------------------------------------------------------------------------":C!XX((A$)1):8:A$;:C&(3):ID+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SU110A121A89A7817fBP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52lBBX0:8:A$(1,A%);:X22:A$(N):33:X37:A$(D%):33:X52:A$A$(3,A%):33:X65:8:B$BII1:I60PāQW170I:::I4BP(37)20ı C"PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210tA((A$)27)90:100A:"Resource Number of Tasks Days Last Daily Cost Early Start":30AB:"Want a printout? (y/n): ";:80:A )@:A$"":(4)"PR#3":" ":63990:A@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@D1:D%0:N0:@1403,X:36,X:@ 54915:::J1:A$"RESOURCES, ALPHABETIZED"\A ::A$::"CURRENT PLAN: "T$::~@@axxx~@@?ԪժժՂժժժՂЊЪժ~@axpxA`|@x|@`|``|ԪժժժժժժժժՊժՂЪժՀ~@a{p=x|ԂժժժժՀЊЪժՀCpaxpx<`p@`xx@<@@`|ԪժՀժժժՊЊЪՀԂժՂՀЊժՀ~pCapO?x|~|``ԪժժժժժժՊժՂժՂժ~@paxp?xp~p`ԪժժժժՊժՂժՀժՂժ~@ax0 t)B:CMCMC(A)::"-------------------------------------------------------------------------------":X37:A$(B):33:X63:A$(CM):33:X69:8:"TOTAL"N::"Current Plan: "T$;:" Resource: "R$;:" Year: "YR%OPė:D$"PR#0":D$"PR#3":B%(M%)B%(M%)C%:BC%:9:190mMAA1::B%(M%)B%(M%)C%:BC%:9:M%M%1:2:(M%12)200:DY%1:C%0:6:160~MA%A%1:114MF190:M%1:Y%Y%1:4:Y%YR%F1:ES(M%)ES:DY%1:C%0:6M3:160MMA112:5:38:NB0:CM0:A112:BB%(A,DY%LA$A$(4,A%):A((A$,4)):HYR%A256:LYR%A256HYR%:Y%A:MN%((A$,5,2)):DY%((A$,2)):252,LYR%:253,HYR%:254,MN%:255,DY%:4485:A(206)256(207)LD%(A$(2,A%)):B%0:C%0:3:2LBDY%M%(M%)M(A)C%C%F:B%B%1:B%D%Č54915:),4))F0KxM%((A$(4,A%),5,2)):N%((A$(5,A%),5,2)):6:2:M%N%YR%((A$(5,A%),4))B(A$(2,A%)):B%(M%)B%(M%)B:9:A%A%1:114LA$(SD):A((A$,4)):HYR%A256:LYR%A256HYR%:MN%((A$,5,2)):DY%((A$,2)):236,LYR%:237,HYR%:238,MN%:239$"?"İ54:102;JgA1A%(1):R$A$(1,A)A%A:AA%(1):105FJh:102gJi17::15:4:A$(1,0)A$(1,1)sJrI0:F1{Js38JtR$A$(1,A%)470JuYR%((A$(4,A%),4))A%A%1:114 KvYR%((A$(4,A%),4))Ĵ(YR%((A$(5,A%),4)))190:YR%((A$(5,A%ENU"BI[:8:A$(SD):B$(ED):"Enter years "(A$,4)"-"(B$,4):rI\:8:"Enter for a list of resources":Id::91:10:" YEAR:";:83:YR%(A$):YR%(((SD),4))YR%(((ED),4))100Ie3Jf::92:10:" RESOURCE:";:83:R$A$:AGHU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84ZHVA8ĺ" ";:83gHWA3284HXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84HYA$B$:(13):IZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"M:A1A%(1):A$(1,A):A20(A220)İ63000;G7:63000:eGJ"WORKING..."::"PRESS P TO PRINT":GPA(16384):A12880GQ16368,0:AA128:(A27J1)10:A$(A):GR(95);:GSY10:10:B$"":X15:1403,14:82HTY:1403,X1:80:A1389L I0N).":pF,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0F-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045F.1:(13):CR%A:F4(CR$(1))13āA1CR%1:CR$(A);::(13);F5,G6A$"November":$E A$"December":@E!XX((A$)1):8:A$;:LE&(3): F+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRPR#1"::52DJDA21,22,23,24,25,26,27,28,29,30,31,32:X69:8:A$:]DA$"January":qDA$"February":DA$"March":DA$"April":DA$"May":DA$"June":DA$"July":DA$"August":DA$"September":DA$"October":Eaily Cost Monthly Cost Month":"-----------------------------------------------------------------------------"yCC:"Want a printout? (y/n): ";:80:A110A121A89A7817 DP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"2B 54915:::J1:A$"RESOURCES, MONTHLY (TEXT)"B ::A$::"CURRENT PLAN: "T$::"PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210B((A$)27)90:100sC:"Early Start Number of Tasks Days DES(X)0::AX0:8:A$(ES(A)):(A$,5,2)"/"(A$,2)"/"(A$,4);:X25:A$(N%(A)):33:X37:A$(B%(A)):33:X49:A$(DC%(A)):33:X63:A$(C(A)):33:20:AN%(M%)N%(M%)F:A1403,X:36,X:B C(M%)C(M%)B(A$(3,A%)):DC%(M%)F(A$(3,A%)):o)@:A$"":(4)"PR#3":" ":63990:K@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@(ES(M%)0)16:ES(A$(4,A%)):ES(M%)ESF:@M%(2)28((Y%4)Y%4): AX112:B%(X)0:N%(X)0:C(X)0:DC%(X)0:^ _  !^_  ` ХLѥЅХх ȱȱꨄ_^  ߥ Ѡȱ ȱ LNѥх ѠȽ Ƚ ХL;LLL7L7LL߅e߅ieЅi&eꪘeee`HE DRxki liܩ ` ȱȱ ԥե ȱȱL rȥȥ ꈈȥȥԥЅީХ ԥե ȱȱ ԑꈱԑꈱԑȥȥ ԥޅЩ8ӥLϠ  ΅`  ϩ L  ΥНЏЉ8` ie L `sp+ƞ0Hepo ʆ8h`ʩ L R enmop0 , ߅ j  N cLޅ f x ;尐 0䱝ȑȩ0 L &>) ȱȑ𽥡 f x op`ꈱ0 $ ȥȥ˩8ij `e 6 ş>0ȱ׈iȱȱ` lkFnm ȱHȱeȱeh֊0 `L ɽ5 o@Dȱu> ,ʵCn ,`LJ  f ) enmop0 , ߅ j  N cLޅ f x ;尐 0䱝ȑȩ0 L &>)      mmmmmmmnnnnnnn;Zx0Nm<[y1OnM DISK IS IN DRIVE":63000 N RONER$:ER$:(13)::ER$"P"(ER$)112ıYN3000qN216,0:"":63990N(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?"::"(PRESS SPACE TO CONTINUE)";:63000N:0%((Y%4)Y%4):AX112:B%(X)0::Y MAGNIFICATION (1-9): ";:85:AA48:A1A93080GM 307214,A:3072aM :D$"BLOADALLCHAR":M N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IS IN DRIVE"::63000M!NNR60008,(994):60010,(993):(992)ĉ:::::"BE SURE PROGRARINTER":L D$"BLOADP"qL 3:"INDENTATION IN PIXELS (0-255):";:83:A(A$):A0A255(A$)57(A$)483020L 307215,A(A256)256:307216,(A256)L 3075,0L 7:"X MAGNIFICATION (1-9): ";:85:AA48:A1A93060L 307213,A2M 9:"87L((L4)(4L)7):A$R$:2304EK16302,0:63000:(ER$)27100jKK%13āA112:C(A)C(A)B%(A):qK4KK%13A%A%(1)A%A%1:114KJK%13āA112:B%(A)C(A)::J1:R$"CUMULATIVE":15:470KJ0:100K 21000 L :::"TURN ON P0:160JA%A%1:114IJF190:M%1:Y%Y%1:4:Y%YR%F1:DY%1:C%0UJ3:160yJR%0:A112:B%(A)R%R%B%(A)J:38J30,8279,8279,18030,18030,8:R%İ5:2!KR%Ĺ238,250:237,0:239,0:A$(YR%):2304:237,10:239,0:L(R$):238,27,2)):DY%((A$,2)):252,LYR%:253,HYR%:254,MN%:255,DY%:8032:A(206)256(207)sID%(A$(2,A%)):B%0:C%0:3IBDY%M%(M%)I(A)C%C%F:B%B%1:B%D%Č54915:B%(M%)B%(M%)C%:190JAA1::B%(M%)B%(M%)C%:M%M%1:(M%12)200:DY%1:C%YR%((A$(5,A%),4))B%(M%)B%(M%)(A$(2,A%)):A%A%1:114HA$(SD):A((A$,4)):HYR%A256:LYR%A256HYR%:MN%((A$,5,2)):DY%((A$,2)):236,LYR%:237,HYR%:238,MN%:239,DY%SIA$A$(4,A%):A((A$,4)):HYR%A256:LYR%A256HYR%:Y%A:MN%((A$,51)A$(1,A%)A%A%1:15:I1:R$A$(1,A%):470:GsI0:38PGtR$A$(1,A%)470wGuYR%((A$(4,A%),4))A%A%1:114GvYR%((A$(4,A%),4))Ĵ(YR%((A$(5,A%),4)))190:YR%((A$(5,A%),4))F0;HxM%((A$(4,A%),5,2)):N%((A$(5,A%),5,2)):M%N%)100$FeY%YR%:3:K%13A%1:105bFfK%12ĉ::92::"RESOURCE:";:83:R$A$:A$"?"İ54:102FgA1A%(1):R$A$(1,A)A%A:AA%(1):105Fh:102Fi(K%12)15:4:A$(1,0)A$(1,1)FnK%13āA112:C(A)0:.GrF1:K%13R$A$(1,A%):IA$(1,A%A95AA32EV(A27)10:HEZ21000:D$"BLOADCHAIN,A520":520"MENU"E[:8:A$(SD):B$(ED):"Enter years "(A$,4)"-"(B$,4):E\:8:"Enter for a list of resources":Fd::91::"YEAR:";:83:YR%(A$):YR%(((SD),4))YR%(((ED),4)2304:254,0:237,182:238,37:239,0:A$"J F M A M J J A S O N D":2304:_D&(3):D6:A1A%(1):A$(1,A):A20(A20)İ63000D7:63000:DJ"WORKING..."::"PRESS P TO PRINT":DS768:A$A$"":(7)10: EUA$:A$:(13):A(A$)::"CURRENT PLAN: "T$::"PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:A$:A$:(13):(A$)27(A$)3210C((A$)27)90:100C3:::21:74:1:0:232,0:233,15SD254,0:237,0:238,40:239,0:A$"MONTHLY RESOURCE REPORT":4A$(A$,4):(A$,1)"."A$" "(A$,3)FBL4A$" "A$:L(A$):8oB 254,0:237,Y%:238,0:239,0:2304:B D$"BLOADALLCHAR":54915:::K%12A$"ONE RESOURCE, MONTHLY (GRAPHICS)"B ::K%13A$"ALL RESOURCES, MONTHLY (GRAPHICS)"C ::A$:[AA2014040:29,A31,A::A$(R%):Y%16:7:A$(.75R%):Y%56:7:A$(.5R%):Y%96:7AA$(.25R%):Y%136:7:A$"0":Y%176:7:238,250:237,0:239,0:A$(YR%):2304:237,10:239,0:L(R$):238,2787L((L4)(4L)7):A$R$:2304:(BL(A$):L@:A$"":63990:GREPORT@D$(4):1015,29:1014,0:A112:M%(A)::D$"BLOADTIR":10:31,28,31,30,31,30,31,31,30,31,30,31@C1:A3526621:BAA10:B,180B,180160(B%(C)R%)::CC1::@M%(2)28((Y%4)Y%4):AX112:B%(X)0::iq imo 膢 ȱ " [67 l67  8ij  o> to continue)";:80::N216,0:"":63990N(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000N0"(A$(2,A%)): AM%(2)28((YR% M,OM30:X40:A$(C(1)):33:X61:A$(C(2)):33:X75:A$(C(3)):33:qMPė:D$"PR#0":D$"PR#3":" "M16302,0:Pİ63000M100M N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IS IN DRIVE"::63000M!NLNR60008,(994254,MN%:255,DY%:4485:A(206)256(207)MLYR%Y%:3:B%0:D%(A$(2,A%))_LBDY%M%(M%)L(A)B%B%1:B%D%B100M%10000Y%TDČ54915:B%B%1:9:190LAA1::M%M%1:200:DY%1:160LA%A%1:114LM%13M%1:Y%Y%1:YR%Y%:3M((A$(4,A%),5,2))KA$(SD):A((A$,4)):HYR%A256:LYR%A256HYR%:MN%((A$,5,2)):DY%((A$,2)):236,LYR%:237,HYR%:238,MN%:239,DY%+LA$A$(4,A%):A((A$,4)):HYR%A256:LYR%A256HYR%:MN%((A$,5,2)):Y%A:DY%((A$,2)):252,LYR%:253,HYR%:(A$):YD%1YD%31Ģ18:958:103BJhTDYD%100NM%10000RY%:I6}Ji17::15:4:A$(1,0)A$(1,1):A%1:C(1)0:C(2)0:C(3)0JrA$(1,A%)A$(1,A%1)A%A%1:20:4:A%A%1:A%A%(1)470Js38:((A$(4,A%))TD)7:(A$(5,A%))TDİ2:190Jt6KxM%nth 1-12":'I]16:"Enter day 1-31":Id::91:10:Y10:" YEAR:";:83:RY%(A$):RY%(((SD),4))RY%(((ED),4))100If92:14:Y14:" MONTH:";:83:NM%(A$):NM%1NM%12Ģ14:958:102!Jg93:18:Y18:" DAY:";:83:YD%7HXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84JHYA$B$:(13):HZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"H[:6:"TODAY'S DATE:":8:A$(SD):B$(ED):"Enter year "(A$,4)"-"(B$,4): I\12:"Enter mo":GPA(16384):A12880MGQ16368,0:AA128:(A27J1)10:A$(A):[GR(95);:zGSY:B$"":X15:1403,14:82GTY:1403,X1:80:A1389GU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84GVA8ĺ" ";:83GWA3284N DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0F-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045F.1:(13):CR%A:F4(CR$(1))13āA1CR%1:CR$(A);::(13);F5GJ"WORKING..."::"PRESS P TO PRINTE!XX((A$)1):8:A$;:)E&(3):E+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":MF,"PRESS WHE50:A$(DB%(1)):33:X61:A$(TCD):33:X75:A$(T):33:C(1)C(1)CD:C(2)C(2)TCD:C(3)C(3)T:DII1:I60PāQW170I:::I4DP(37)20ıD63000:15E"-----------------------------------------------------------------------------":plete":30CUC:"Want a printout? (y/n): ";:80:A110A121A89A7817CP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52CCX0:8:A$(1,A%);:X19:A$A$(3,A%):33:X30:A$(B%(1)):33:X40:A$(CD):33dDXPACE> TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210jB((A$)27)90:100 C:"Resource Last Days to Cost to Days to Cost to Total Cost":" D. Cost Date Date Complete Com4)YR%4):'ACD0:T0:D0:B%(1)0:YATT(A$(2,A%))(A$(3,A%)):DD(A$(2,A%)):eA6:190yA1403,X:36,X:A CDCDB%(A$(3,A%)):B%(1)B%(1)B%:A 54915:::J1:A$"RESOURCE COST TO DATE"RB ::A$::"CURRENT PLAN: "T$::"PRESS DISK IS IN DRIVE"::63000!H!N~HR60008,(994):60010,(993):(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000H RH23:"(Press to continue)";:80::H216,0:"":63990I(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":1:A$(1,0)A$(1,1)OGrA$(A$(5,A%),5,2)"/"(A$(5,A%),2)"/"(A$(5,A%),3,2)WGs20cGA%A%1vGA%A%(1)114G(13)GPė:D$"PR#0":D$"PR#3":" "G16302,0:Pİ63000G100H N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA:1403,14:Y:B$;:XX1:82:" ";:848FVA8ĺ" ";:83EFWA3284}FXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84FYA$B$:(13):FZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"Fd:I6Gi17::15:4:A%CR%1:CR$(A);::(13);E5IEJ"WORKING..."::"PRESS P TO PRINT":cEPA(16384):A12880EQ16368,0:AA128:(A27J1)10:A$(A):ER(95);:ESY:B$"":X15:1403,14:82ETY:1403,X1:80:A1389%FU(B$)1A8B$(B$,(B$)1)RN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":D,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045D.1:(13):CR%A:E4(CR$(1))13āA1--------------------------------------------------------------------":cC!XX((A$)1):8:A$;:oC&(3):-D+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TU89A7817YBP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52_BBX0:8:A$(1,A%)" "A$(2,A%)" "A$(3,A%)" "A$(4,A%);:X71:8:A$BII1:I60PāQW170I:::I4BP(37)20ıB63000:15GC"-----------TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210dA((A$)27)90:100A:"Task Early Start":30A B:"Want a printout? (y/n): ";:80:A110A121A )@:A$"":(4)"PR#3":" ":63990:D@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@@1403,X:36,X:@ 54915:::J1:A$"TASKS, CHRONOLOGICAL"LA ::A$::"CURRENT PLAN: "T$::"PRESS 2)6ė:"IS THE RIGHT DISK IN THE DRIVE?":630007I01015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@@1403,X:36,X:@ 54915:::J1:A$"MILESTONES, ALPHABETICAL"PA ::A$::"CURRENT PLAN: "T$::"PRESS to continue)";:80::H216,0:"":639900I(22":520"MENU"Gd:I6 WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045E.(37)20ıC63000:15qC"-------------------------------------------------------------------------------":C!XX((A$)1):8:A$;:C&(3):WD+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CA7817RBP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52XBBX0:8:A$(1,A%)" "A$(2,A%)" "A$(3,A%)" "A$(4,A%);:X40:8:A$;:A$(6,A%)"1"X62:8:"Y":22BX62:8:"N"BII1:I60PāQW170I:::I4 CPCE> TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210hA((A$)27)90:100A:"Milestone Early Start Criticality"::30AB:"Want a printout? (y/n): ";:80:A110A121A89A8 )@:A$"":(4)"PR#3":" ":63990:C@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@@1403,X:36,X:@ 54915:::J1:A$"MILESTONES, ALPHABETICAL"PA ::A$::"CURRENT PLAN: "T$::"PRESS to continue)";:80::H216,0:"":639901I(20":520"MENU"Gd:I6=Gi17::15:4:A%1:A$(1,0)A$(1,1)zGrA$(A$(5,A%),5,2)"/"(A$(5,A%),2)"/"(A$(5,A%),3,2)Gs20GA%A%1GA%A%(1)114G(13)GPė:D$"PR#0":D$"PR#3":" "G16302,0:Pİ63000G100FH N60008,(99:A1389PFU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84cFVA8ĺ" ";:83pFWA3284FXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84FYA$B$:(13): GZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A52.1:(13):CR%A:DE4(CR$(1))13āA1CR%1:CR$(A);::(13);JE5tEJ"WORKING..."::"PRESS P TO PRINT":EPA(16384):A12880EQ16368,0:AA128:(A27J1)10:A$(A):ER(95);:ESY:B$"":X15:1403,14:82 FTY:1403,X1:80ARD."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":D,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045E(37)20ıC63000:15rC"-------------------------------------------------------------------------------":C!XX((A$)1):8:A$;:C&(3):XD+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE C7817SBP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52YBBX0:8:A$(1,A%)" "A$(2,A%)" "A$(3,A%)" "A$(4,A%);:X40:8:A$;:A$(6,A%)"1"X62:8:"Y":22BX62:8:"N"BII1:I60PāQW170I:::I4 CPACE> TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210iA((A$)27)90:100A:"Milestone Early Start Criticality"::30AB:"Want a printout? (y/n): ";:80:A110A121A89A9 )@:A$"":(4)"PR#3":" ":63990:E@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@@1403,X:36,X:@ 54915:::J1:A$"MILESTONES, CHRONOLOGICAL"QA ::A$::"CURRENT PLAN: "T$::"PRESS to continue)";:80::nI216,0:"":63990I(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000I0(::J1:A$"TASK EXPENSES, CHRONOLOGICAL"\A ::A$::"CURRENT PLAN: "T$::A%1HA%A%(1)114#H(13)EHPė:D$"PR#0":D$"PR#3":" "^H16302,0:Pİ63000gH100H N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IS IN DRIVE"::63000H!N IR60008,(994):60010,(993):(992)ĉ:::::"BE SURE 520"MENU"Gd:I6:Gi17::15:4:A%1:A$(1,0)A$(1,1)GrA$(A$(5,A%),5,2)"/"(A$(5,A%),2)"/"(A$(5,A%),3,2):B$(A$(6,A%),5,2)"/"(A$(6,A%),2)"/"(A$(6,A%),3,2)GxA03:T((A$(A9,A%),3))(A$(A13,A%))T:GCCTG20:T0HA%1389MFU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84`FVA8ĺ" ";:83mFWA3284FXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84FYA$B$:(13): GZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":1:(13):CR%A:AE4(CR$(1))13āA1CR%1:CR$(A);::(13);GE5qEJ"WORKING..."::"PRESS P TO PRINT":EPA(16384):A12880EQ16368,0:AA128:(A27J1)10:A$(A):ER(95);:ESY:B$"":X15:1403,14:82FTY:1403,X1:80:A."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":D,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:A0D-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045E.7)20ıC63000:15oC"-------------------------------------------------------------------------------":C!XX((A$)1):8:A$;:C&(3):UD+::"NOW TYPE THE CONTROL CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARDA110A121A89A7817iBP0:A89A121P1::"TURN ON PRINTER":63000:(21)::D$"PR#1"::52oBBX0:8:A$(1,A%)" "A$(2,A%);:X35:8:A$;:X47:8:B$;:X65:A$(T):33:X77:A$(C):33:BII1:I60PāQW170I:::I4CP(3"PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210tA((A$)27)90:100A:"Task Early Start Early Finish Task Cost Cumulative":30AB:"Want a printout? (y/n): ";:80: )@:A$"":(4)"PR#3":" ":63990:H@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@T0:C0:@1403,X:36,X:@ 54915:::J1:A$"TASK EXPENSES, CHRONOLOGICAL"\A ::A$::"CURRENT PLAN: "T$::          S IN DRIVE"::63000J!NwJR60008,(994):60010,(993):(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000}J RJ23:"(Press to continue)";:80::J216,0:"":63990J(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000):LB$(A$,L3)>IqA$A$(9,A%):L(A$):LA$(A$,L3):135HIxA$""PI20\IA%A%1oIA%A%(1)110zI(13)IPė:D$"PR#0":D$"PR#3":" "I16302,0:Pİ63000I100J N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK IRHZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"\Hd:I6Hi17::15:4:A%1:A$(1,0)A$(1,1)HnB$"":AA$"":C$"":A$A$(12,A%):L(A$):LAA$(A$,L3)HoA$A$(11,A%):L(A$):LC$(A$,L3)IpA$A$(10,A%):L(A$):GR(95);:0GSY:B$"":X15:1403,14:82NGTY:1403,X1:80:A1389GU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84GVA8ĺ" ";:83GWA3284GXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84HYA$B$:(13):A0BF-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045XF.1:(13):CR%A:F4(CR$(1))13āA1CR%1:CR$(A);::(13);F5FJ"WORKING..."::"PRESS P TO PRINT":FPA(16384):A12880GQ16368,0:AA128:(A27J1)10:A$(AHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":F,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";:;:A1316:X1015(A12):A$(A4,A%)""A$((A$(A,A%))((A$(A4,A%),3))):33^D:::D"-------------------------------------------------------------------------------":D!XX((A$)1):8:A$;:D&(3):E+::"NOW TYPE THE CONTROL C63000:15|C"DAYS:";:X23:8:(A$(9,A%),3);:X38:8:(A$(10,A%),3);:X53:8:(A$(11,A%),3);:X68:8:(A$(12,A%),3)C"DAILY COST:";:X25:A$A$(13,A%):33:X40:A$A$(14,A%):33:X55:A$A$(15,A%):33:X70:A$A$(16,A%):33:RD"RESOURCE COST:""TURN ON PRINTER":63000:(21)::D$"PR#1"::528BBX0:8:"TASK: "A$(1,A%)" "A$(2,A%)" "A$(3,A%)" "A$(4,A%):"RESOURCE: "A$;:X35:8:B$;:X50:8:C$;:X65:8:AA$B25BII6:I60PāQW170I:::I4BP(37)20ı CT$::"PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210yA((A$)27)90:100A:"Task/Resource Costs":30AA:"Want a printout? (y/n): ";:80:A110A121A89A78172BP0:A89A121P1:: )@:A$"":(4)"PR#3":" ":63990:I@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@T0:C0:@1403,X:36,X:@ 54915:::J1:A$"TASK/RESOURCE COSTS, ALPHABETICAL"aA ::A$::"CURRENT PLAN: "!!!!!!!!!!!0IS IN DRIVE"::63000J!NxJR60008,(994):60010,(993):(992)ĉ:::::"BE SURE PROGRAM DISK IS IN DRIVE":63000~J RJ23:"(Press to continue)";:80::J216,0:"":63990K(222)6ė:"IS THE RIGHT DISK IN THE DRIVE?":63000$):LB$(A$,L3)?IqA$A$(9,A%):L(A$):LA$(A$,L3):135IIxA$""QI20]IA%A%1pIA%A%(1)110{I(13)IPė:D$"PR#0":D$"PR#3":" "I16302,0:Pİ63000I100J N60008,(996):60010,(995):(992)ĉ::"BE SURE DATA DISK SHZ21000:(21)::"WORKING...":D$"PR#0":1002:D$"BLOAD]CHAI,A520":520"MENU"]Hd:I6Hi17::15:4:A%1:A$(1,0)A$(1,1)HnB$"":AA$"":C$"":A$A$(12,A%):L(A$):LAA$(A$,L3)HoA$A$(11,A%):L(A$):LC$(A$,L3)IpA$A$(10,A%):L(AA):GR(95);:1GSY:B$"":X15:1403,14:82OGTY:1403,X1:80:A1389GU(B$)1A8B$(B$,(B$)1):1403,14:Y:B$;:XX1:82:" ";:84GVA8ĺ" ";:83GWA3284GXX16(B$):B$B$A$:1403,14:B$;:(B$)12İ82:84HYA$B$:(13)::A0CF-AA1:BA:J1:80:J0:AB:CR$(A)A$:(CR$(A))13A1045YF.1:(13):CR%A:F4(CR$(1))13āA1CR%1:CR$(A);::(13);F5FJ"WORKING..."::"PRESS P TO PRINT":FPA(16384):A12880GQ16368,0:AA128:(A27J1)10:A$(CHARACTERS THAT FORMAT TEXT PRINTING FOR YOUR PRINTER & INTERFACE CARD."::"BE SURE THE CONTROL CHARACTERS TURN OFF THE VIDEO DISPLAY (E.G., CTRL I0N).":F,"PRESS WHEN DONE, OR PRESS ALONE TO NOT ENTER ANY CHARACTERS."::"TYPE:";";:A1316:X1015(A12):A$(A4,A%)""A$((A$(A,A%))((A$(A4,A%),3))):33_D:::D"-------------------------------------------------------------------------------":D!XX((A$)1):8:A$;:D&(3):E+::"NOW TYPE THE CONTROL C63000:15}C"DAYS:";:X23:8:(A$(9,A%),3);:X38:8:(A$(10,A%),3);:X53:8:(A$(11,A%),3);:X68:8:(A$(12,A%),3)C"DAILY COST:";:X25:A$A$(13,A%):33:X40:A$A$(14,A%):33:X55:A$A$(15,A%):33:X70:A$A$(16,A%):33:SD"RESOURCE COST::"TURN ON PRINTER":63000:(21)::D$"PR#1"::529BBX0:8:"TASK: "A$(1,A%)" "A$(2,A%)" "A$(3,A%)" "A$(4,A%):"RESOURCE: "A$;:X35:8:B$;:X50:8:C$;:X65:8:AA$B25BII6:I60PāQW170I:::I4BP(37)20ı "T$::"PRESS TO GO ON OR TO RETURN TO MAIN MENU: ";:80:J0:(A$)27(A$)3210zA((A$)27)90:100A:"Task/Resource Costs":30AA:"Want a printout? (y/n): ";:80:A110A121A89A78173BP0:A89A121P1: )@:A$"":(4)"PR#3":" ":63990:J@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@T0:C0:@1403,X:36,X:@ 54915:::J1:A$"TASK/RESOURCE COSTS, CHRONOLOGICAL"bA ::A$::"CURRENT PLAN: """""""""""1 (C) 1986 GARY B. LITTLE MAND:":& 0" ]BRUN AMDOS.LOAD":L :"TO INSTALL AMDOS AFTER BOOTING"l D"A STANDARD DOS 3.3 DISK."t N: X"TO FIND OUT MORE ABOUT AMDOS, READ" b"THE TEXTFILE 'AMDOS.INFO' BY RUNNING" l"THE PROGRAM CALLED 'RUN.ME'." COPYRIGHTOCTOBER 25, 1986d:0"AMDOS 3.5"Y,"COPYRIGHT (C) 1986 GARY B. LITTLE"_{"ENTER THE COMMAND:":" ]BRUN AMDOS.INIT":"TO FORMAT A 3.5-INCH DISK SO THAT""IT WILL WORK WITH DOS 3.3.": &"ENTER THE COM###GARY B. LITTLEdD2:KB(49152):KB1285205 :49168,0:KB155490L X(12):D$;"CLOSE"p (SL0SL3)ĺ(21):D$;"PR#0" 32,190,222,32,227,223,169,128,133,51,32,106,253,160,0,138,145,131,169,0,200,145,131,169,2,200,145,131,76,57,213 COPYRIGHT (C) 1986 (A$):SL746$ <SL:D$;"PR#";SL:> dI030:X:768I,X:H 600\ D$;"UNLOCK";F$n ,D$;"OPEN";F$ D$;"READ";F$ PS56:FS66:SL0SL3PS22:FS23 L0 768,A$:A$:LL1:LPS500 I1FSPS:::(SL0SL3)490 2000,3SEPTEMBER 21, 1986% D$(4)9F$"AMDOS.INFO"H(21)::j"AMDOS DOCUMENTATION READER"#"COPYRIGHT (C) 1986 GARY B. LITTLE"(:"ENTER SLOT # FOR OUTPUT (0..7)"-"[1 = PRINTER, 3 = 80-COLUMN]: ";.A$:A$(13)46 2SL$$$$謠㮬쬠ɬۨݮ٠占嬠䠳򠨤堸ˠ鵰ӭ嬠Ӡ󍠠󮬠㮬嬠報ìﬠۨݮӠӠ퍠àӬ䮠ӧ占堹󍍠Ӡ썠ӠӍӠ場ˠ䠶ˠӬ Ҭ捠ˠ𠳮ӬӠᠵΠӮč䮠庠堵堳嬠à͠廠ì堳堲􍠠Ӡ報Ӡ堲ӍР􍠠ıР占Ӡ򮍍Ӡ򍍠堵堳䮠􍠠䩠ΠӮĠӬӮ占ӧ썠Ӡ򍠠Ӡˠ占ͬ報͠ӠӬà뢠΍ӮĠӠ뮍Ӡ󍍠ӮҠӭЬ占ӠӠӮ嬍ӮԠӮĠӠ󍠠䮍Ӡ󍍠ĩàȮĮӠɠ宍Ӡ䍍Ӡ報ˠ䍠͠󠲱ɠĠӍӠ련Ġ桩àȮĮŠ򠠠İǍŠĬ̴ŠĬ̴Ġ嬠Ԡ˨ĠĠ䮠󠱶占頠±Ġ¹àĠĠ¹ Ġ¹ĠĠĠ¹àĠĠºĠàƲºĠàƲİǠ̠µµƺµƺµĺàĺà±򩠠Ġɠ򩍠ˠĠˠčĠĠĠč̠Ġ󠱠䠲덠堲ˮĺĠĠ䮍ĠӍĠӠ򍠠퍠ӭ䠳占䍍Ӡ䬠Ԡ䮠ᠵ묠獠ӠӠӍΠӮ􍠠笠ƠƠ򍠠Ӡﬠ獠ӠԠ򠳱Ӡ卍ӠƠ䠤°ŮӠ占򠴰ˠ퍠򠲱򍠠젱󠱠렱堠堲嬠占䠢ǬijӠ󍠠䮍Ӡ䠳뮠占堢ı䠢ij捠Ӡ䍠報堢IJ䠢Ĵ䍠䮠䍠ɢ宠占宍ӮԠ䠳ˍ堵ΠӮԠ䮠占嬠䍠占ϠӮӠ䠳묠Ӡᠵ뮍ᠳ묠ĠϠӍөᠵ묠΍ӮĠ䬠ﬠ􍠠堳宠󠵠占렳堳嬍덠Ӡ䠵宠Ӡ렠Ӡ󍠠占堸ݍӠ䍠Ӡ%%%%%%%%%%%%%%%%%% % % % % %%%%%%%%% >H ߼HȄGDH &GFHJfAeFFGHHHH Fi FGiGhJH CH>ȱH? -hh8E@ HH) Hj D>>D@E hh߼!h> H(`B ǐ@+ Hhh8$AE`LHhh8$AE`LPLHJ ӂ ,ӂ sӠ䮍0胝Lhh L{HH`H h)HhLCǮ B @ `8` ®卍肹냙[`O ܂ sԠҠ堨 ɱɸ )H h Ԃ0> s肙LǍӂ / XɿY sӠ䮍L sӠ򠪍Ӡ렳&&&&&AE`CHJJJJ -HǍ,HFGDEB EEFhhh /L /Ll CH>ȱH? -hh8E@ HH) Hj D>>D@E hh߼!h> H(`B ǐ@+ Hhh8$AE`CHJJJJ -HǍ,HFGDEB EEFhhh /L H(`B ǐ@+ Hhh8$LPLHJ >H ߼HȄGDH &GFHJfAeFFGHHHH Fi FGiGhJH HȩH_ J` X iҺ뮍 GL̊!\`hh LqHH`H h)HhLCǮ B @ `8` HIHHHHhHHHHʎ  h`hhLhH  LHHʎ  LhH  LHȩȩȩȭr0ș'z42ȩ ȩ<r>C|  Lr󮍍Ӡ󠳱򠲱젱 Gݍ0L HIHȭqHȭrHȩHȩHHȩH HFG sB(Lrqq rqq iŠӷı X iΠŮźĠ荠Ӎ Ld X i俠3 jLu7 i堳ݠ ) X ič GLBsBq CDEҠ堨 ɱɸ W)p p Xy0B i GLǍ iŠҠ򠲩 ɱɳ Z)qqӠ堬IJ䍬Ĵ堲庠ӠԠ䬠ᠵ宠ԮԠ¥ u7 X i렳Ӡ젴ˠ報堬ı䠬ijᶰ󮍍ӠŠݍ,ɠ̊Ɋ!ϊ\Q[`O㩠®卍宠򠳰䍤ծӮ򠤲᩠ﺍӠŠî􍠠®îᠠֶ ͳ캠  / XɿZ iӠ䮍L iӠ򠪍Ӡ렳'''''''''''''''̴źĠӠנΠĮԠŠĠˬΠӠ٠٢̠ǠĠˠčĠč̠µƺµĺà±Ġ¹àĠ¹ĠĠĠºĠàƲİǍŠĬ̭ĠưĠĠŸİƵàİĠĠĴøùijùijŠƠĴöùôĠĠð ĠðİǍ̺ԺźȮĮŠҠӠԠé٠®Ţ(((̴źĠӠנΠĮԠŠĠˬΠӠ٠٢̠ǠĠˠčĠč̠µƺµĺà±Ġ¹ Ġ¹àĠĠºĠàƲİǍŠĬ̭ĠưĠĠŸİƵàİĠĠĴøùijùijŠƠĴöùôĠĠð ĠðİǍ̺ԺźȮĮӠҠӠԠé٠®Ţ)))êŦƥ堠ѥԀհť՞ŠÊĨȘƸx` X L !   - `" X    i( ! o , и` X$i( " X , +QQàҠ蟠ՙ蠌â蠹鰠ѠMŠ𻩠éȰ堤ȠzȥŃ蠠栠Ϡ砠Ū𠠺蠉ʱ̠ŲŅӬƠŠ蠠ƠϠ堠𠁠Ʌ΁ӠčϠՠȠϠŠԠٿŠōȠĠՠſĠĠ٠ӍŠӍǍˠӍԠԠōŠΠˍˠӍ٠ӍԍĠΠ͠ԠŠҠƠŠǠӍӠ٠٠ϠŠčӠōōϠӠćˠ̍ˠŠčŠčɯϠҍĠԠ٠ϠΠ͍123 2 1LŠ۠ŠҠנŠŠҠŠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿ$:GRc*1DNSjwŠԿſΠԿſſԠӮӠþϠΠϠΠՠҠ٠Ҡ٠Ϡ΍٠ӮŠΠL   LϠ젃Š𠁠Ƞɠź̪ӯؠԉȠҠńϠ̠̠ΒȤŠ͠㠩υe h QQQQQ<JWdv&crK.М LHHH?!=>@AH IL=K>Lhhh`HHH ; ( L -hhh` : :  ,% f f4,$ ɀ@  RSQzmVVW` `DE]^ /].^ E̞`DE `HHH/.0+>0jj.9hhh`( 0L 0㎓/%` f`RS`KȱL`KȭL`DERS ` ` I,`DE]ȹ]Ȍ  E`,0 /R.SDE$,/ ` f` : :   oOɃ  hhhhhh`+t+TPɍɬC+L,)  o : L f f`   t+L:,     `H jjH9mmL[mmhh`  # L# # 3,0ޭR S   ` .H h. ` % fɽQ ʎ`8`HH Uɽ"̦̦88hh` ȹHH`%) ` f `,%0 f `,% f ` f` `  f `hh" XL  ̅ $T+  # o? : L  hh` %)`ʽQ08`  `  ?,06 /,0&莤 ,0欧ȌP8``ȈQ`  UɽQ 莣Ȍ`8`  U$'   hhh`, `Hhݯ`h`# q  ` Y  # LK ` RRSS`R S8`RSDE  `iiiQLk RLk H m hLk S%RQrU o00Щ莢ɽదɬUɽ̢ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : 7 , ͭ) ; # ͭ  ; ` o ɱɸ" L; )  o ɱɵ# L_ )`  o ɱɸ" L ) o ɱɵ# L ) ##` L N D   , b Y L> b @   Lvم38x` X L !   - `" X    i( ! o , и` X$i( " X , ****************** * VsL BKBɿ ɽA6H h B B( CLs BʠL5 y L Vj ުP ` Ѕ    L sq x ~ vL~ҝ  Oտ@BBB BBB2B:NdB]yLRVɄ; ̢ B B BR )QHJJJJ phLp `,ɛ` CL DF DF / B BL/LQlRmUrꭠ`LÿL̿LLB  ,hإDLk]L7: 1L'MLL`,@ lPmQPi  Q3LclL`LLpL  $6hhА ,tpso`TLISPA p!p xxLMlLڍhhیڬ<۠x )ڠ8۬ڰ(HH `ȹ0,Ȍ ɍ  ɠ )?, @, LB LƠ LLւ&LݩLL#B B!P`L":"ONCE THE ROUTINE HAS SAVED ONTO THIS DISK, YOU'RE DONE...YOU MAY REBOOT WITH"%"THIS DISK. FROM NOW ON YOU MAY DO GRAPHICS PRINTOUTS FROM THIS DISK WHEN- EVER YOU WISH.":63000:6w21:10:"(C) 1986 BY ABRACADATA"::5:" BY DON FUDGE & MARY CAROL SMITH";::"(PRESS SPACE TO CONTINUE) ";:B$:(13)::216,0:"":"IS THE RIGHT DISK IN THE DRIVE?":63000:(4)"RUNHELLO"(4)"MRY CAROL SMITH";:F:"(PRESS SPACE TO CONTINUE) ";:B$:(13)::216,0:"":"IS THE RIGHT DISK IN THE DRIVE?":63000:(4)"RUNHELLO":16304,0:16301,0::900:10:115300104,64:16384,0:(4)"MAXFILES1":(4)"RUNMENU" ::"/K0,"":(4)"PR#3":" ":63990:I@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@T0:C0:@1403,X:36,X:@ 54915:::J1:A$"TASK/RESOURCE COSTS, ALPHABETICAL"aA ::A$::"CURRENT PLAN: "K0A"":(4)"PR#3":" ":63990:J@D$(4):43:1015,12:1014,0:A112:M%(A)::10:31,28,31,30,31,30,31,31,30,31,30,31@T0:C0:@1403,X:36,X:@ 54915:::J1:A$"TASK/RESOURCE COSTS, CHRONOLOGICAL"bA ::A$::"CURRENT PLAN: z2      ͠