`L i=L\Ʃx ? N'i  ͭЅ?0ȱ Ѕ?iȱi lԠԠ͠ԠϠŠͮŠ SYSTEM.APPLE   L$JLјJ 8彐.mĿ"Š>?( X֮ˍL հ˩($8` Ґh Hǹxhx N`8Ύ߽0|ϩHhHh ӈ ө ө ӘVYԦΝYԮߝꪽԦ ө  Ͱ()I يJJJ(jǩF؅G(  7ֈ k( F G  Xj0 Ю $Ӱ8 xH ߩ`Ǚx kh kL~ѩ@(LYLWҭH͍h (ͥpi)ͥˤ˹HH(x rh(`~Ȍ``hhh )hJ¥jJJhhihhhJi֍hhha [U8ſƅh)x h H('eƍ8ƅи ĘHH`ߠ ߮  TERMINAL.DATvg MILESTON.WRKbR0(APPLE1 (& SYSTEM.APPLE$g&O SYSTEM.PASCAL$giOPSYSTEM.MISCINFOEPl SYSTEM.FILER$g)lSYSTEM.LIBRARYg9SYSTEM.CHARSETg析FORMATTER.CODEg蠔FORMATTER.DATAg蠚MILESTONE.CODEg&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xH&x'8*7Ixix&&  ') + &п x) ++`FG8`0($ p,&") (jJJ>L+ "?I>  N `  ` x V Nx .x- z `V0^*^*>` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`& ө ө ө ӽ`Hh`Q꽌ɪɖν*Ͻ%ϙEΈ 꽌ɪ`8` Hh݌`  $(,048<@DHLPTX\`dhlptx|Հ؈䤨谴T}iU･~R콥S~8vw\vȥ]vv\w]V𽥃WlXx |ƄRSL{ȱȱńRRLSҠXx ~~~~LSҠXx P~Qȑ~LSҠXxX XY |0 L\Xx t|ut}|=0 8|8|}8||ȥ}|MHLHlLSH|8|}8z|~{|@|:~8|~(~8 ~8~Z[ 8~Z[LѠP~ ~i jik|Lhj ~|it}iu8ttXutY|i h0 L LllL=LC/ L ߰8L ߦt~ hI=+ L ߤt~I= ~ LȄHHL;hh tuLhhVtWu\z]{XiXYt8xtut8xtu8tTERFAC3LABEL MOD 'NOT &OF OR (PROCEDURPROGRAM !PACKED +REPEAT RECORD -SET *SEGMENT !SEPARATE6THEN TO TYPE UNIT 2UNTIL USES 1VAR WHILE WITH ))))?)`vߗ߸)))@#AND 'ARRAY ,BEGIN CASE CONST DIV 'DO DOWNTO END ELSE EXTERNAL5FOR FILE .FORWARD "FUNCTION GOTO IF IMPLEMEN4IN )INe ~a{8 ~ȱa {8 LT0:A[_ ҕ~L+݈qȱi~8A ݅ȹ݅ȱ~Ɔ4i Lȱ|ȱ}|ȩȥ}ȩLݠȑȑ~uHtH`,BMcބޥHH8(iPH ۠'(hH'O'OhhmhLۭJL80%`M8$LLLhhhhhhhhץHH` ܩȑآL ܥ8ؘ ܩ؈ȩؠ#hthuhhhheȱÈ jh`@ fנ f׭0`L` CLL۠LۥHH j ڥhhLۦ vې` ۤOȄ`H$)A[hIH80(hI`i(L8(hI`LۥJ) )i i`¥ĥ`` - 9HL r 9 MȽ`H 9٠L rH $h`   -y6=CLjO808 0PLڥ8 0 ۥ``) ` )? Lvۢ 8` GڅFڅl```LۥH ۠' `H 9٠ hlQ`) թ` 9 Ȣ`JJJJ ϱ` r,p 0*P$ ۤ b ۢ`H - 9٠L r׊H 9h ɢ`) 2 r׭0` r׹)` ( `) ' r׹J)?L I@L3؊  L3؎,QLxת,c*A[ Lע0H)@hILө Ъhhh(`N`hhhhhhHH)> ` Yܠ0* )` r׮ ؎`(54#ƊgƈЪ 6`י ֙QRTW = Э*0 LqŐ`8Hh`HHH*@^]U)j7 [ )L3~ lJf)jjAUIL3ة0 $ڐ> L׈ ϐ8 (ֹH 7֥ +ֹP 7 7)*Ȫ`FG8`0($ p,&"VU>)Q>jj``P@J I*I `\xDŽ XׅІ X?;78H<8H  8`Ί aՍxՍՍՍե>?Ռ8T8ՌWuՌvՠ ýI꽌ɪ꽌ɭ蠪ϮәVE]ӾV]H)]ӾV]ԙ)]ӾT]ԙ)]ӦΨ 8$hU>`ȅSϭ߅83IߐiżQHPH ~P~ȱP~~P꽥QLSҠ RhPhQLE RR8tSut\ȱt]X i RHLfRtȱRuVt tVuWRTȱRU｠RXȱRYRRR콆SLSҠ8|}`|ȱ|L8||tȥ}|utetȱtet|8|}Ƅ`t et HHH> o>HBtCu\8t\]u]\Z][ 8\Z][Lѥ]H\HuHtHAH@H > ޽Р SYSTEM.PASCAL Insert boot disk with SYSTEM.PASCAL on it, then press RESET#usthL'hح/0 !"opqr)VV#$6| 4 v$PASCALSYUSERPROGDEBUGGERPRINTERRINITIALIGETCMD FILEPROC 0LސLh)thh)htLީ lhvhwhthuEw0uwtv/1'u0+!hthuhthuHHLMhHHLMҩ%lHHLMhhh |~hve| z~~8|eztl8冨Lߤ 0 8`hh ߦt~LL'   UF_f^L#ޠ UhvhwhthuXY^LOޱtvtuvw_LްLL~hvhwv~`ޅvaޅwhthutbޅtcޅutvv ȱtvtv %l HHL;ҩHHL;ҢhtExx0tEtttx u|f}jtz) wzf{jv8vtw݅x݅yyHxHxyyHxHxu9݅xy9݅yyHxHxyt yHxHHviHLMҩHHLMҩHHL?? lXLLdeeƄL;ҥ8傅ń 8冪8冪ƂL;hh&eȹ|ȹ}f)1|)uf}|jjj)?tłetu9 fHHLMҦfHHLM @hhHHHHhzh{h|h}}Lݥ{)L8z|~{}Lݥ|)h |he|Ȅ~ Ȅtl ڦ|8|e| h9 0 ~ʚLM ڦ|| hI9~ʚLM |0| h~ʚLM҅ztzx{yxtezʥ|x}y~xF|}H|HLMҠX hh&ńL;0HxH{HzHezHHL.h|h}hzh{hxhyx~ȱx|80~~ iff~z ~=݅~=H~HLMhthuh|h}hzh{z ݅v%tt݅w%uu|80tuutvwwvi t&uv&whxhyx~ȱxvI%~t~wI%u~xȥxLMhhYLShhhihjhkXi&jhȑjL;ҠhhjL@ٱhjL;LѺtutLLMҠ Uhe^xhe_yxHxHL;Ҡ Uhe^he_HHL;hh Uѥ_ ^&L٥^_ ץhexheHxHL;ҠXXz{hh &hexhef"f fefd8de8&&`ffefd&&`hhhh ץIiIiHHLMhhhh ץHHLMhthuhvhwxyEw0wy)xv!y0uEy0yutxyLMLXYXXYYHXHLXYYHXHXXYeXXLMhthuhh8tuHHLMҩedff dedeeefefdff`hh0 hhL}hh"IiIiIiIi ץHHLMҺHHLBנdeLѥIiIi报IiIiƊ8冥凰 ` ei捠8XYLSҥXiXYLS hthuhvhwt&uZvȥ[vZetZ[eu[8\Z][LL; hthuZtȥ[tL;hthutZȱt[潩L;ҩlLhh0HHLMҨIiIiHHLMhthuhheteuHHLMhIihIiHHetjktLhjhjhhL;hthuhettheuuHtHLMhhhthuhettheuutLMhhhihjhk ULhthuhh%uH%tHLMhthuhhuHtHLMhhIHIHLMҩXXhhQX0XōiX`0\XE0XLXŌC?8XX&XeYe  Íáɡ 럚肚X  šš  ġš  šš!ꂚꂫꕫëS  ! "ˡ! "ˡ ë  qT8T "ˡUĄ쓡"á  :"ë á 쓡ת$ (   d˯7 H Pצצ22ȡ523 ,ȫ$* "ë넡, ~ *Í2~ š˄ `1 b~ éÍ~  , %ɡšɡš  PꟚšw#ńE z 0 ń Ȅ! ~Í`~W ˡ! !~q|3?Bp  v\EL "$&(*,.02468:<>@BDFHJLNPRBx-~}cy*צ LEXTOKEN IS: 02"KKKK@LLNOOTQ<< xH$V ,  9   &*$á09ō>##$ á> á>>á>낫š ꓡ5š땫Ě@6"á1ꓡ삫Ú š K6"á61 ɚ V @VBBChCfDEE>FFFhGGXHHH"JbJJתPńȄ ,ń.áš蕿@šQȡ2 š:X f Ą ɡ 쾿  .Tá " * ȡ*ńȄ4šáR há1á4   Q lMȡš ȡ뾿  + d>š oɡa   áá0Oš *š  4TzY 000á'4á 0z00 rT\  ɡ'áצ-32768 ^ 逫-ġ>o00ń0ˡ +á! "ˡ  +Uz    00áQP 0á0 é000+-Í-ë0 á1 š5    šš$ !邚邫镫ë퓡h  ! "ˡ ɡ!  ! "ˡf á3 á,  )á á ávˡ á cń# Ȅ ꚹ6áÄ7  .*3 ȡ 23aĩ3zȄ 23aA22š*á ?צ:22ȡá;2á!2ȡ5252š[ץ22š2222ȡ2š5252á4w4]ץ11á4\1šV42233z 3042221é42é1Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$.GRAFׯצ.FOTO8FNo user programתP8F0:::::&:(xáצAssembleצCompile what text? ( ׯ,á(+(צ.TEXT888Ä8E$ á"ˡ"& E ##&EáN R3b9Q[Ä-D8铡6!~? *~?=FצPut in :P?FP'Ǡȡ*EEתE&VX X9   /13579;=?E&* 5?š?ˡ?ء "ˡ6ߕނ߂ɡ F b6ب"́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ7OQ QQQRš.[öO3fj <4  šˡ 퓄 Ä퓡w š   ɍL  "ˡ.ˡ   d쓡 צ to continue) <! ȡ   צ0H" ġ  *@#3$$&ˡ 3 36% "ˡ$צ Can't find ::9 ƀצ:9 ƀ:SYSTEM.SWAPDISK&:(7,*SYSTEM.WRK.CODE[*]ת{צTo what codefile? ( צE,á2צ$̶8FNo debugger in systemתP8F6:::&:(xáצAssembleצCompile what text? ( ׯ,á(+(צ.TEXT888Ä8???תY6!  ת&צP%[VTUWX%Y7888% š tWelcome ?, to Apple II Pascal 1.1Based on UCSD Pascal II.18 6øYצ???JanתצFebMarתצAprMayתצJunJulתצAug Sepת צOct Novת צDec ???תצ?????? *SYSTEM.WRK.TEXTײ& צ*SYSTEM.WRK.CODE ,  7 :9CONSOLE:ת(:9YצSYSTERM:(8:99988:9  6 ۪1٦׷)צ: ܢܢH d    Y0&תת.ת Ɓf(ߡʁ% ʁbʁ%́bʁ%́%Y;??ٟá'C צCONSOLESYSTERMצGRAPHICPRINTERצREMINREMOUTz>77:: צ:SYSTEM.LINKERƁ&̨<́b ́cʁcȡ~ؤ́dʁdתʁd0ʁdʁd؞&"á*ʁd ضá0?ʁdצ*SYSTEM.STARTUP(߫7́%́eʁ%ʁeȡlضʁ%ʁbQ́fƁfʁdƁfƁ&ʁ%ʁݢʁݢʁʁݢʁݢʁݢʁݢ  ʁ تٞ&"á ~٤  :SYSTEM.ASSMBLERת :SYSTEM.COMPILERת :SYSTEM.EDITORת :SYSTEM.FILERתʀ=ʀ* ʀ́ʁܢGʁܢHʁܢIʁܢ%O tƀ&́ʁܢʁʁܢʁܢ%́ݲ ʁݢʁݢʁݢʁݢʁݢ ʁݢʁݢ ʁݢ ʁݢ ʁݣ  ʁݢʁܢ́ʁݢ٢ š٢ ٢٢ 4$  ؗ(/  ؗ(tDoo odoo'z*SYSTEM.MISCINFOתPƀƀerror: (צUnimplemented instruction(צFloating point error(uString overflowת(]Programmed HALTת(EProgrammed break-pointת(&nS5  oYC: *( vol not foundת(file not foundת(צ dup dir entry(צfile already open(צ file not open(צbad input format(disk write protectedת(bצillegal block #(Jצillegal buffer address(+$fO7  y^Hצ IO צSystem IO error(צ unknown cause( parity (CRC)ת(צillegal unit #(illegal IO requestת(צdata-com timeout(vol went off-lineת(file lost in dirת(צ bad file name(צno room on vol( vol not foundצUnknown run-time error(צValue range error(צNo proc in seg-table(Exit from uncalled procת(Stack overflowת(צInteger overflow(Divide by zeroת(צNIL pointer reference(צProgram interrupted by user( "ˡ$צ Can't find ::9 ƀצ:9 ƀ:SYSTEM.SWAPDISK&:(7,*SYSTEM.WRK.CODE[*]ת{צTo what codefile? ( צE,á2צ$צCurrent date is C -C-C 99ȡצ"(C) Apple Computer Inc. 1979, 1980צ(C) U.C. Regents 1979%System re-initialized 6:rNP  צP%[VTUWX%Y7888% š tWelcome ?, to Apple II Pascal 1.1Based on UCSD Pascal II.1:(šR.%+(]ˡ([8]+(\"á%[צ Terminator=[צ , change it?)צNew terminator:[UO צ: ) Running...ء ء   Swapping is VonoffצToggle swapping? VVzNew exec name+00.0.0ȡ#+.//a/zȄ +./ ..+EXEC/ׯjUTVP+\"á(TS.OQ[QQP+  Hm% á.צNested exec commands illegal"צError opening execd Z6PO6 "ء PKצExecuteצ what fileצ? Pš7`  7 š+ š%SYSTEM.WRK.CODE׷sצSYSTEM.WRK.CODEFš5.CODEׯ.:(7,*SYSTEM.WRK.CODE[*]תצTo what codefile? ( צO,á<צ$88š8(8X+,,"ˡ  Can't open ,   áث what text? ( ׯ&,á (+(צ.TEXT888Ä8 "ˡ$צ Can't find ::9 ƀצ:9 ƀ:SYSTEM.SWAPDISK&Ʋڤ  R   88( áצ Assemblingצ Compiling...á999':::::&:(áצAssembleצCompilec(s) not available 1 \ @ ڤ  áڤ !~ e ת*U  !! !:!!ڤ  ڤ  áܡ #צMust L(ink firstƁ1ƀ:צ.Conflict between intrinsic and user segment(s)ƀצ*SYSTEM.LIBRARY ,צ Can't load required intrinsic(s)Nƀ/צ#Required intrinsi"ˡCۡ>"áIllegal file nameצNo file ́3́4ʁ4́5ʁ5ˡ  not codeʁ41ʁ5"ˡ Bad block #01Ɓ1aݡ9צ Linking...ݢ`ڤá Zxȡ2ݤˡ"ޢ`ݤۼ: TڪƁ Ɓ "á9̂.ʁ ʁ"ˡ  Ɓ Ɓ Vj ުPڶڳ@@YyÍ, 4ۢڤ ɡ$ڪP-19:!1ׯ)Illegal filenamenTޢ ȡSڤ ˡ@۳-ܢ0ۤ צCurrent date is C -C-C 99ȡצ"(C) Apple Computer Inc. 1979, 1980צ(C) U.C. Regents 1979%System re-initializedSȡU/U[,-Z N:98:9á.Y(Y*SYSTEM.ATTACH   áá'*SYSTEM.STARTUP % áá  6   ˡFצJCommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, D(ebug,? [1.1]P')%?áSF=Command: U(ser restart, I(nitialize, H(alt, S(wap, M(ake execתP')%W 6!W,z3 (not saved) No workfileS%  O ?(&Ɓ.񄓡9&צThrow away current workfile ?  ءצ*SYš š۾.ˡצ([šܕ!!(š۾:ˡ١.TEXTת .CODEת!!ȡ(ܾܾ š!!Ȅ!!P!x!P %',@@JBGD> Z`<@X áޢá ~תޢޢޢ024<& צ š š۾.ˡצ([šܕ!!(š۾:ˡ١.TEXTת .CODEת!!ȡ(ܾܾ š!!Ȅۤ  dÄÍ"ߢ ˄"ɡۤ  dáߢ  dá ߢ C#ޣC˄ ߢ C ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá ~תޢޢޢ024<& צ ) ! 767䚹 :V@28˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ ۤ Äݓۢת   ١  n ١ á9 ٓ/! !!١ˡá ~ݤݚ ˄ܟń ١á  ޤ wš  iá Ä,ޤ  ɡ"áޤ PġMáš7 ܂ۻݪ d #(   !š Í 7ÄU ǐɄ:6ń~66! šá٢.ٕ۶š ڸ۸۶ š۸ ڸ:   ȡQ  ȡ   ȡ? ȡ  ġ  á ڢڢڢڣ ڣ ١ڢ ڣ ڣ١ ڢڣڣ ڣ áڣڣš ڢڣڣ hڢ ڢ١ڢ!ڣڣ ڢ!ڣڣ ڢÄڣ &ڢ ڣ ڢ! ڢ!ڣڣ ڢڢ ڣڢÄڢ  쓡 Xצ Linking...  ˡ&צ Restarting...צ U not allowedxRpUT-Há6OKTU7AX0NNP3 "jC(,. C fpP @$ j4 6L $.1]P')%?áSF=Command: U(ser restart, I(nitialize, H(alt, S(wap, M(ake execתP')%W 6!W,z3쓡 Xצ Linking...  ˡ&צ Restarting...צ U not allowedxRpUT-Há6OKTUl5 FILEHAND ''k'ȡKk'k-'' ܡšڡK N Y˄ &"&& & ܡ&'&צc& آצ ? ) ,áYø۪     0ު(áܲ~ %&ܥKO &&ȡuáצ fܪ(G[!nء CGGá+á &"ˡ~[צ[ ˡ  .  sآWצ:آ(Y?::á ;&Pġ - عEXå[ׯGC81(o* MJLN0A$6Uۡ &Pɡ צ, áצ "  ڪ٪ت&:&Pɡ(š --> 4ثضÍצ$*á-: : in unit  ء ߓ  ٨š5K ˡ*   ġ" ء " N۪ڪƁK""áN׷9& צ ?  ɡ& Invalid #aP  ˄8&Destroy Gצ: ?  J ٪ # ת á 1 0 ء,ˡ   ߓ`&צPut " ȡ3پ!}ȄپaپzȄ پaAצI T  ܪ۪ڪ-ˡ[ ġR&    צ ? (Y/N) - -F&צ ? expected1(& Ş"˶ I/O error # 4!צ Filer error # ء\&),áY 6(saveת(Wildcard not allowedת(צ"Bad form (Wild Non-Wild) card(Ill file/vol nameת(}Ill change (Vol file) nameת(UBad dest for files foundת(4,"iEbUġ#(צ  File foundת(צBlkd vol( Unblkd volת(צ File name(צFile/(unblkd vol)(צFile/(blkd vol)(צFile/vol(Vol nameת(צOutput file full(Workfile is savedת(No directory on volת(No workfile to ת(Vol went off-lineת(File lost in dirת(|צ Bad file name(fצNo room on vol(ONo such vol on-lineת(3File not foundת( t`K1ٹVol already on-lineת(Text file lostת(צCode file lost(Gצצkת{צcתת(WצSתԦת(KצOת  n`Äצ(ڹצParity (CRC) error(Bad unit numberת(Bad I/O operationת( Timeout error4Copyright (C) 1979, Regents University of Californiak'{[{ c󓍄E''S'צ:'{!'0'c?'(&K&not processed á á(3!:W~(gڲ= ggۓ$=?'ز=g(=g=&=g&Pɡۡצ ...too long <ٹFצ file name < scan string #צ vol name  M8!ۡ1á    - צ not named2 Workfile is :.񄓡 (not saved) No workfilev$.ת&תת(%Ɓ.񄓡9&צThrow away current workfile ?  ء.[G&TEXT&  "hKצ*..CODEOld code removed, Text file saved  & 0צCODE  "צCode file saved62!o.צ #[.GC .צE&Save as :. ? 瓡צSave asצ[š C?/צTEXT#CODE#饀! 5 4454=5  d66.6.6 65ݪ   p "٪ؓצ *SYSTEM.WRK.,C:[.,ׯ( Ɓ-צMakeǐh"))** **"&G:[ madeצT  ߪ Ɓ8 55 *SYSTEM.WRK. 5/0 0 òCń /C"ݢݢ///://tLצTransferTo whereׯ󓄡=H3Transferצblocks# of blocks to transfer צTransfer %š " ݢÄݢÄ ۡ "ˡ ݢ ڶ /ݢ0/0 /0צ Ɓ3"ڕš"قܡCצC#ÄÄ~Íj%á*Put in G:'Insert destination disk;GK,,G,:, ׯ>צRemoveǀ RemoveE+Gޤ removed%á % ń,&Update directory ? ,(*צChange*[")ǐ ),, d,,[,["𥀈{á򥀿Dá" G"+!+~G?KÄ?G;KׯɄS{c\ڥs[KG2G:[ Remove oldRƁ-צChangeChange to what׷{צSW,,W,צ:,(,,(,{A=gPܓÄ)jjSjצ:jˡjj(jAj(ܓfOGK ׷Ȅff@ Զ nުݪ"צPWkKGš?=ɍ :g=#g=ɍ=*á =*jjjצ:j($hh=ɡX="#š=P="="=h"h=h"h"=P=gg=á?gg=ɡ, 󍓡 char. max >- Illegal formatT<=ڲ= ݪצc&.צ what fileצ what vol ?  , gg#š=jgjPgצ*SYSTEM.WRK.TEXTצ*SYSTEM.WRK.CODEצ*SYSTEM.LST.TEXT**.*צ.BACK*צRemove  ء&צWorkfile cleared%Tf & ݪܪ  : .  ǀá@ .  ڲ צ& * (&Getצǐ%G.[.&ؓń=.צ.TEXT.צ.CODE ..Ȳ.׷:.TEXTצText ײ&(SVR̂dVʂdȡצBlock V ƁdVƁdV"á dV"Ɓdd  may be okz is badV2ˡYV šOUVˡ9TTTM šTVTVVUVxamine blocks onצH&Block-range ? S  SRR  RRˡR ġ RSSRō4%SVR̂dVʂdȡ V2VVš#1 Fix them ? Ǡ  T UScan forצblocksScan for how many blocks ܕšۏ"ˡ`ۂȡQ"ˡ92צBlock  צ is badۂġ צ bad blocks1 3צEؤ áצ Directoryڢڢ  v 1ˡZ ȡ<ڤ š+ؓښڤ ȡ2ؓ R j2צBad block scan ofצH 饀:˥׷!צ:DGצ : correct ? G CK "צ: zeroed p0šצFile(s) endangered:Mȡl\:צPrefix is - ;: / צ Zero dir ofצH צDuplicate dir ?   Are thereצblks on the diskצ# of blocks on the disk צNew vol name ? ١ ƃƃ"ƃ ,  N, Vols on-line: ȡ &G ȡR~צ; צ #  :צRoot vol is - ?ƅ0ʅ/ƅ0- ڍʅ- .ƃʅ. ƃ/ƃ  ƃ files;ƃצ, ƃʅ( ƃ blocks usedƃ, ƃʅ* ƃ unusedƃצ, ƃʅ+ ƃצ in largest"/.ʅ/ʅ/̅)ʅ(ʅ)̅(ƃʅ/ƃצʅ/ƃʅ) ƃʅ/  ƃ-ƃƅ0ʅ/ ƅ0ƃ-ƃʅ/   ءQƃʅ/ ƃʅ/  ƃƃƅ0ʅ/ƅ0ƃfile3ƃʅ/ ƃ ƃng ofצ׷١糖 צ#1:(ƃ"١̅.̅-̅,̅+̅*̅) ̅(צ Ä - %̅,ړצListƅ-~$ʅ.áWriting.ʅ.̅.ʅ- ̅/ʅ- ʅ,ÍP$&,􍓡~%K:, %,,,|-ٕڶ+šڸ+*ڂ*ŶB < UNUSED >     -p.ƃƅ'Dir listia ȡ$GCػ*c+C ػ?צ:@Ä Cצ The date is C -C-C 6 ),%ö1>--<00..99>Cˡ_צ Today is C -C-C  New date ?  +Cػ*škGGȡ"GؾAĥGؾZȄ GإGؾAצ.CODEצCode (١%צNo  file loaded '- &*- ȡ%ܾz ܾ0ŶȄ: \+%Date set: <1..3Vá41Mark bad blocks ?š$צ (files will be removed !)צ (Y/N) YbcCZ BAD.xxxxx.BADתV̂dVʂdȡV̂eʂeWʂeXT̂fTʂfġ1Z TʂeoT0ʂeʂeoTTT TWT ɡTTWT#VV צBad blocks markedH`]t4 ۢˡMoving ۢۢצ SYSTEM.PASCAL G?   š Y   9    ' sU7z ;|hvhwhhxylxMz|vwlvl llhzh{hƁhh-۲z0ݡߑ ع      y  &  * عteVG8  )  T uh[NA4'á +-ÍNTEGER[36]) /END; ' " "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWRITEDEC(VAR F: FIB; D: DECMAX; RLENG: INTEGER); "  IMPLEMENTATION L E M.SWAPDISK&:(7,צ*SYSTEM.WRK.CODE[*]To what codefil $ "TYPE DECMAX = INTEGER[36]; STUNT = RECORD CASE INTEGER OF 12:(W2:INTEGER[4]); 13:(W3:INTEGER[8]); 14:(W4:INTEGER[12]); 15:(W5:INTEGER[16]); 16:(W6:INTEGER[20]); 17:(W7:INTEGER[24]); 18:(W8:INTEGER[28]); 19:(W9:INTEGER[32]); 110:(W10:IG BB'"G5(C)Apple Computer Inc. 1979,1980 (C)U.C. Regents 1979 ! RLONGINTIPASCALIOCHAINSTUTRANSCENTURTLEGRTURTLEGRAPPLESTU  0 & L (*&brB\ "%>'&t##))h'+*,"--.. //F0`0z0004P5n70L4H5D)@:BZ2" (@,(NXF0N>w\ G&צSYSTEM.WRK.TEXT צSYSTEM.WRK.CODE &PĶ (Dɞ(ń?Íצ0???JanFebMarAprMayJunJulAugSepOctNovDec?????????0צ Bad CodeTextInfoDataGrafFoto ~%"!צPrefix titles byl;G& Prefix is ;:`$\ X/T3P0L4H5D)@:BZ2" (@,(NXF0N>w\ G&צSYSTEM.WRK.TEXTiler: W, B, E, K, M, P, V, X, Z [1.1]7ڡ$&B% ȡ~٤ܦ׷u ȡhܲ~ؤVWarning units   &  צ have the same name,,'&R87תVצOFiler: G(et, S(ave, W(hat, N(ew, L(dir, R(em, C(hng, T(rans, D(ate, Q(uit [1.1]7+צ&Filer: G, S, N, L, R, C, T, D, Q [1.1]7?áVOFiler: B(ad-blks, E(xt-dir, K(rnch, M(ake, P(refix, V(ols, X(amine, Z(ero [1.1]7+&F'  š 6  צback  ġ ɡ6 G : crunched#צPlease re-boot{ X5تPFP') x " " ġ  6צCrunch@צFrom end of disk, blockצStarting at block # 2 % forward ת  ȡhƁ}eʆƀƀ|ʊe~8偅z{lzhhhhhh8冐 0 h HHHL,L5IL,h h'(ʈ D.ł( Ł|} ŀ}|ƀL;~HHL,~HH~HHHHHHL,~ʈƅFHHHH恥HL,0~}ʈƅ0I愊iʈؚH恥LŁ|} ƅL\ ~~8ʈƅ  ILlL, Dɡ  -ݑ š 0 0 ߿`ġ(   ݂. ݕ ؂݂3  ݕ 0 . ݑ0 ݕ݂ ؂ ɡ  |, R -   $ $ ݞ$' ݑ$ $݂ō $݂ġ ݂$ $ $ȡ%  0 ފ$čV   .ˡ:  E.áBڲzؼ0ݞ$ڲzjeEÍɍEáޢ >ۓɡ ؼ݀$ ؼݞ$ۡܡ ؼ$ Dɍ -   "ˡ\ݣ ݣ šݢ ݣ ݢݣݣ ݣ ݣݣńݢݣݢݢݢˡݢݢ ۚݢܚ  / |á +-Í-ڲzؼ 0ݢݣޢÄɡ3ڕġ$ڕšš"šޣ Ąޣ ݣ ˡRݣ &ݢ ݢݢ!ݣ "ˡݣ ˄ݢ!ۂBEGIN RECNUM := RECNUM-1; .BYTE := BYTE+FRECSIZE; .WHILE BYTE > FBLKSIZE DO ' "PROCEDURE FSEEK(VAR F: FIB; RECNUM: INTEGER); PROCEDURE FREADREAL(VAR F: FIB; VAR X: REAL); "PROCEDURE FWRITEREAL(VAR F: FIB; X: REAL; W, D: INTEGER); IZE < FBLKSIZE THEN ,BEGIN N := FBLKSIZE DIV FRECSIZE; .WHILE RECNUM-N >= 0 DO 0BEGIN RECNUM := RECNUM-N; 2BYTE := BYTE+N*FRECSIZE; 2WHILE BYTE > FBLKSIZE DO 4BEGIN BLOCK := BLOCK+1; 6BYTE := BYTE-FBLKSIZE 4END 0END ,END; *WHILE RECNUM > 0 DO ,LOCK,N: INTEGER; "BEGIN SYSCOM^.IORSLT := INOERROR; $IF F.FISOPEN THEN &WITH F,FHEADER DO (BEGIN BLOCK := 0; BYTE := FBLKSIZE; *IF (RECNUM < 0) OR NOT FSOFTBUF OR 2((DFKIND = TEXTFILE) AND (FRECSIZE = 1)) THEN ,GOTO 1; (*NO SEEK ALLOWED*) *IF FRECS ' "PROCEDURE FSEEK(VAR F: FIB; RECNUM: INTEGER); PROCEDURE FREADREAL(VAR F: FIB; VAR X: REAL); "PROCEDURE FWRITEREAL(VAR F: FIB; X: REAL; W, D: INTEGER);   IMPLEMENTATION $ "PROCEDURE FSEEK(*VAR F: FIB; RECNUM: INTEGER*); $LABEL 1; $VAR BYTE,B:L,VSNNNNNNNNNNNYO MIHA<4-('  AH3P|v:n ƅ|L,hƀhhh8hohlhXhhhFffff80)ƅܥ#FfII懥HHL,L5hhhhhƀhh-ȑhhƀ 0ȑƀ0hJJJJ 0ȑ) 0ȑƀĆL>ʈƅ ~~擥 ~ 抦|ɥ8包~ƅLlII懩&&u`hh HHHHHL,} ei|ʽ 8襁i}}ʈƍƎƋƊЌإLl2d|e~28ʈƅyʈƅƉ` DL?Ł|}ƅL\E||怦}ʚH恺8倅偪ʈƅ})H揥L\LlL,E0LL DL\ ILlL,ELL DL\Ee8刅刪ʈʈww&~ʈƅFyʈƅ$ $ ݞ$' ݑ$ $݂ō $݂ġ ݂$ $ $ȡ%  0 ފ$čV   .ˡ:  E "FUNCTION SIN(X:REAL):REAL; "FUNCTION COS(X:REAL):REAL; "FUNCTION EXP(X:REAL):REAL; "FUNCTION ATAN(X:REAL):REAL; "FUNCTION LN(X:REAL):REAL; "FUNCTION LOG(X:REAL):REAL; "FUNCTION SQRT(X:REAL):REAL;   IMPLEMENTATION E BBBLNz)6تP+,+,ȡ+++V 0 Z Zʎ^ Z) ><0l   ڪP."ˡ[̄$ʄ$N.ʄ$M ń.ʄ$M  ʄ$̄$.ʄ$M .ʄ$M Y@ ) Sǯ?Ǭ?ǰ?Ǯ?ǩ?áǫ?Ǭ?r2 ٢ؚڢؚڢٚ ۚܢښܢٚܢؚɡšܢɡܢǿšܢǿɡܢɡܢ; $PROCEDURE CHARTYPE(MODE: INTEGER); $ "IMPLEMENTATION E $PROCEDURE TEXTMODE; $PROCEDURE GRAFMODE; $PROCEDURE FILLSCREEN(FILLCOLOR: SCREENCOLOR); $PROCEDURE VIEWPORT(LEFT,RIGHT,BOTTOM,TOP: INTEGER); $FUNCTION TURTLEX: INTEGER; $FUNCTION TURTLEY: INTEGER; $FUNCTION TURTLEANG: INTEGER; $FUNCTION SCREENBIT(X,Y: INTEGER): BOOLEAN; $PROCEDURE DRAWBLOCK(VAR SOURCE; ROWSIZE,XSKIP,YSKIP,WIDTH,HEIGHT, 8XSCREEN,YSCREEN,MODE: INTEGER); $PROCEDURE WCHAR(CH: CHAR); $PROCEDURE WSTRING(S: STRING) MOVETO(X,Y: INTEGER); $PROCEDURE PENCOLOR(PENMODE: SCREENCOLOR); $PROCEDURE TEXTMODE; $PROCEDURE GRAFMODE; $PROCEDURE FILLSCREEN(FILLCOLOR: SCREENCOLOR); $PROCEDURE VIEWPORT(LEFT,RIGHT,BOTTOM,TOP: INTEGER); $FUNCTION TURTLEX: INTEGER; $FUNCTION T $TYPE $ SCREENCOLOR=(none,white,black,reverse,radar, 3black1,green,violet,white1,black2,orange,blue,white2); $ $PROCEDURE INITTURTLE; $PROCEDURE TURN(ANGLE: INTEGER); $PROCEDURE TURNTO(ANGLE: INTEGER); $PROCEDURE MOVE(DIST: INTEGER); $PROCEDURE??2 ?  ??  1?   ?=~@:?^>[' ~ ~>?  ȡ!2? 5? f   '~~5?. ????2 ?  ??  1?   ?=~@:?^>[' ~ ~  ġ+@ነ? ?> ??   '~~5?. ??  ??;ܳ1?ܳ^; Sƀ> ?L=[?    ??tI$'>ߡڑ߳RI@߳}:#9oLE.6Z"O$<=*     4? ŽDnP42D<.CODECEND.CODECODEPDISKҎԎ,nr r nrnʤr INT^n6 6 \^^\n6 r <INTP3XTT ZN1>н Z)C>oc ZET> Zf>Y Z(w>g ZP>탽 Z(>K  ZL>ȱ ZT>z7 ZU>ٰ ZO>? Z(>| ZC>}̽ ZE>  ZG>? ZT>ca Z >*r Z;>aq ZL>^ ZN>9 Z ? ZO?ٽ Z ?ƨ !Z; ?vm "ZB?F' #ZR?ս $ZP?y %ZX? &ZhhhhhhhhHH v # " `' & 8 ! 0"ee8 !  e e8"#0 88$ % 0"ee8$ %  e e8&'0 8heheHHL<  B  ""##8&$iT8&UU !  U"# UT`+%$Y)!p v hhhhhhhhhhH8 )%HHH`5>hhh)hh h h h hhhh &    0&!"   #"  ` ` `SN-(' . hhhhhhHH `  HH8H8  hhhL .+ rhh hehe)`%)8`)    L)ˢ   â LE % %  )  `8`&e epɀj f f&e e pɀjff %) % )`% L=`0(%$ $ @'cY}zeNEDh0h1hhhhh.h/h,h-h*h+h(h)(ȱ(*ȱ*,ȱ,.ȱ. HH1H0H(ȹ(*ȹ*,ȹ,.ȹ.`   ""##  Iif E J j 8  e e  `(J 8 e  ` Z Z< $ %$PQ $  ߩ $ Li`t^ JL` T$Q%P)Q I L`#JI`'  I` I0ݩ(0/,",i8i#Hiihifi`i,i,3iPII4ifH8H hIiH h hL8SETáSYSTEM.CHARSET  @! @4` - G`` 8`*UH)JJh & & f)4#ihh h2ɡhh h.آآآǿآآǿآآD ٚ SYSTEM.CHARؑؑ!ٹا ZZا Zا Zا ZZfا ZZا Z:ا Zا ZZb8 ؂ɡLjB|?a QZR|?ٽ RZP}?4 SZX~? TZD~? UZO? VZC?[` WZ ?& XZ)?ؽ YZR?  ZZR?2 ZZá.ٹ# BZOi?޽ CZ(k?7 DZCm?[ EZEn? FZGp? GZTr?  HZ s?yx IZ;t?hн JZLv?D KZNw?F LZ x?Re MZOy?Pp NZ z?g OZ;{?K PZ 4ZI? 5ZTL?Xs 6ZUO? 7Z)Q? 8ZNT?; 9Z)V?% :ZEY? ;Z[?Lo <Z(]?г =ZP_? >Z(b? ?ZLd?  @ZTf?] AZUh?D? 'ZO!? (ZC$? )Z '?| *Z)+?+L +ZR.?l ,ZR1?ս -ZA5?D .Z8?& /Z;?: 0Z>?> 1ZA?4 2Z.D?v 3Z.F? e*e+)*)fjfjfj+*fjfjfj8 8) )` (J(F ((Lee Lw  )Lb I1Lb )QLb        xhXOF=2. F | R T DL X,j X & Z,DX p,vp,DY vBKGND PEEKSTRO,ADDRESS ,vDIRSRC<5)"!!!?! """"!!"""""???!!9!!!!?!!!8!  !?!!!--3!!!1)%#!!!!!!!!.)!!!! !!! !>!!!!!! !!!!3--!!!!! !!"""?  ? "??( <12#.) *>*> ?  !#-1!> ? !!  !? ?!!!?!!!! >!!   !6>60HH06>>*>**"*6">""> $88>>>>>>*? ><>{:>ext? ( ׯ,á(+( "ˡ$ Can't find ::9 ƀ:ײ9 ƀ:צSYSTEM.SWAPDISK&:(7,צ*SYSTEM.WRK.CODE[*]To what codتPš++0تPRš&+R+P&P0&Ršز&RPز&PR,VV"6h ssembleצCompile what text? ( ׯ,á(+( "ˡ$ Can't find ::9 ƀ:ײ9 ƀ:צSYSTEM.SWAPDISK&:(7,צ*SYSTEM.WRK.CODE[*]To what cod "PROCEDURE SETCHAIN(TYTLE:STRING); "PROCEDURE SETCVAL(VAL:STRING); "PROCEDURE GETCVAL(VAR VAL:STRING); "PROCEDURE SWAPON; "PROCEDURE SWAPOFF; "  IMPLEMENTATION E :::&:(xáצAssembleצCompile what t$hhhhhh9.:.;.<0(0(099JH;HHH`Z310/$ T?@AB ?UB`2<(^`L+L10`LELK뭕 JF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !hhhhhhh)hpdHHHH`4hhhhhhhi)hH`HHH`0hhhJhh)*XhHH`"hhhhhhH! \L HHH`<hhhhhhHHLM0ON: INTEGER); $ "IMPLEMENTATION E .CODESKSWAPDISKҎԎ,nr r nrnʤr LIT^n6 6 \^^\n6 r DLITURAS P $ $FUNCTION PADDLE(SELECT: INTEGER): INTEGER; $FUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; $PROCEDURE TTLOUT(SELECT: INTEGER; DATA: BOOLEAN); $FUNCTION KEYPRESS: BOOLEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATIH v-DRIVE $-P-v$-FNAM D.SETSINE1`--SETSINE2SETDEFAU-SETPORT -P -2(MAKEPO.#!#.1!1. ?!$ .11.!!!#    ****"""""""## .11.# >$.1!!! !!!6**""! ! .1!!? ? FORMATTE `L i=L\Ʃx ? N'i  ͭЅ?0ȱ Ѕ?iȱi lԠԠ͠ԠϠŠͮŠ SYSTEM.APPLE   L$JFG8`0($ p,&"L=Y?&D&Y?&C? 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xH&x'8*7Ixix&&  AB A') +B A&п Ax) ++`ʖ8'x0|&HhHh @ @ @ @VY@'&Y@xꪽ@' @ @ @ @ @`Hh` aI꽌ɪVɭ&? $? $?`HJ݌h Hh݌` @?Hh݌``  !"#$%&'()*+,-./0123456789:;<=>? @A @x @A - @x8`->0ݩ>ʥ ` H t>x$50xh$50xLAJJJJ`HHjf5 t>h $50x`80^݌Hh ? ?݌ $? $? $? ? ? ?EEHJh #? $HIHHHHhHH A? .?hHHHj .? ] H^HVP {>( F> =$0x8x @A- @# H8`L(B >k @@f0x> %> %>Hh @A#-8` BAD MEDIA, OR BAD DRIVE. SpPh>h?hhhhhBPhh AOhM=< =H*H?H>H`@QVTNMFEA@?642* xP66!NOW FORMATTING DISKETTE IN DRIVE  0B:2*"0 82 2,& צERROR: UNABLE TO FORMAT DISK. DISKETTE WRITE PROTECTED,  צ IS NOT ONLINE.  é ń ȄDESTROY DIRECTORY OF   : :ȡ   צ ? 99@@9966"ˡ#12:formatter.data"ˡ8צ I CAN'T FIND FILE FORMATTER.DATA   צ"FORMAT WHICH DISK (4, 5, 9..12) ? 8808 " ˫6 á=צ DISK NUMBER  xץ:צAPPLE DISK FORMATTER PROGRAM=#4:formatter.data"ˡ#5:formatter.data"ˡ#9:formatter.data"ˡ#10:formatter.data"ˡצ#11:formatter.dataáMצ'PUT SYSTEM DISK IN #4 AND PRESS RETURN  THAT'S ALL FOLKS... ڳT 0ڳ ۏڂ0ڳ<pG) (jJJ>L+ "?I>  N `  ` x V Nx .x- z `V0^*^*>` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xH&x'8*7Ixix&&  ') + &п x) ++`FG8`0($ p,&"ton.wrk"å -m Z D  J  llge  hhhh eQh hCÓؓhVצGTo change "T(oday's date", enter the month, day, and year as "mufficient memory for MILESTONEccconsole:צsysterm: terminal.dat V gzZצmmm QQQQQQ۞  צ miles j6ڂ0iˡHiȡ7j p ccX(.UUdšdUUɡ?!Ins$To change "T(oday's date", press "T"!To change "Y(our name", press "Y"צ4To quit MILESTONE, press "Q"; to continue, press "C"<ȡޥjھ ީiˡȡ6T(oday's date=mצ Y(our name=ZצSTARTUP OPTIONS:צ C(ontinue MILESTONEצ Q(uit MILESTONEV  צ#MILESTONE, Revision 1.08, Room for U  jobs in memoryjצ"config", then do so now. Or, if you have run it, then makeצ>sure to set the system default to the drive that contains theצfile named "terminal.dat". the same Organic Software distribution disk."˥ צ>---------------------MILESTONE ERROR #9-----------------------צ>Cannot find the terminal data file on the default drive. Ifצ>you have not|  terminal.dat"|g˄צThe revision level of צ terminal.datצ" does not match the revision levelצCof this program. Please make sure you have copied all program and צFiscal /DW(Qg HA "$&j  ͥ%To quit making alterations, press "Q"V Ready to key in a new data field$To go to the next field, press TAB; !to quit with no change, press ESCצ*To leave all fields as shown, pressther צ, K, or M)F(ind critical path= צyes no V$ PROJECT SUMMARY:ˡ؞" sg˩צHoursDaysׯצWeeksצMonthsQuartersׯצFiscalÞ"Ä.NJצ:D.jobuN"åu NJ:Dצ.jobuNuuN"áBf+ f˞"Äu .u + "áu.؞"B $NJ:Dצ.desצ N" have not been updated,$e6mO._To continue, press any key *X NJ:Dצ.desNN"á--,mady openFile has not been opened Error in reading real or integerFile position errorצEnd of file found when readingצNo more room in memoryaצ#Project filesFile is no longer in directoryIllegal file nameצNo more room on diskצNo such device online!File not found on drive specifiedצDuplicate fileצFile alreM I/O ERROR # ! عצHardware error when readingUnknown device specifiedIllegal operationצUndefined hardware errorצDevice referenced is not onlinedJJ:JצdF)$DQ ' ڍ  QˡSDצI FV(ERROR #4! The file name cannot be blank QÍhj .VSYSTEs shown, press RETURNdD dDVצ7To change the "D(isk drive", type it a string of up to  charactersצ"To quit with no changes, press ESCצ"To leave it as shown, press RETURNSöLöSöLÍٓVצ(To change the "F(ile name", enter up to  צ charactersETo go to "D(isk drive", press TAB; to quit with no changes, press ESCצ0To leave both data fields a"F" or "D"צ1To quit and return to the MAIN OPTIONS, press "Q"*צTo save the project, press "S"(צTo load the project, press "L"   áA  PSáܓܡ*צSAVE THE CURRENT PROJECT(צLOAD A DIFFERENT PROJECTצ------------------------.܄.ۄQÓ2١)ܩe ˡ ۡ =  (Rת / Su  / M  / צTu  / צW  / Th  / F  / Description Cost in / ȡ (ást#Íצrd צthצ skill category=؂   ؂؂צ1To quit and return to the main options, press "Q"   tQ 䓡Y.=9d,BS$%' ! "Aޥ a  : 4   @@4@ ٍd# P mV Vצ8To change the working hours, press "B", "S", "F", or "E"צ%To change the working days, press "D"%To add or remove a holiday, press "H"? Gd? dD@šZ 4 <ک@ɡ*@ȡ44@@ک@Íٓs@ áRV 0ERROR #13! The number of holidays is limited to  @@4@he format "mm/dd/yy" and then press RETURN -->צ8If the date is not in the Holiday list, it will be addedצ>If the date is already in the Holiday list, it will be removedצ"To quit with no changes, press ESC,[ȡ؍ؓLV צ2ERROR #12! There must be at least one working day dE /H HÍd     XV?Enter a date in tTo leave as shown, press RETURN/d  ȡšȡپFqg]SI?5AW. %3[ "$q_* V1Type in abbreviations for the normal working daysצLS=Sunday, M=Monday, T=Tuesday, W=Wednesday, H=tHursday, F=Friday, A=sAturdayצETo quit with no changes, press ESC; to go to the next time, press TABV ERROR #12! צ3There must be at least one working hour in each dayU0dSj1dBFU2dSE@3dFD+BS$\"9  "h DÍ 2 1X1 3 2A2  3,BS$`#<  "mdٲ ɶ ōfV "ERROR #10! The time must be after  and before  Eö0Äb`V0Type in a new hour from 0 to 24 (12 AM to 12 PM)!To go to the next time, press TABצ"To quit with no changes, press ESCצTo leave as shown, press RETURNX 1 0o0צWORKING HOURS:צ B(egin work=0  S(tart lunch=1 F(inish lunch=2 צ E(nd work=3 @š@ȡ/ 4 @š?@ȡ/ 4 6 צ!WORKING HOURS, DAYS, AND HOLIDAYS!--------------------------------- צSa  & צ WORKING DAYS:D(ays of the week=  ɡ  צ HOLIDAYS:H(oliday list=@šK ؂ 4V/To change a skill description, press its numberצ7To change a skill cost, press its number then press TAB/To quit editing the skill categories, press "Q" V Ready to key in a new data field$To go to the next field, press TAB; !to quit with no change, press ESCצ#To leave all as shown, press RETURN 1إdق d  Ʉ/áݳ  0 .  ń  Ʉyݳ*  ɡ  0   ݂0 - Eeu+   ˄  Ǫݳݳ ˄ Ʉ P 0ݳ ˄ Ʉ ݳ9 Ä9  Ä2  ɡ   ݂0   ݂0/á  ń# ݂0   ݂0/á  ń#  Ʉ/áݳ3 ˄ 0`ݳ3 Ä 08/á.  ń  ɄV "$&*<x$2&l  ب   Ä߹ݳ 0/1á /áݳ( ݳ2  ɡ     T2 ń  62 Ä(    á   c    ///4/4ȡn2  cÄ   P2  cɄ    32  Ä   c2  ń    //4DY,     ˡڶ/4/4ȡ2  //0404ȡ./5/5ȡ2  //00/4/4ȡ2  Ʉ  2  Ä*   cá       ۄ ۓ ..oۡ5/4/4ȡ.///4/4ȡ //44P4R4P.š 7š   á c   vš  áEš   b59?C"3.+2צP  ͥ4 m 4ˡ 44 4m š4 m 4ˡ 44 4@ȡ/쥌//03 1 2gCBcN. ȡ%4 m mš4 m 44mš4 m 4ˡ 444mš4 m 4 4m šٍ=TDת Jcת ת,mmWeeksת KAB ȡ! צڢ ڢ  Man- -.٢ ȡ٢٢%٢&٢'٢(٢)٢- f + , ٩ ٢٢W .XצUȡ%ؤؤؤg5 šCھsھSÍھ Íھ áTo continue, press any key  y   سQˡ@ ٓ:.ع 19  ڍQá zKy b۞!۞ . ٢Start of projectת٢ ȡ٢0 !إd+ق d Í1قx VצMANPOWER SKILLS & COSTS-----------------------.vVצ1ERROR #1! There is no project currently in memoryń =   Ä ń  P  ń   Ʉ  Ʉ ނ   9_ VCREATE A NEW PROJECT--------------------.V3WARNING #1! The current project has not been saved.צ,Do you want to create a new project anyway? ١V١ .  צMODIFY OR DISPLAY (i$ i Ȅ>i% ))$)צ,%)%))$ ))ȡڡd$š,))ȡݾڡV BERROR #i ڥi3V=5Vצ E(arly start=BV| FVVSkills  ȡR؏V (=٩Vs VVc VN(ame=VXV(V D(uration=2Vh 5VTo go to the next field, press TAB; to use  á*%+ޥܩW gȡ-š  ک +, , ,+ +W~$ OD-i"$צerase ڡš+瓡f+fˡ ȶ˄Ⓞ á    ɡ  ȩ ˄d ȶ˄Ⓞ# á  Ȅf+fˡ ȶ˄Ⓞ á     ɡ  ȩ ˄i ˄Ⓞ  á  Ȅ  š ضצ, to change before or after, press "B" or "A"צ-To quit, press ESC; to continue, press RETURNؓ N8@á W. 9O 0   Job number W צ will beá added insertedצ% before or after the job shown below.*J(ob number= B(efore= A(fter=  V Vצ"To change its position, press "J";áצ5To enter a field, press its key; to quit, press ESC; to use as is, press RETURN  @Eå W Wá V Job number Wd d6(AJ$ m  ݸ  ȡii iܶ  ܶ , iá h    |` 0Xתh|r ȡs VNo  צYesV&VYes צNo )VNV  ٳrٹTd VÓVáA5ERROR #4! That job does not exist. Please try again.ád ERROR #18! BCan't insert an uncompleted job into a sequence of completed jobs.6á/צ%ERROR #19! Can't insert before job 0:> s_P> ˥ܶö˶ÄzagȡRڤکW˄8 ȡ-ڤåڤ*ܶ* ׯ&in skill category  $of  sdۏVsd*1áiáEP9áG1P@ "$:,.02468cannot have itself as a prerequisite._á:. follows this job and can't be a prerequisite. áצ isn't completed.ܶdCiáE1dBV|dP11Enter the number yܥi\iWáHܥiܶ š(ܥi*š iERROR # צ! Job number  á does not exist.á2צ& as is, press RETURNdVXdDd2VhdNCdBVrdDPꥁ?To enter prerequisites, type in job numbers separated by commasV Ȅi˄V:ERROR #8! Erasing this job would require that job number  have more than the  צ& allowable prerequisites. Please readצ5the MILESTONE manual. To continue, press any key -->   (.á*%+ޥܩW gȡ-š  ک +, , ,+ +W~$ OD-i"$צerase ڡš& ݩfÍޢ%ۚޢ&ޣ%ޣޣ&šޣ&أ+f+ةfˡ@آ(ښأ+آݩfˡ ݢ-ݣ- ݩfÍf,ةfˡޢ*ޣ-Íޢ'ޣ%ޢ)ޢ(ޣ&ޣ'ޢ'ޣ(ޣޢ)ޣ'ޣ%ޣ'آݣ(šݢ(ܣ+öÍܶ,öÍeáf+f+%٤ٸ٤%,DU$eI  "0f+ةfˡtآ-آ*آ*أ%3آݣ&šȡSڤکW˄9 ȡ.ڤ áڤWK +f˄; ȡ + +W +*:'عق'š'ٕɡܶ ةg?X VܩWá . W.ܶ ܶ ܩWݩ ݢݢWgšWggȡ0کW˥ڤڤšޢ +أ+ ,ؚأ+, آ+ á ˄bg exist-d`dVUáV@ERROR #14! There is not enough room in memory to add another jobTo continue, press any key  Sťˍ"٤٩gōڡVIs this the job you want to ?צ Job number= VW VV Job name=VXV-NVERROR #4! Job number , צ does notޢ+ښأ+%kVتPV,VTo . a job, enter its number then press RETURN -->-d1V,-d,,gȄ,, W .modify׷fˡ.Oá ڣ,ީfܓw ȡڢáݡGڣ(ޣ(š9ڣ(ޣ(ڣ%ޣ%Ʉ#ڣ(ޣ(ڣ%ޣ%Äڣ'ޣ'Ȅޣ,ޣ+ácޣ+ˡأ+ڣ+,ڣ,ڣ,+ڣ+ڢ+ޣ+ڢ,ޚޣ+,ښܶf+ةfˡCإآˡآآ áأ+Uȡ%٤٤٤f+ةfˡ ؚڢڢأ+𩋅g/bVSortingf++ date, enter a new number BTo quit with no change, press ESC; to leave as shown, press RETURNdV}ܓd/}h||ɡ |}h W., & ˡۢ* ۩fÍړړVצDERROR #16! A job cannot be completed until all of its prerequisitesצ.are completed. To continue, press any key --> 詋VA(ctual completion date=V} Vצ9To change the actual completion W.VDERROR #17! This job cannot be uncompleted because another completed?job lists it as a prerequisite. To continue, press any key --> ܥi۩fˡۢ* ۩fÍړړVצcomplete ڡ䥋Vצ Job number W  is already completed.!Would you like to uncomplete it? ܓ٤٤** ȡ٤Wáړ٩gÍڡV:ERROR #8! Erasing this job would require that job number  have more than the  צ& allowable prerequisites. Please readצ5the MILESTONE manual. To continue, press any key -->  ݩfÍأ,;f@zڨ@š&@ȡ4 ! @ 0ٶˡT1ک2Ʉک3á-/ 0 ȡܶɡJܶÍ؄ ؓצ ؄ áצ12- Ʉ  1ک2Ʉک3á-/ VR(enumber all jobs צdon't צ צ$show E(ffort summary O(ther optionsצS(ort jobs into time order don't  #show C(ost summary Q(uit Ägōgš f+éń f+ܶˡ //ȡ` .++ .,, . .ˍ ..fˡ+ܶc^ Uצ (Room for  צ more)    ɡ//ȡ .F//ȡ .f+f+%ܶVš ܶܶ ु צDirect cost in   צ=  ȡN'š>9999' ޭX9D8&#š x Fpower level= = ȡN$'š>9999'$ $䥁ܥ Manpower cost in   =  ȡN'šצ>9999'߂  ȡ$ɡ$$$ ááߕɡ߂+áצManš ڕە  ȡ%$  ˡ  f+fˡ%޶&ɡ޶޶ Ʉ޶޶%áRááߕɡצ>  צ %ߣ%ߢ*Oߣ&ߣ-ÄX  %ɡš š   š   BBAš  Zߣߣ)ń*....ת?ߢ*>::::ת%ߣ)éצ>==== צ>----ߣ%ߣ&ɄAߢ*:::::ת%ߣ)éצ===== צ-----nߣ&ߣ(Ʉ>....תOߣ&ߣ(Ʉצ.....0ߣ(éߣ&éjHoursׯ ?צDays ,Weeksׯ Monthsׯ ȡ)ڶ 0 á ȡݶߣ%áwߣߣ)Äצ*  cáצ00    צ$JanFebMarAprMayJunJulAugSepOctNovDec ȡI ɡ( cɡ   [UJ0 ȡܶܶÍצFiscalM 2ɡ20 19 ɡ0   ܶÍצFiscalzFY ɡ! ɡ0 9 ɡ0   ȡ4á"/ G9MB40d ٶˡ[ȡI ɡ( cɡ   ̲0(4Wq  ڶˡFȡ4á"/  ȡܶܶÍJ$JanFebMarAprMayJunJulAugSepOctNovDec צFTo select an option, press its letter; to see other options, press "O" šGV GV   0šGV (􄍡.򩋅š. V V V V V]VO0SH  "$&-----gZצ-̀ƀצ Prepared by ƀZ$ƀ7צDESCRIPTION DATA FIELDS:77Name of project=777Leader of project=777 Time scale=category=7 7  7  d7@7R 7X 1P צPROJECT DESCRIPTION REPORT---------------------7 7Description 77/77 77s7 7 Total Cost7 ȡ7 á7st%Í7rd 7צth7 skill //@ B  B B/+/.Oá 0!ZJ7צSKILL CATEGORIES:7  ȡ/d@f+//fˡ/A /A/(š/( ȡ򥋤צQuartersצFiscal / /d/7צManpower cost=77 77 Direct cost=77 77צ Total cost=77  7V Computing CHEDULE SUMMARY:77Completion date=Hoursׯ7 7צ:00, 777Number of jobs=7 77צTotal manpower=7 7 77s7S:77צ Holiday list=@šE@š@ȡ)477 7 7@šU7 @ȡ)477 7 7D 7צS7צ WORKING DAYS:77צDays of the week=/ 7צSu/ 7M/ 7צTu/ 7W/ 7צTh/ 7F/ 7צSa77צ HOLIDAY:ádšdW  gťܶ  f, WWšAá ...tצmodify .H81AU*^$} ,4b* @&(F Ê̂̂  ʂۡš% ̂ʂȡ  @ bhj  H $  0šAV &:ádšdW  gťܶ  f, WWšAá ...tצmodify .H81AU*^$itצATo select an option, press its letter; numbers can prefix a move ø šAV CV  dɄ 0šAV &*.02468:<>SB @cNVצIA(dd E(rase or I(nsert a job move U(p D(own L(eft R(ight or H(omeIM(odify or C(omplete a job O(ther options Q(u777 Start date=צHours70 7:00, 777צDirect cost units=777צManpower cost units=777צFind critical path=7Yes77צNo77File drive and name=7J7:7D77WORKING HOURS:77צ Begin work=70 77 Start lunch=71 77(7צJob Description 7 ͂ ȡ|áE޶Í*77  7 #7 7 7 "ض 7 ؄ 7 \á7127 = ɡ7 7 7 7  7cضȡá:á 7 0 ȡá:á 7 (7Job Description 7 á͂ ȡáyɡV߶Í؄277 ̳ؓ|2lr 777   >>ȡ[//צQuartersצFiscal  B7 Total effort= 87 7 77s77צnone77Manpower cost=77  77 Direct cost=7/A7 7o6 77 per 777   >>ȡ[//צQuartersצFiscal  B7 Total effort= 87 7ܶ/77 7Manpower skills=<á7צnone7 >>ȡ/ˡ7צSkill #7 7, 7 7צ, 7/ 7צ @ 7 7䥈٤/:; >>ȡ/š;;< >>ȡ/š<<;<::7Prerequisites=;á7צnone7r;>>ȡe7צJob #7/ 7, /) 7Latest finish=<0/(77 05==ȡ٤s7Job #7 7צ is not in use799>>ȡ7-critical path=/)á7צYes7צNo  7 Latest start=<0/'777צ Slack time=/)á7none  M /)á 7/) 7 7 7צEarliest start=<0/%777 Completed=/*7צYes7צNo  7Earliest finish=<0/&777On , 7// /)ö/*37 -7***** CRITICAL *****77 7 ȡ7-7 /á 7 Duration=7/ 7 7/31P JOB DESCRIPTION REPORTצ----------------------gZׯ) Prepared by Z$&Hoursׯ7 7צ:00, 27צJob #7 7 Finish lunch=72 77צ End work=73 76z 7צDirect cost units=777צManpower cost units=777צFind critical path=ȡá:á 7 (7Job Description 7 ͂ ȡá޶ÍFiscal׷\ 2ɡ720 7צ19 ɡ 707 7   ޶ÍצFiscal7צFY ɡ. ɡ 707 7 G ɡ 70 cá7צ007  7   7  77 7KOZצCOLUMNAR JOB REPORT-------------------צCOLUMN NAME WIDTHצ J(ob number=צN(ame=צ D(uration=צ E(arly times= L(ate times=Sʈá ʈ̈uʁϚvʁΚBPd^`A2^^6&T`  Ɖʀƈʀʀ̀ιʀҤ//f˶/ʀѤ+˄/%̀ʀζ/&ɡʀʀʁ͂Ʉʀؕ̀ʀζ/%á+ʀ/Aƈʀ/À ̊ʀʊȡƁʀ$ʀ/ʀƉʀ/ʀƀʀ/ʀBʀ ƈʀ/ʀBʀ ʀ̀йʀ̀ι/+/1ʁ͂̊ʀʊȡ̀ ̊ʀʊȡ'Ɓʀ$ʀʀ̀ϹʀƀʀƉʀƈʀʀ̀ιʀҤ//f˶/ʀѤ+˄/%̀ʀζ/&ɡʀʀʁ͂Ʉʀؕ̀ʀζv́śʁʁʁʁ́ʁ̈ʁ̊ʈʊȡuʁvʁΚ31ʈái ʁ77צ, 7g77 Prepared by 7Z7 31uvʁ́ʈá ʁ́̀ʁ͕ʀ̀Ϲ0̀Ҷ5̀ѥܶ0ܶ5š 5̀Ҷ0̀ʀ̀ʀ̊ʀʊȡʀΤ|ʀΤ̊ʊ(ʁšʊ(́ʊ%ʁɡʊ%́ʊš̊̀ ̊ʀʊȡ,ʊʀšƊʀ̊ʀ̀Ϲʀ̀ιʁʁšʁ́ú Duration of a completed job77* Job with zero duration77"O----> Job with no prerequisites77צ>----X Job with no successors7́́̊̊̀ ̊ʀʊȡƊʀ7 77Symbol - Explanation77צ!>----> Duration of a normal job77צ$>....> Slack time for a normal job77(>====> Duration of a critical path job77צ$>::::> 7á7צ Direct cost=ȡ577 7á7צ Total cost=ȡ677 7I)]l.7á"7Total manpower level=ȡ677 7á7Manpower cost=ȡ677 éݣ&éצ>  צ. %ݣ%ݢ*Oݣ&ݣ-ÄX77 L  ȡxá7 7=ȡ;$77 )Äצ* Zݣݣ)ń*....ת?ݢ*>::::ת%ݣ)éצ>==== צ>----ݣ%ݣ&ɄAݢ*:::::ת%ݣ)éצ===== צ-----nݣ&ݣ(Ʉ>....תOݣ&ݣ(Ʉצ.....0ݣ(*צQuartersFiscalׯá 7 ͂ȡ(7 7 7;8 á57/ 7 7/7 /͂ȡ/ݣ%áwݣݣJanתצFebMarתצAprMayתצJunJulתצAug Sepת צOct Novת צDecHoursׯfצDaysSWeeksׯ?Monthsׯ(lack=צC(osts=P(rerequisites=צ M(anpower= צ columns/s  maxU(se page headings=צOPTIONS:צ B(egin printingצ' Q(uit and return to report options>V/To include or remove a column, press its letterצ*To return to the report options, press "Q"צTo begin printing, press "B" צPRINTOUT PARAMETERS------------------- D(evice name=+W(idth in columns=s צ F(irst job=0 צ L(ast job=-RMHC>94/ *CS"-* C3!F, <%sɡHڹ:50BU( +"$&CBÚ6X,< ,   u: ( ( 8tٓV  ڳ"ڹ-RMHC>94/ *CS"-* C3!F, <%sɡHڹ:50BU( +"$&CBÚ6X,<7צ 7 u: ( ( 8tٓV  ڳ"ڹ/A7  7  _7צ  ȡ:/š7/ 7צ 7צ  _7צ  ȡ:/š7/ 7צ 7צ No 7/% 7/& 7/' 7/(  7/)  ȡS// צQuartersצFiscal  B 37477705 ȡꥈ٤٤/ 7/ B7 7//ɡ7 /57/ /*7צYes צ( 1 2 3 4 5 6 7 8 9  44( SKILL CATEGORIES ( 1 2 3 4 5 6 7 8 9  SLACKצ TIMEj44 DIRECT MANPOWER COST COST44צ( PREREQUISITES 4צ EARLY EARLYצ START FINISHj44 LATE LATE START FINISHV44צ4צ  NAME j44  DURATION COMPLETEj4B REPORT-------------------gZׯ) Prepared by Z$&4תצJ44  JOB4ȡ؂Yes צNo ؂؂"  צ    צYes No  H 31s COLUMNAR JO5 צS(ingle sheets=yYes צNolV&To change a variable, press its letter"To quit with no changes, press ESC1To return to the PRINTOUT options, press "Q" V!To enter a new value, type it in צ$To skip to the next field, press TABצBTo quit with no change, press ESC; to leave as shown, press RETURN۪PȄ++v6؂tv1š  Íš ۼdddۼ 5ۼdۼd?Qۼ 7-77 7` dd dd6tv1š 6ڶ6Ȅ7 7'8تP+7+7T0 6uȡ7 76u3ȡU6uá74716uá777 7f 6tv1ȡ7 76tvȡO6tvá-7-7d (6tˡ6tȡ76 f2Vצ:To begin printing, turn on the printer and align the paperצIs the printer ready? ffff6frinter? ffp6626uń 42yiVצ?Page completed. To quit, press ESC; to continue, press any key 6ˡDy6tɄ 7 צ0To scroll the display up one line, press any key צTo quit, press ESCצ"To begin previewing, press any key f `fWVצ-Do you want print the report on the p72 7צconsole:2 72 fe]Vצ3Do you want to preview the report on the terminal? fefeeVWhile previewing this report: TˡKȡ9 ɡ  cɡ    SJ `HoursׯخpDaysׯخ[צWeeksخEצMonthsخ.QuartersׯخצFiscalخڨ@š&@ȡ4 ! @ˡQ12Ʉ3á%/٩0Y-R hˡ>ȡ,á/E<0ERROR! Job number 5  is not in usedFS+y YesתP NoתPdšyYyÍyצYes NodL/DW(+ ="$&2z9aDX  QسPٍٓڍ99 HPV  is not in usedWL+d5last job׶50gܶ5U,VERROR! Job number 5  is not in usedFS+y YesתP NoתPdšyYyÍyצYes NodL/DW(+ =of columnssK+d0צ first job05ܶ0T,VצERROR! Job number 0  is not in usedWL+d5last job׶50gܶ5U,V,Vצ ERROR! The  must be at least  and at most  RצYesP,ؓ ,,ddWdsdDFצnumber ۥQ  0PQ  צ+++PئתP 0        0 RPš%PMQPš/PMQP.P`š%PKQP4š-PKQP.P.0šu,j ٨خ VڪP-٪PتPBVM-XBݥMXj VáUÍUáȡ$e !Enter the procedure file name -->7 7  7Sޢaáá 8ޣbá.Ó&ݫá ޣbA á   $*,*   'áݥM á Ʉޢ`ޢ`Íá צ!Enter the procedure file name -->7ݥ7"˥ ݥMޢ`áޢaálȡۢOھۢT$FܢT؂ܢTܢJš"ܢJȡܢJ۾T ȡ &   ۡÍ$ȡ ȡڢ&پڢ ȡ B t٢š&٢ȡ٢ؾJ( 6T٢Wš$٢Wȡ٢Wؾ$BۢOš"ۢOG 0 0?š"? ȡ?ھq 0 J( ۢ!š&ۢ!ȡۢ!ھ ۢ ٕ4 f J( ڢ&š&ڢ&ȡIšIȡ . á E~šEFDHH5š"5 ȡ5ھG 0 0:š": ȡ:ھ-ƂgmƂĝƂ Revision ƂƂgYƂצ, [ƂǫƂP4ƀƂgءƁ7 DVP F & ` Ndv  4 P PnBR:iV  ZVPJC  :4/AT(2L Z$f2$&g<Ɓ7Ƃc2́6á 0́560000ǵ5ʁ5́5ʁ5́4̂ʁ4ʂȡƂʁ4ʁ4́4Ƃ́4 ̂ʁ4ʂȡƂʁ4ʁ4́4̂̂6To printout a report, press its letter, "P", "J", etc.1To quit and return to the main options, press "Q"    $dAiV  ZVPJC  :4/ATurn to main optionsVnCÄٓfeC ع0+#CP "3d eC f8ع0+#CP "3  VSENT DIRECTLY TO THE PRINTER: צT(ime schedule graph צA(ll of the above reportsOTHER OPTIONS: M(odify the printout parameters צ Q(uit and ret-צ.REPORTS THAN CAN BE PREVIEWED ON THE TERMINAL: צP(roject description report J(ob description report צC(olumnar job reportצ.REPORTS THAT ARE  P /Q Y P  P /Q Y PfjئתP0ˡ/  0݂RPצ0PC\ VצPRINT A SUMMARY REPORTצ---------------------š  á! ,۪P./0/0ȡ. /0.//.$X :`{Ʉ  צEnter "Y" or "N":YNÍ YÚ8 ^ 4 צP   ᄓᓄ  44޳j45757ȡ.555757ȡ 55޿ 77 P7R7P 4   ᓄ | MIKE HAYDENALD-MILESVDXFCSS#5bApple II Smarterm RP     #5printer:BBPBP$gdThuFriSat $JanFebMarAprMayJunJulAugSepOctNovDec  ( 9u.Ǿ 6ݥ 3}kcc!h PT hQá u  rG*^$t~D t X F , : MɡdmMM ڨبצSunMonTueWedThuFriSat $JanFebMarAprMayJunJulAugSepOctNovDec  ( 9u.Ǿ 6ݥ 3}kcc!h PT ;ZxǗǵ   0 N Ä MɡdmMM ڨبצSunMonTueWe }d(,26á2 á  cá    ب / /  á0 ɡ  ɡ tڨP7R7P 4   ᓄ ᄚ ؂HT Jvá z áá á :á ٪Pᄚ ؂@L J 4 צP   ᄓᓄ  44޳j45757ȡ.555757ȡ 55޿ 77