LBSOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUNDINVALID KERNEL FILExةw,@  4  J  ȱ⩤i8#) ) 8LeHH(x h(`~Ȍ``,hhh )hJ¥jJJhhihhhJi֍hhhh b\8ſƅhx Щ&'H(f'ꮭ'eƍ8ƅб ĘHH`ܠ ܮ (-A2.AELEM.CODEo # h.A2X.AELEM.CODE # x-READ.ME.FIRSTm`99.CUSTOMIZE.DATA $ .SYSTEM.STARTUP,$ .SYSTEM.LIBRARY8n$ III.PCL.05u' ,SYSTEM.APPLE!@" -SYSTEM.PASCAL):" &SYSTEM.MISCINFOF" C.SYSTEM.CHARSETH" DΞ+A2.AFP.CODEK"# F,A2X.AFP.CODE]m#im#iЛ#Lȱ  6L憦  Lsmm l y` @8(Je稽 ʈ  Ͱ()I يJJJ(jǩF؅G(  ֈ k( F G  WjΓ0 Ю $Ӱ͐4 xΒΔH ܩ`Ǚx kh k@(LYҭH͍h (ͥpi)ͥˤ˹  !"#$%&'` ۑȑآL ّ 0 ;ܩJ;* ۠؈ȩؠ#в   :>BGڇښڢکڬ`H$)A[hIH80(hI`i(8(hI`J) )i i`HH8(iPH D۠'(hH ۩ hhehLDۍ۠'O`J>L80 %,M8$LgLhhhhhhhhץHH` )`,10 )?ILڢY` l܅k܅lм`|H D۠ D۠'È B h`@ ֠ ֭0`+` ڥHH B MڥhhLDۦ ڐ`,10` ` ` ` ۤO`) 2 ֭0` ֹ)` ( `) $ HЄ ֹJ` MȽ`H ؠ H h`@`   ٢` َ` ֭`38 0P`8 0 DۥHH)> `0* x)` EHh`LL٠(MC3 `H ؠ h ~؍,,`lQ`) ũ Ȣ`JJJJ ϱ` $p0*O# =ؤ =آ`H ؠLf ֊H h ɢ)L ,10U0I ,109,c$0 A[ $P0Ji)jj%UIЂ )?LI@a Hb c0  hH ׎h$L hhh 靱`hhh(`hhhhhhϐ8 (ֹH ֥ +ֹP )*Ȫ`FG8`0($ p,&"VU>)Q>jj``P@J I*I `8Hh` 7HHH*L^F0 ِ9 aLgץ")j> 8`Ί aՍxՍՍՍե>?Ռ8T8ՌWuՌvՠ ýI꽌ɪ꽌ɭ蠪ϮәVE]ӾV]H)]ӾV]ԙ)]ӾT]ԙ)]ӦΨ 8$hU>`ȅ͐Sϭ܅83Iܐiΐ ө ө ө ӽ`Hh`Q꽌ɪɖν*Ͻ%ϙEΈ 꽌ɪ`8` Hh݌`  $(,048<@DHLPTX\`dhlptx|Հ؈䤨谴LјJ 8彐.mĿ"Š>?( X֮ˍL հ˩($8` Ґh Hǹxhx N`8Ύܽ0|ϩHhHh ӈ ө ө ӘVYԦΝYԮܝꪽԦ ө8内e~l8吨L$ऐ 0 8`hh ߦ~ h0 "Lb LblvLL/ 6L 68L ߦ~ hI=+ "L ߤ~襈I= ƈ LȄHHL{hh ~L$KL nN(kPQChSU焵V!cX_Z[^]k _#ǭ`xXb'dxehSgiQYjoNln9?oIqr|otEv7w߄y @{Η|½~v! ) `) e`޽hhL{ҭ߽H޽HL{ҭ޽LL{hh HHL{hh L{ҩlhhhh 좊 /饀HHHHL 좊 /L8hhLѪ0 `Fff LL~IIi`~  EHHL{ҩ~  EHHL{hh' HHHHL{ҩHHHHLр? ABzDF@GPtIeeffffإ L R R`~ 预  HHHHL 뢊 /LҢ~  HHHHLҥ~ 뢊 /LҺ^LҺ~&~& ILhhhh 6IiIi0&~~ /Lҥ~E 颊 /L JI ꢊ /LҢ~ 预 Lѥ HHHHLҥ~E8 i  iLх 8僅傅偨倐 8&&&&Ffff r R颊 /Lҥ~E88ePhhLi򅋩Fffee R R` 8僅傅偅倅 ` r R`Ņ"$ņŇň ʼn8`~`~ 预  /Lҥ~ /Lҥ~E~ 颊 /L Jꅊ ꢊ /LҢ~ 预  /Lҥ~Ihhhhh*68jh*vlhhjH*vjHHHlffff择ŋhhL`0&&&&0ƋƋhhL`&挥F8`8兰I襅FfffFfff` eeeLҠ UL{ҥXiXYLh~hhh~ȑ~L{ҥrehrseistehtueiuisu ʱrtLShLsrtL{hhhi0QhthuhettheuuhrhsherrhessXЋiʱrtusLhLrtL{hhhhhhhhL{8\潪]L\Z][JHjHL{hIihIiiŒ.L%祔'ņŇ0 L祆8ƇL祆8厪HHL{hhhhTL֥T8~U~8~Xȥ~YT VLҥRSLȱȱLѥ8Ɓ8 ри~ȱ~녓L 楖 㥘 㥔 㭭хх 㥚8ƛƄL` 8` ^\_]`hh L{hh FL{ҠX lhhhhhihhhhL{hthuhettheuui ʑtuLhLtL{hhhhhehehhhhhhehie`\^]_~ e~@,A'8\B\]C] Q\8]`L8\] m8ƛ 58Ƈ8\񆅖ȥ]񆅗8񆅖Ɨ8 ƗLPQ L3楆8Ƈ8񆅔ȥ񆅕8Ƈ iiȱL*8~ȥ~e~ȱ~e~8ƇƎ`3[[`3[[`\Z][ 8\Z][`Lх~ e~ HHH> ]>HBC\8倅\]偅] = Q G]H\HHHAH@H > # ~ȑ~~i~e~ȱe~ȱ~ȱ~~i~iи\R]S [ m\v]w]|\ v\w] RPRRSQRR RȭR)[ [Zqʊ qŐ`8H<8H\`1l LCOPYRIGHT 1979,1980,1981,1983 APPLE COMPU) l Ԭ>>П8ƋȱHHHH`HHHHHH  < @~aƁ)ɠ># ~ȑ~~i~e~ȱe~ȱ~ȱ~~i~#$6 </\z FLLIEHJh**F`F$Lө ޽޾ HHHH`HHHHHH  < `) ,1P `*0 dNi iIHHHH #* 6` QRTW]H\HlR_H^HlT Эhh a0+&00 1ح/0 "!`abc)VVInsert boot disk with SYSTEM.PASCAL on it, then press RETURN# SYSTEM.PASCAL is not version 1.2#lghhLhx hmDŽ І 51-l l Ɗgƈд*~ !  LL8 #0ĎL8ƂƃL8~ Ly ƂгƃL8(8 Ƙ L`` ` `޽`HHlHHl>޽ ҹHH`=`LLLLL)LHL&L)LLKLLLXLLXLLLXYYHXHXXYeXXYLhrhshthuXs&trȑtL{ҠrrtLٱrtL{LѺ~~LLҠ UhehheiHHL{Ҡ UhehheiHHL{hh Uѥi h&L ڥhii攥IiIiƔ8吥呰 ` of"f fofn8no8&&`ffofn&&`hhhh ץIiIiHHLhhhh ץHHLh~hhhE0Ń)ŀ!0E0h0HHLҨIiIiHHLh~hhhe~eHHLhIihIiHHLh~hhh8~HHLҩonff nenoeofofnff`hh0 hhLhh"IiIiIiIi _ץHHLҺHHLנnoLѥIiIX`0\XE0XLXŖC?8XX&XeYei无8XYLҥXiXYL h~hhh~&Zȥ[Ze~Z[e[8\Z][LL{ h~hZ~ȥ[~L{h~h~Zȱ~[潩L{ҩlLh~XYLҠX~ 8倐~hrhsrHrHL{LѠX~e~e~tu~L`hththhL{h~hhe~~heH~HLhhh~hhe~~he~Lhrhshthu ULh~hhh%H%~HLh~hhhH~HLhhIHIHLҩXXhhQX0Xŗiхniemoni nooHnHLnҠX qѠ Uѥhelniemo hnhnLnҠX Uѽeh~ei~H~HLnҠX Uѽeh~eih~h~LnҠX UѽeheiHHLnh~hȱ~H~HLh~hhh~ȥLҠXȘ ~X)XYXHXHXehnSeio nHnHL{Ҡ UѥRehnSeioni nooHnHL{Ҡ UѥRehnSeio hnhnL{èPHPHLҠ UѥPehnQeio nHnHL{Ҡ UѥPehnQeioni nooHnHL{Ҡ UѥPehnQeio hnhnL{ҠX qѠ Uѥhelniemo nHnHLnҠX qѠ Uѥhelid޽߽ H޽H V  PRȥQRRȱR8Ɓ8R RLҥXiXYXiXY HHXYX lhh)X0 eXXYL{eT~eU~8~X~YLҩHHLҠXHXHLn飨RHRHLҠ UѥResxx\AFkuѯ} LiXiXYX h&i` hi`RlSml~ȱlm~l``Z罅[潩`޽~@<8潍罅Z\]b[       %v HHL{ҩHHL{Ңh~E0~E~~~Ղ0L ߐL h)~hh)h~Lߩ vhhh~hE0Ł~ŀ/1'0+!h~hh~hHHLhHHLҩ%vHHLhhh h膀e ň4  (  DPASCALSYUSERPROGFIOPRIMSPRINTERRINITIALIGETCMD SYSIO    d쓡  !ˡ4$ š F",á1š ġ  ".+á$š ġ  "6%'á *   šˡ 퓄 Ä퓡x š   ɍM   "ˡ.ˡ61 ɚ V %ɡšɡš  V"(&ˡ " ȡ2 š:X f Ą ɡ 낫š ꓡ!š땫Ě@$"á1ꓡ삫Ú š K$"*ńȄ4šáRתPńȄ ,ń.áš蕿@šQ  Q lȡ>š 쾿  / Zá " * ȡ ɡa áá0š  %4á1á# 09ȄX 000á'#á 009Ȅ00 qS\  ɡ'áצ-32768 ^ 逫-ġ>00ń0˹ && "ˡ  J   00áQP 0á0 é000+-Í-ë0 šš që  N "ˡ )á á áWˡ á Dš 4áÄ & ܟˡ,  צSYSTEM FAILURE NUMBER  צ. PLEASE REFER "TO PRODUCT MANUAL FOR EXPLANATION.  (*+,-./0123456789:;<=>?@ABCDEDACOPYRIGHT 1979,1980,1983 APPLE COMPUTER, INC. ALL RIGHTS RESERVED^ #?š?ˡ?ء "ˡ$ߕނ߂ɡ F b$!  # 0%'%&㓶℡'á.0:'ADzh N\,\P| * > T f z  ' ROUND b%"$ņ%MARK Z/&: % RELEASE %!IORESULT0NL "Lҥ~ / EUNITBUSYD&; %#PWROFTEN[%$UNITWAIT% ʀʀ ʀ ʀ ʀ  ʀʀ̀ʀʀʀʀʀʀʀʀʀ̀̀ʀʀȡʀʀ̀   תʀ'*SYSTEM.MISCINFOת; ̀ʀ*ʀ+ʀ,ʀ%2 &̀ʀʀʀʀ%̀̀̀ʀʀȡʀʀ̀ʀʀʀʀʀƁ/@š4SYSTEM.CHARSET+ \٢ š٢ ٢٢ 4$  /   d::87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PR P:NEWC/C.CODE:6REMOUT8PSb.:=b4/#b:a@:%aF:`L!I`R[/`X)`2 4j P:NEWC/C.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE  /IF/E .gEH87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8E/KY Kh Pt.PE87CONSOLE187CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8P IYIL: P/.P> r D ́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń! áނ š   šš$ !۞ۂۂەߓh  ! "ˡ ɡ!  ! "ˡ ߡ š  ńá4 á,á"  ܢۚ>ب"́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń! áނ š   šš$    ġނš  šš!۞ۂۂەߓS  ! "ˡ.! "ˡ ߡ á( ::87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PR P:NEWC/C.CODE:6REMOUT8PSb.:=b4/#b:a@:%aF:`L!I`R[/`X)`2 4j P:NEWC/C.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE  /IF/E .gEH87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8E/KY Kh Pt.PE87CONSOLE187CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8P IYIL: P/.P> Dⓡ4%צˡ䓡 &ˡ& öÍ##&á & %UNITCLEA2%&HALT x03'MEMAVAIL2/F/ ( HHHHLҥ~:&8 i  LхSTRTONUM&)倐 &&&&&Ffff & R颊 /Lҥ~  '88eP: 'i򅋩 FfNUMTOSTR ʀ  ʀ ̀ƀ ƀ ƀ   ʀˡ L تٞ&"á ٤ ȡؤצۢÍ ȄۢÍ؞&"á ۶ ضá}۪*SYSTEM.STARTUPתٟá'      צCONSOLESYSTERMצGRAPHICPRINTERצREMINREMOUT[Bfhjl7צ.INFO$.GRAFׯצ.FOTO /T ڤáޢܡ ޢޢޢÍÄޢÄȄĄMȄt߷iȹ22ȡ2š5252á4w4]11á4\1šV42233039Ȅ 3042221421Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯުPצצ22ȡ5233 ȡ 23a3zȄ 23aA22š*áݲ%áݲצ:22ȡáݲ 2á!2ȡ5252š[22š22sƁq ƀƁq O*SYSTEM.LIBRARY  ́sʁsȡ'ƀʁsʁsʁśs2 Ɓ](`   á/)צ*SYSTEM.ATTACH áá(*SYSTEM.STARTUP š >H version 1.2ړ22 Ɓp Ɓp2Ɓ2Ɓṕsʁsȡ%Ɓ2ʁsƀʁsʁśsƁq ƀƁq O*SYSTEM.LIBRARY  ́sʁsȡ'ƀʁsʁsʁśs2 Ɓ](`   á/)צ*SYSTEM.ATTACH ת "ˡ ܡ́tˡ2"ˡڡAƀ ˡ4  is not version 1.2ړ22 Ɓp Ɓp2Ɓ2Ɓṕsʁsȡ%Ɓ2ʁsƀʁsʁsˡ ߢ`ޤ7 VڪƁ Ɓ "áP̂/ʁ ʁ"ˡ3Ƃ. Ƃ.Ƃ. Ƃ. Ɓ Ɓ X  ߪPƁ]Ɓ4 PƁ4ƁaƁeƁmƁn ́oƁaʁo  áCá>آآ*Ík vޢ ȡUڤ ˡBȄ-ܢ0ۤ ݢ`ڤá \zڨ  ȡ0ޤ!!P!x!P %'"6ۢڤ ɡš2ȡۤˡ áڢڢˍ? Pˡآڤצ š š۾.ˡצ([šܕ!!(š۾:ˡ١.TEXTת .CODEת!!ȡܾaܾzȄ ܾaAš!!Ȅ11(The 64K version of SYSTEM.PASCAL cannot )run with the 128K version of SYSTEM.APPLE d>.Fj TERM:  ø !צ  תצP@22ˡ'Version 1.2 of SYSTEM.PASCAL cannot runצ)with a non-1.2 version of the interpreter@22 `    p  CONSOLE:ת צSYSTERM: Fۤ ōɍ ō ȍ  dč ܓܡߢ ܓߦתߢޢ!ޢ!9 L ٤ Íܡ~  , Ąܓ"á  ܡ:" áܡ ܓת$ ڟšx#ńF 09Ȅ ᾂ0 ߓńȄޓޓ!ܲݤߓÍ6>60HH06>>*>**"*6">""> $88>>>>>>*? ><>{:>.ת&תת(%Ɓ.񄓡9&   P ? ءצ*SYSTEM.WRK.TEXTצ*SYSTEM.WRK.CODEצ*SYSTEM.LST.TEXۤ Äݓۤ  dÄÍߢ ˄ɡۤ  dáߢ  dá ߢ #ޣ˄ ߢ  ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá צޢޢޢ/13:! $ ~\",䚹 9U[2˄ޢߢšáޢ ޣ ߢ  dޣޢޣ ޣߢ  dÍÍޢˡ ݓۤ ۤ Äݓۤ  dÄÍߢ ˄ɡۤ  dáߢ  dá ߢ #ޣ˄ ߢ  ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá צޢޢޢ١ ˡ) ! 䚹 9U[2˄ޢߢšáޢ ޣ ߢ  dޣޢޣ ޣߢ  dÍÍޢˡ ݓۤ  lܟ˄ݤ צ   ١  n ١ á9 ٓ/! !!! á ݤݚ ˄ܟń ١á  ޤ uš  gá Ä+ޤ  ɡáޤ á ġMáš6 ܂ۻݪ d (   š Í ÄU ǐɄ:ń  šá٢.ٕ۶š ڸ۸۶ š۸ ڸ:   ȡQ  ȡ   ȡ? ȡ  ġ ۢ؂Xڢڢڢڣ ڣ ١ڢ ڣ ڣ١ ڢڣڣ ڣ áڣڣġ ڢڣڣ hڢ ڢ١ڢ!ڣڣ ڢ!ڣڣ ڢÄڣ &ڢ ڣ ڢ! ڢ!ڣڣ ڢڢ ڣڢÄڢ ߢ  d˯7 H  ۣȡڤ  ۣ צۣۢ0H ܣġ ۤ ٤ ڨ ܢܣ*@ۢۢۢۢٚÍۢáۢɡ ۟ۢ`ݤW ˡ!  ,ߓ$ ޓ "ߓۄ,ݤ ߓÍߡ2ݤ š˄ڶ a3 d ޓ(ݤ ߢܯ??( <12#.) *>*> ?  !#-1!> ? !!  !? ?!!!?!!!! >!!   !GI..8f'k)Il0MEͻ:,) )@E `8mmiL0 6}`I&&ʈ&`L,{0( ` μL80Ңȹީ`   .Jȱ .J ":6..& 8&' 0  'L&  C `0;--)*8  &&  `L L? & &&0)I&ʆ'N[&(   Ai) ''ݩ0 &@%'E'' ((`Lȱs )k ީmmR') &&*&&6&&u&& 8&' )&u&  ` &` &&` آ . .`&& && ʩ&` ```L `hhHHȌȄi  , 0  9HH, l ,`%)hhPhhN ENhhHHHH``````) LL-` &` hhh)J:h,LC0JJJ) Ehh,p -J hhJ;J-  HH 61 L    L)@  MHH`JLMNOPQRSTUVWXYZ[A3/1.1P FP6502 .#!#.1!1. ?!$ .11.!!!#    ****"""""""## .11.# >$.1!!! !!!6**""! ! .1!!? ? <5)"!!!?! """"!!"""""???!!9!!!!?!!!8!  !?!!!--3!!!1)%#!!!!!!!!.)!!!! !!! !>!!!!!! !!!!3--!!!!! !!"""?  ? "! ,L6% LIL L 88      & & &? u&-v&E&&&&&8}LI8 &I&8&&&&&LL'0C#&ʆȵ&&&& '0 &6&'}&&&`   ` { t)?ʵ**6vEaa㩀ۭ & ' &'  } } } }& I'I'` EF 'e '&i&f&f'`    @5 @``H8 (Hhh &  ?  (Nn    ?  НL(  ` ` `0>: Yaȹa`Ia  &O))JJJ&ȹ&  u E   ,ؠ8m ) JJJJ 0 ) 08L 8mmL%) Nn `  L&  8mm08 08ȩ0"R(   ` ? L (  ''Njf'& &`6'Nnf'Nnv&E&&& NjЮ NjЙ  ȑ?IJJJJ ) L  0iVȑ`0 &&`Lv&E&&&&`,s0'L:) ( 'ɀ`& &`8&` 'Ȅ&,'0  f'8} &6&  &&&L,& &&&&`0'0 C&&&`L'0%  LC0_X mmm` 9ʊM. I0} lȦ  JJJ1e&&&&&& &&&ʈݘ& ) ,0  &r&*&E&&&V   DʊM;F7&&J.&8u&&+') L, LL05 0ʎ L I`)))8JJJ)׬ Ln,0ǭ) **)0L 8ʕ%ͷ  懲@E` } )i0MI 莵  ))0 'L9`0mmmL02&& 8&&莾&+F&&&&6&&&'&&&&u&&u&&U&&&&&LC0,K  II 0OUX?E-͵0)/Ͷ8i0 V  Z  Z F: FiI6  L8i &LCL L } nnn  & & T &&& V 8 jjj&&8'0&6&L    u & 6 `v E  vE`  `0L L 8JJJ9eʈ ʩ`  LLL0   &&f  u&&&v&E&&&&ƥк8}`0$ LL L> | |   4 {{Xbk00@ 51_1 .@*焑+P'$@C$! (k0INNwpk`_^]\ZURONGFC@=<;:9876!   tsrqfea`_^\ZJB>=52*'%$  ` ` ` آ . .`  ʩ` ```L ⬹`hhHHȌȄi , 0 9HH, l ,`%)hhPhhN ENhhHHHH``````) L᥂L᥂-` ` hhh)J:h,LC0JJJ) Ehh,p -J hhJ;J- HH 61 L ⭸ ⥌ŚL)@ MHH`\^_`abcdefghijkA3/1.1P FP6502 FP6502J FP6502 FP6502  32.+*&%$  {rqmh[0,)(%$! b a U P G F ? ; 8 7 4 - , + * ' !      l k S R A @ 9 8 7 6 5 4 - ,    ~ } z w r o l k [ W U R Q P O L K J I H G A > 9 6 4 3 2 1 0 / . + &    TQPDC;9854 w v t l k d c a ` _ ^ W A > = < 9 8 1 0 / , + ( ' $         { z Z / . #     v o b a U P G F ? ; 8 7 4 - , + * ' !    zWVS$# 8zyi\YXWVQGB{xonkhe]XUM=:96 QNKHA4/% xwtsmjif_8 jgfedcbaI876]\["   0)IʆN[榆ĉ ƉAi) ݩ0 Ʀ@%E ⥨`Lȱs)kƉީmmR) 䦦*6u 8&ĉ成)u 8&ĉ0  L⥦ C `0;--)*8   `LL?餦 榦'Njf䦰 赦`6NnfNnvE膦 NjЮ NjЙ  ȑ?I赘JJJJ ) 䘐L  0iVȑ`0 `LvE膦`,s0L:)  ɀ` `8` Ȅ,0  f8} 6 ⦦ƦL,Ŧ 蕦䦐`00 C覦Ʀ`L⥧0%  LC0_X mmm` 9ʊM. I0}lȦĉJJJ1e ʈݘ) ,0 䦰r*E&V  DʊM;F7J.8u+) L, LL050ʎ L ⼣I`)))8JJJ)׬Ln,0ǭ) **)0L 8ʕ%ͷ赘Պ 懲@E` })i0M膘I莵  ))0 L9`0mmmL᭸02 8莾+F榦䦰膘6ŧ&uuULC0,K  II膉ĉ0OUX?E-͵0)/Ͷ8i0 V Z ZF:FiI6䊰L8iLC譸L ⮹L } nnn   Tꦦ膦 V8jjj806Lř u&6`vE膊vE膘`䘰 膊`0L L 8JJJ9eňʈ ʩ`  LLL0Ŋ 覊f uƘ&vE膦ƥк8}`0$ LL LI8I8ƦLL0C#զʆȵ 0 6}󦦵Ʀ`䘰` {ʼnt)?昦ʵ**6vEƘ! ,L6% L⮸IL L88 莱䈐 膈 䘐  ?u-vE䈐膦8}Lƈ..8fƘ'k)ƘIl0MEͻ:,) )@E `8mmiL0 6}󦘵Ƙ`Iʈ`L,{0( `蕘 μL榘8񄕘0ҢȹĘީ`  .Jȱ .J豄 ":6..  8mm08 08ȩ0"R(  ` ?L (  O))JJJĦȹ赊uE膊Ɖ,ؠ8m) JJJJ 0Ĉ) 0Ĉ8L 8mmL%) Nn `  L&npqrstuvwxyz{|}~A3/1.1P ELEMS650 l300 WAP /// SIG PUBLIC DOMAIN LIBRARY PDS NAME: Pascal SANE Disk #2/#3 DISK ID#: 3PCL-05 BOOTABLE?: Nonbootable DESCRIPTION: The second and third SANE numerics programs. Requires 3PCL-01 and knowledge of Pascal to operate. (Note: This /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// SIG, Washington Apple Pi 12022 Parklawn Drive Rockville, MD. 20852 (301)-984-0FP6502J FP6502 FP6502    ? (Nn  ? НL( ` ` `0>: Ya蕘ȹa`IaO))JJJĦȹ赊uE膊Ɖ,ؠ8m) JJJJ 0Ĉ) 0Ĉ8L 8mmL%) Nn `  L&>||4{{Xbk00@ 51_1 .@*焑+P'$@C$! (k0INNa蕘a㩀ۭ  } } } } II`EF eiff`    @5 @``H8 (Hhh  ? (Nn  ? НL( ` ` `0>: Ya蕘ȹa`Iahhhhnhh mhh  L-I2hh LHHHH `  HHHHH?d3????5h!?5h!?JXT@yr?oAu;FF?aM!2?xD?WF9?F:k痃@?^ 5>?y Ȑ/'\?Eӗ@ q @?ZKpH@.au @?@@ @d3?%L  L  0LL"MѢ   L b  b b b b  {L  b b   b   [L  cL  Y y '1;EOYcmwE ABBL6 . L.` pL LLLL MLb b b b b       [L  cL &L 0p0p0LLLhh .%L    ΢    HH  .  v , L "L  k> `: ` L  0pL  \  &L &AB 6 L  H   h N L   0 `     `   AB AB LE  L  NA  A`b b b b b `0 v L ;<   L : 0p`   l  l     {L LJNn 0L  0LL 0LLAB ABB  cL  9:;< L     .  ` 8   8    8 L.LL ,8  c {L 4L O  {0L L  : 0 9::  & 0" P HHHHHH   a , 8 L  `8L      l  l   {`0L LL, 4L  O  {0LȢ shhhhhhhh HHHH `,#070 LL$LL  p00L  * 0P& 0  aLN    ;<9;<   p%#$ <H;HHH   y p$L[  <H;HHH  HH:H9HHH `$ `: L < L  L  L  k> L  k@ L L:H9HHH Aи`L3L3L3HH I-HHHH `LLLL\ `LLLL\ `    `MMii`HHH `' Y y '1;EOYcmwEoAu :9   >=A; <;i;<i<<H;H:H9HHH >H=H:H9HHH ;i ;<i<<H;HH HHHHHHHH  LP  L  bHaH`NNNNv . ]G} HH HHHH ` HH HHHH ` HHHH ` HHHH ` H'?0ZD؈@ #y I@+c&@CPkfv@֡Q @?j٦@k]e@R{n@X~rг2~d@EkXV@- zRhI@U $@bWB fv @8(c3L>q?}e$6Kp6@]*Ә?ͳLy@hp7@Y@VLU@?0l;@oH:=Y@E8h@j☁,:͓?bd_*?j0?N @@!DCL L ff ELEMS650 FP6502J ELEMS650 ELEMS650FP6502 P 7LqBX8 |{xqje`YTMHA@;4/(!XXn\4.*A*` _ \ [ T M H G B = < 5 . ) & !          m ] M K A ? /   L K H E D C > ; : 7 4 3 2 / . ( ' $            xslf_ZSLE>920/,)('" !     ~ } v q p o f a ` _ \ [ T M H G B = < 5 . ) & !          ~}zyplkfba`_^]\YXWVUTSRQPMLG@984-,'&%  }|{vurkjid_^[VPLGF;4-*%"~wnib[NEDC>943210/.-,+&  }|yxwvunmlkjihgfed_ZYRLE>72+*)"     & {zwutsrqng_^SRPBA@921/!   ljedddddddddddddddddddddddddddddddddddddddddddddddddda`_^]ZUTSRMJGEBA>=;97,*(    R     N  T   C `2 `X Z   Z L vma_]\YVSD>;:'$#"  LV . "    ,     `2  L}L    L1C 0C     V pN  L^ R    `F    , p#(      ` (  (       0 `!DCLL  f nC*       L1J   , p,C L DC)8CDD0   {  cL !DȌCЕL2  CmCDmD`B b  `   b `    b b  l lA3/1.1P%L  L  0LL"MѢ   L b  b b b b  {L  b b   b   [L  cL  Y y '1;EOYcmwE ABBL6 . L.` pL LLLL MLb b b b b       [L  cL &L 0p0p0LLLhh .%L    ΢    HH  .  v , L "L  k> `: ` L  0pL  \  &L &AB 6 L  H   h N L   0 `     `   AB AB LE  L  NA  A`b b b b b `0 v L ;<   L : 0p`   l  l     {L LJNn 0L  0LL 0LLAB ABB  cL  9:;< L     .  ` 8   8    8 L.LL ,8  c {L 4L O  {0L L  : 0 9::  & 0" P HHHHHH   a , 8 L  `8L      l  l   {`0L LL, 4L  O  {0LȢ shhhhhhhh HHHH `,#070 LL$LL  p00L  * 0P& 0  aLN    ;<9;<   p%#$ <H;HHH   y p$L[  <H;HHH  HH:H9HHH `$ `: L < L  L  L  k> L  k@ L L:H9HHH Aи`L3L3L3HH I-HHHH `LLLL\ `LLLL\ `   `MMii`HHH `' Y y '1;EOYcmwEoAu :9  >=A;<;i;<i<<H;H:H9HHH >H=H:H9HHH ;i ;<i<<H;HH HHHHHHHH  LP  L  bHaH`NNNNv . ]G} HH HHHH ` HH HHHH ` HHHH ` HHHH ` Hhhhhnhh mhh  L-I2hh LHHHH `  HHHHHoAu;FF?aM!2?xD?WF9?F:k痃@?^ 5>?y Ȑ/'\?Eӗ@ q @?ZKpH@.au @?@@ @d3??d3????5h!?5h!?JXT@yr?ELEMS650 ELEMS650 |{xqje`YTMHA@;4/(!X^ ~ } v q p o f a ` _ \ [ T M H G B = < 5 . ) & !          m ] M K A ? /   L K H E D C > ; : 7 4 3 2 / . ( ' $            xslf_ZSLE>920/,)('" !     ~ } v q p o f a ` _ \ [ T M H G B = < 5 . ) & !          ~}zyplkfba`_^]\YXWVUTSRQPMLG@984-,'&%  }|{vurkjid_^[VPLGF;4-*%"~wnib[NEDC>943210/.-,+&  }|yxwvunmlkjihgfed_ZYRLE>72+*)"     & {zwutsrqng_^SRPBA@921/!   ljedddddddddddddddddddddddddddddddddddddddddddddddddda`_^]ZUTSRMJGEBA>=;97,*(    R     N  T   C `2 `X Z   Z L vma_]\YVSD>;:'$#"  LV . "    ,     `2  L}L    L1C 0C     V pN  L^ R    `F    , p#(      ` (  (       0 `!DCLL  f nC*       L1J   , p,C L DC)8CDD0   {  cL !DȌCЕL2  CmCDmD`B b  `   b `    b b  l l@bWB fv @8(c3L>q?}e$6Kp6@]*Ә?ͳLy@hp7@Y@VLU@?0l;@oH:=Y@E8h@j☁,:͓?bd_*?j0?N @@!DCL L f'?0ZD؈@ #y I@+c&@CPkfv@֡Q @?j٦@k]e@R{n@X~rг2~d@EkXV@- zRhI@U $disk requires 3PCL-04. IF you need the Pascal manuals, call the WAP office for your free set. z`b b b b b `0 L0hh S%L    ΢    HH  S  , L0"L:  > `: ` L:  0pL: 0LLz{ z{{ o L0 H   h N L0  0 `     ` C ; z{ z{ L~  L  Nz  0L CL T : 0 rs:t;u !  ;L0: 0p`          L; LJNn 0L0 0LL `0L0LL, mLC   0L C L T rs:t;u !L0    S  ` 8   8    8 LSLL0,8   LQ mL    L    :t;urs ! & 0" P HHHHHH    , 8 L0 `8L         ;  L0L hhhhhhhh h hhhh  HHHH `,#070 LL$LL0 p00L  * 0P& 0`MMii`tu N  p%#$ uHtHHH    p$L  uHtHHH  HHsHrHHH `$ `: L0< L0 L0 L0 > L0 @ HHH ti tuiuuHtHsHrHHH zи`LXLXLXHH I-HHHH `LLLL\ `LLLL\ `.-. - `.-HHHH `.H-HHH `*<N`T $.8BLV`jt~~&Pz .s-r. -.w-vzt utituiuuHtHsHrHHH wHvHsHrHH H HHHH HHHH H HHH  Lu  L0 HH`. g  .H-H.H-HHH `.H-H.H-HHH `.H-HHH hhhhnhh    mhh  L-I2hh   LHHHH `       HHHH \  KLQ Kz{ z{{Lo S LS` pL LLLL MLb b b b b  C ;    L0 L0&L 0p0p0LLL%LK  L0 0LL"MѢ   L0b  b b b b  L  b b  ; Cb   L l \ L J @ > .   K J G D C B = : 9 6 3 2 1 . - ' & #           ~wrke^YRKD=81/.+('|{zutqjihc^]ZUOKFE:3,)$!    } | u p o n e ` _ ^ [ Z S L G F A < ; 4 - ( %           }|yxokjea`_^]\[XWVUTSRQPOLKF?873,+&%$ }vmhaZMDCB=83210/.-,+*%  |{xwvutmlkjihgfedc^YXQKD=61*)(!     wwwwtsrqpmhgfe`]ZXUTQPNLJ?=;9-*)&%#!   zrqfecUTSLEDB431/- |vsr_\[WVUTSPMKIHF  }xwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww V pN  L R       R     N  T   | `2 `X Z   Z L0     LjJ   , p"  L . "    ,     `2  LL0   Lj| 0|       b b    `F    , p#(      ` (  (       0 `!}|LL0  n|*  N @@!}|L0L ,| LI >}|)8|}}0  ;   L0!}Ȍ|ЕL2  |m|}m}`B b  `   b ` ~rг2~d@EkXV@- zRhI@U $@bWB fv @8(c3L>q?}e$6Kp6@]*Ә?ͳLy@hp7@Y@VLU@?0l;@oH:=Y@E8h@j☁,:͓?bd_*?j0?*<N`?0ZD؈@ #y I@+c&@CPkfv@֡Q @?j٦@k]e@R{n@X?@@ @d3??d3????5h!?5h!?JXT@yr? L0T $.8BLV`jt~~&Pz ;FF?aM!2?xD?WF9?F:k痃@?^ 5>?y Ȑ/'\?Eӗ@ q @?ZKpH@.au @&! {zwpid_XSLG@?:3.'  XkoG)A)@)_ ^ [ Z S L G F A < ; 4 - ( %           FP6502J ELEMS650 ELEMS650FP6502  pg}]3 )  0L CL T : 0 rs:t;u !  ;L0: 0p`          L; LJNn 0L0 0LL `0L0LL, mLC   0L C L T rs:t;u !L0    S  ` 8   8    8 LSLL0,8   LQ mL    L    :t;urs ! & 0" P HHHHHH    , 8 L0 `8L         ;  L0L hhhhhhhh h hhhh  HHHH `,#070 LL$LL0 p00L  * 0P& 0`MMii`t u N  p%#$ uHtHHH    p$L  uHtHHH  HHsHrHHH `$ `: L0< L0 L0 L0 > L0 @ HHH ti tuiuuHtHsHrHHH zи`LXLXLXHH I-HHHH `LLLL\ `LLLL\ `.-. - `.-HHHH `.H-HHH `*<N`T $.8BLV`jt~~&Pz .s-r. - .w-v z t utituiuuHtHsHrHHH wHvHsHrHH H HHHH HHHH H HHH  Lu  L0 HH`. g  .H-H.H-HHH `.H-H.H-HHH `.H-HHH hhhhnhh    mhh  L-I2hh   LHHHH `       HHHHA3/1.1P ELEMS650 0LLz{ z{{ o L0 H   h N L0  0 `     ` C ; z{ z{ L~  L  Nz  z`b b b b b `0 L0hh S%L    ΢    HH  S  , L0"L:  > `: ` L:  0pL: }|yxokjea`_^]\[XWVUTSRQPOLKF?873,+&%$ }vmhaZMDCB=83210/.-,+*%  |{xwvutmlkjihgfedc^YXQKD=61*)(!     wwwwtsrqpmhgfe`]ZXUTQPNLJ?=;9-*)&%#!   zrqfecUTSLEDB431/- |vsr_\[WVUTSPMKIHF  }xwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww V pN  L R       R     N  T   | `2 `X Z   Z L0     LjJ   , p"  L . "    ,     `2  LL0   Lj| 0|       b b    `F    , p#(      ` (  (       0 `!}|LL0  n|*  N @@!}|L0L ,| LI >}|)8|}}0  ;   L0!}Ȍ|ЕL2  |m|}m}`B b  `   b ` ~rг2~d@EkXV@- zRhI@U $@bWB fv @8(c3L>q?}e$6Kp6@]*Ә?ͳLy@hp7@Y@VLU@?0l;@oH:=Y@E8h@j☁,:͓?bd_*?j0?*<N`?0ZD؈@ #y I@+c&@CPkfv@֡Q @?j٦@k]e@R{n@X?@@ @d3??d3????5h!?5h!?JXT@yr? L0T $.8BLV`jt~~&Pz ;FF?aM!2?xD?WF9?F:k痃@?^ 5>?y Ȑ/'\?Eӗ@ q @?ZKpH@.au @L 0p0p0LLL%LK  L0 0LL"MѢ   L0b  b b b b  L  b b  ; Cb   L  \  KLQ Kz{ z{{Lo S LS` pL LLLL MLb b b b b  C ;    L0 L0&͓|{zutqjihc^]ZUOKFE:3,)$!    } | u p o n e ` _ ^ [ Z S L G F A < ; 4 - ( %           l \ L J @ > .   K J G D C B = : 9 6 3 2 1 . - ' & #           ~wrke^YRKD=81/.+('~~NONE-HEX INPUT׮ šצINPUT TO LARGE ȡȡYġ"ݛAġA 쩑f]I Zڹ|zȄA݂aáئת(()(ܛݿ 0 * צ(ܮ á ߡ#.šŶ Ä צŶ0Ä ȡ9ݛ_______________T` ?܂܂á  á'š ܂ (á'TOO LONG׮ צ(mݳUaצ Customizerצ(________________________________________Pá4(________________________________________צ(________________________________________Pá4(_________________________  Working ...? تPress space bar to continue. á"P تPress space bar to continue. "H ٪(ت( PáSANE |%%$#'|_____________________________________|$#$#H "צPut output files disk in 2nddrive, space bar to continue.س á !á  ȡ4٪ت$ #$#צ& _____________________________________%&%&ȡE$#%'| G@)A2CUSTOM FP6502J ELEMS650 ELEMS650FP6502  pg}]3 ) &! {zwpid_XSLG@?:3.'  XkoG)A)@)_ ^ [ Z S L G F A < ; 4 - ( %           m۪mšצINPUT TO LARGE ]l۪lšINPUT TO LARGE׮ .k۪j ۪U*۪*( **0N @́́ʁʁȡʁת(ʁ́צ CUSTOMIZER("This program generates versions ofת(צFP6502 and Elems6502 which are( customized for your choices of :ת(צ! - Apple // or /// target machine(צ - ProD0צZero page indirect : 08Zero page scratch : ۛ.ádɡ"(צ.CODE-(=$ɡ8.CODE׷(צ.CODE-(Zצ Output Files Press ESCAPE to resge indirect, orצ!just press RETURN for the defaultצstarting locations shown below.צNOTE: All addresses are in HEX.צZero page indirect : צZero page scratch : צ0צ$of zero page for scratch space, and "another 8 contiguous bytes of zeroצ'page for indirect addressing. You may צ"choose the locations for zero page"scratch and zero pas shown below.NOTE: All addresses are in HEX.Starting address : 1000Starting address : צ Zero Page Useצ$RETURN to accept, ESCAPE to restart. צ%FP and Elems use 44 contiguous bytes צElems6502 Addressצ$RETURN to accept, ESCAPE to restart. צ(Which starting address do you want for &absolute Elems6502 code? Type in yourצ$choice, or just press RETURN for thestarting addresType in the yourצ$choice, or just press RETURN for thestarting address shown below.NOTE: All addresses are in HEX.Starting address : E000Starting address : N) : צ Type 1, 2, or 3 (then RETURN) :  1ë*צFP6502 Address$RETURN to accept, ESCAPE to restart.׮ (Which starting address do you want for צ'absolute FP6502 code? E to restart program.׮ %Which code style shall the customized files have? 1. Absolute2. Relocatableצ!3. Absolute FP, relocatable Elemsצ Type 1, 2, or 3 (then RETUR Elemsצ 2. FP only 3. Elems only Type 1, 2, or 3 (then RETURN) :  Type 1, 2, or 3 (then RETURN) :   *Xצ Code Style Press ESCAP 2. ProDOSType 1 or 2 (then RETURN) : Type 1 or 2 (then RETURN) : 2ë *@צ Select Files Press ESCAPE to restart program.׮  Which files shall be customized?צ1. FP andype 1 or 2 (then RETURN) : 1ë *@צ File Formatצ Press ESCAPE to restart program. צ&Which file format shall the customized files have?1. UCSD (Pascal System)צTarget Machine Press ESCAPE to restart program.׮ Which machine will be using theresulting customized files? 1. Apple // 2. Apple ///צType 1 or 2 (then RETURN) : צTE2Ɓ DISK UNTIL DONE.$Ɓ(צPress space bar to continue.(Copyright Apple Computer 1984צReboot to quit program.׮ ́́ʁʁȡ&ʁʁʁ́Ɓʁ ʁá ,_L OS/SOS or UCSD format( $ - absolute or UCSD-relocatable codeת( צ! - location of code (if absolute)( צ - zero page use( YOU WILL NEED A 2ND DISK DRIVE.ת(́ƁצDO NOT REMOVE ƁצSANtart program.׮ A@(Type in the COMPLETE pathnames for the צfiles to be generated."צFP : +ת( Elems : צ(+FP : + +צ+A)Elems :  צ퓡@,\ FצSummaryצ Press ESCAPE to restart program. צTarget machine : צTarget machine : צApple // /:File format : kjk  턍ȡBڏ/ȡBڏ/ȡ"B!Bڶ!ȡ8ڡB!B!^,́ʁȡ۶ÍBB!ˡ^ ˍHB!ġɡB!lقB!mB  -**؂+/ B$B$0"!!:*ث!!8+B*B* B*B*ˡ''إB''(  %۹+(( %"B" áB" á$"áOLD FILE WILL BE DESTROYED׮BB$B 2''kAj@    '|( צNOT ENOUGH MEMORY Má:OLD FILE WILL BE DESTROYED׮ئVOLUME NOT FOUNDתئNAME CONFLICT IN DIRECTORYתئNO ROOM ON VOLUMEתrצDIRECTORY FULL\צDISK NOT OF PRODOS FORMAT;$ hQ "Kئ I/O ERRORת@ &á #& @9  "$&m*,.02468:<>@BDFHJLNPRTVXZ\^`bdfhjlnprtvxz|~ئ I/O ERRORת #"ˡB# ""$ٹצDISK IS WRITE-PROTECTEDئ BAD PATHNAMEתצVOLUME WENT OFF LINEצ BAD FILE NAMEئNO ROOM ON VOLUMEתצVOLUME NOT FOUNDצDUPLICATE DIRECTORY ENTRYئBAD INPUT FORMATתئDISK IS WRITE PROTECTEDתצUNKNOWN PROFILE ERRORئDEVICE ERROR ON READ/WRITEתM.CODE(צSANE2:A2X.AELEM.CODE(5,SANE2:A3.AELEM.CODEת(SANE2:CUSTOMIZE.DATAת( {BBBBB,ݥBBáBbx !ٹצBAD BLOCK, PARITY ERRORئBAD DEVICE NUMBERss space bar to continue. á צ Working ...@"rتPress space bar to restart. "H ۹,SANE2:A2.AFP.CODEת(SANE2:A3.AFP.CODEת(}7,צSANE2:A2.AELEpage : צ'If this is OK press space bar to begin.س á צ Working ...Ni t턡6 تPre :  (ڕg Code style : Absolute Starting address :  9צ Code style : צ RelocatableZero page indirect : צZero 9 Code style :  RelocatablewFP Code style : Absolute Starting address : צElemsڂ(ȡ$צ Pathname ProDOS/SOS2File format : UCSDצFP+ڂ(ȡ$ Pathname :  (ڕ+gצ Code style : צAbsoluteצ Starting address : "N .  ġ!, BSANE2:A3.AFP.CODEG#BצSANE2:A2X.AELEM.CODE!BSANE2:CUSTOMIZE.DATA-.  ) CUSTOMIZER SUCCESSFULצPress space bar to restart.س b j0)0   1á (2P$2:Bn2BN5#4Zhhhhhhx 09݂ġ ݂$ $ $ȡ%  0 ފ$čV   .ˡ:  Eɡ  -ݑ š 0 0 ߿`ġ(   ݂. ݕ ؂݂3  >ۓɡ ؼ݀$ ؼݞ$ۡܡ ؼ" Bɍ -   $ $ ݞ$' ݑ$ $݂ō $   "á +-Í-09Ȅؼ 0.á@09Ȅؼ0ݞ$09ȄjeEÍɍEáޢݣޢÄá ޣ Ą.! ޣ Ąݣ ˡRݣ &ݢ ݢݢ!ݣ "ˡRݣ ˄ݢ!ۂ"ˡ+ݢݢݢˡݢݢ ۚݢ    ݂܂F      ޏݏ@܏ޏ@ݏ܏ޏݏ܏܏ ݏ ܏  ݢPROCEDURE FWRITEREAL(VAR F: FIB; X: REAL; W, D: INTEGER); "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWRITEDEC(VAR F: FIB; D: DECMAX; RLENG: INTEGER); "FUNCTION SUPER_MOD(A,B : INTEGER) : INTEGER; "FUNCTION SUPER_DIV(A,B : INTEGER) : INTEGER; "  IMPLEMENTATION L N E @dNTEGER[36]) /END; ' " "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); "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWR $ "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:IGBGG (  PASCALIOPDOSCOREPDOSCOREPDOSREF PDOSFILEAPPLESTU  #(H9HHH`F4Z0r.fv   z2Z| f!t"!# $:%&& F''(8)^)v)22BSANE2:CUSTOMIZE.DATA-.  ) CUSTOMIZER SUCCESSFULצPress space ݕ 0 . ݑ0 ݕݕ ؂ ɡ  |,  &  * عteVG8  )   uh[NA4'á +-Í-09Ȅ0ݡߑ ع     not found} Vol_Not_Found, {root directory not found} File_Not_Found, {last file in path not found} Duplicate_Error, {name conflict in directory} No_Roo Bad_Path_Name, {invalid pathname syntax} Fcb_Full, {file control block full} Bad_Ref_Num, {invalid reference number} Path_Not_Found, {intermediate file {$V-} TYPE Path_String = String[64]; Local_Name = String[15]; Byte = 0..255; Sys_Buf = PACKED ARRAY [0..0] OF Byte; Error_Returns = (No_Error, Write_Protected, n(j LEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATION: INTEGER); $FUNCTION RemStatus (channel : RSChannel) : RStatType; $ "IMPLEMENTATION X E EDURE TTLOUT(* SELECT: INTEGER; DATA: BOOLEAN *); $EXT$hhhhhh9.:.;.<0(0(099JH;HHH`Z310/$ T?@AB ?UB`2hhhhhhhhH)HHH`)J) D* کHH  ),`#d`L+L10`LELK뭕 JF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !hhhhhhh)hpdHHHH`4hhhhhhhi)hH`HHH`0hhhJhh)*XhHH`"hhhhhhH! \L HHH`<hhhhhhHHLM0ON KEYPRESS: BOOLEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATION: INTEGER); $FUNCTION RemStatus (channel : RSChannel) : RStatType; $ "IMPLEMENTATION X E EDURE TTLOUT(* SELECT: INTEGER; DATA: BOOLEAN *); $EXTUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; $PROCEDURE TTLOUT(SELECT: INTEGER; DATA: BOOLEAN); $FUNCTION KEYPRESS: BOOLEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATION: INTEGER); $FUNCTION RemStatus (channel : RSChannel) : RStatType; $ "IMPLEMENTATION N E $ $TYPE &RStatType = (RStatBusy, RStatReady, RStatOffline); " RSChannel = (RSOutput, RSInput); " $FUNCTION PADDLE(SELECT: INTEGER): INTEGER; $FUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; $PROCEDURE TTLOUT(SELECT: INTEGER; DATA: BOOLEAN); $FUNCTI  z Z   :    ( tV8z <| [NA4'á +-Í-09Ȅ0ݡߑ ع      z Z   :    ( tV8z <|m_On_Vol, {file to big, or invalid EOF} Directory_Full, {no entries in Root Dir, or no room to expand subdirectory} Not_Compatible, {incompatible with current version} Bad_File_Kind, {unsupported file storage type} End_Of_File, {read with mark equal to EOF} Position_E Wǀǐǀ á  ō ݂ á  ޕ ˡ ɡ   `h2h3hhhh á  á       ˡ áá       ޏ Ä  g  d˄D áš ȡ   #   ġá   $|Wǀǐǀݝ ˡKݝáˡ ˡˡݢݝ  ˡݚX   Wǀǐǀ     á ȡáˡ   ǀǐǀߢ ߢ  á %ݝ  ݢݚáߢښߢWǀǐǀ "ˡ" ߢ   ۢ  ڟˡڢ ˡ 6F Wǀǐǀ ˡ!ݟޓÄޓˡ"ݝ  ݚݢv W'+@x %" "$&(*,.02468:<>@BDFHJLNPRTVXZ\^`bdfhjlnprtvWǀǐǀܢ ܢܢܢ"ˡܢ t: Integer; BEGIN N E Bad_Block_Address, {index block points to illegal block} Io_Error {device error. check IORESULT. } ); VAR Error: Error_Returns; Resulume control block full} Dup_Vol_On_Line, {cannot add new volume to control block because of active volume with same name} ss than number claimed by directory} Not_Pdos, {not an ProDOS diskette} Bad_Lst_Count, {length of parameter list invalid} Vcb_Full, {volrror, {invalid mark or EOF result} Access_Error, {operation not allowed by Access byte} File_Busy, {operation not allowed on open file} Bad_Dir_Count, {number of valid entries lehFhGhDhEh ChhjfChhB ]hHHH3H2H``lǐǀ"ˡ   á  ȡ) á   á  Íˡ  á W ǀǐǀݢ ݢ  & `   áɡ  á  á~Wǀǐǀ (Wǀڝ  .   š*á ڂá ڕ á ڕ ɍ áK ˡ6 á ⢀ ߚ 9ޣޣ:ޣˡ ޢ ޣ :ޣ :>>/ܢ ޢ^ ۝  ڝ ˡ H ڝō  ׯ <   ޢޢáޣޣ ܟáޢ //ޢ 7ޣ8ޣ8ޣ9ޣEMENTATION E umb: Integer): Boolean; FUNCTION P_Close(Ref_Numb: Integer): Boolean; FUNCTION P_Read(Ref_Numb: Integer; VAR Input_Buf: Sysbuf; VAR Blks_Req, Blks_Read: Integer): Boolean; FUNCTION P_Write(Ref_Numb: Integer; VAR Output_Buf: Sysbuf; Numb_Blks: Integer): Boolean; FUNCTION P_Set_Eof(Ref_Numb, Base, Blk_Numb, Bytes_In_Last: Integer): Boolean; IMPLef_Numb, Base, Blk_Numb: Integer): Boolean; FUNCTION P_Close(Ref_Numb: Integer): Boolean; FUNCTION P_Read(Ref_Numb: Integer; VAR Input_Buf: Sysbuf; VAR Blks_Req, Blks_Read: Integer): Boolean; FUNCTION P_Get_Eof(Ref_Numb: Integer; VAR Block_Count, Bytes_In_Last: Integer): Boolean; FUNCTION P_Get_Mark(Ref_Numb: Integer; VAR Block_Count: Integer): Boolean; FUNCTION P_Set_Mark(RWRITELN EOF EOLN jPRED r(SUCC ORD  SQR  ABS  NEW > UNITREAD UNITWRIT8CONCAT TESTREWORDSTRE     READ  READLN WRITE REAL  TCHAR 2^BOOLEAN bdSTRING L~TEXT  rINTERACTHxINPUT trOUTPUT ^rԦKEYBOARD rLIFALSE dTRUE dtNIL 6lMAXINT xN BY {$L-} USES {$U Pdos.Corc.code} Pdos_Core; {$L+} FUNCTION P_Flush(Ref_Numb: Integer): Boolean; -^-^)N^PN^NINTEGER Nxg J^ Pdosvnum: Byte; {byte} {1C} á   á梀߾߾ á  ]Wǀ Wǀ"ˡ  Íˡ >e   áɡ   ڂ š  áqWǀǐǀ "ˡ   á  FUNCTION On_Line(Slotnum, Drive_Num: Integer; VAR Vol_Name: Local_Name): Boolean; FUNCTION P_Create(VAR New_Name: Path_String; File_Id, Aux_Id, Storage: Integer): Boolean; FUNCTION P_DestroELN EOF EOLN jPRED r(SUCC ORD  SQR  ABS  NEW > UNITREAD UNITWRIT8CONCAT WORDSTRE     READ  READLN WRITE WRIT  TCHAR 2^BOOLEAN bdSTRING L~TEXT  rINTERACTHxINPUT trOUTPUT ^rԦKEYBOARD rLIFALSE dTRUE dtNIL 6lMAXINT xN BYTESTRE {$L-} USES {$U Pdos.Corc.code} Pdos_Core; {$L+} -^-^)N^PN^NINTEGER NREAL  ߚ  š   AC?lwK4 # h2h3hhhh3H2H`F\2 R 6    ˡá áȡá ˡF ɡdá    ˡJ   á  á2   ˡá á á á  á   á     á ȡá      áá  á   áá )ڝ š  ښˡɡ   š áá    á  ʾۧWݣǀǐǀ Ʉݣ ݢݣy     á  č šá  ۂhá  ەPáK  ۂ ˡWǀ "ˡá  ȡrݣܟá ߢá á áá޾޾ áW áy(VAR Path: Path_String): Boolean; FUNCTION P_Rename(VAR Path: Path_String; VAR Local: Local_Name): Boolean; FUNCTION P_Set_Info(VAR Path: Path_String; VAR List: Sys_Buf; Leng: Integer): Boolean; FUNCTION P_Get_Info(VAR Path: Path_String; VAR List: Sys_Buf; VAR Leng: Integer): Boolean; FUNCTION P_Open(VAR Path: Path_String; VAR Req_ ǀǐȡqȡfWǀǐǀWǀǐǀWǀǐǀ ǐš0ȡE5ڞ&" ˡ,WǀǐǀǐšǀǐǀۧWǀǐǀÄ>Wǀǐǀá(ڦתޓ(ڦתRWǀǐǀ á  צ/ Wǀǐǀ h,s PWˡ ڧ87/  @ # 9á  4á  !áA0TǀpݝޓWǀǐǀˡWǀǐǀ ?Wݝ.~  Wǀǐǀ(Wǀǐǀ ˡ ōᓡ7GGáG/  @ⓡ'/ áá ""á"d  'ç ńާ @ ǀp-áZ P-áˡ/ á87..ݝ- #+7#ˡ,99ȡ71ō "áá1"//á//0 ōM" á,%Wǀǐǀ _ v/ šá ܪצ@áF `ުWǀǐǀ8ת""á"תǀȡ2ˡ&Wǀǐǀצ     ˡ  2 ۪ǀ ȡMWǀǐǀȡݛ#$ ڝ-á-.áWǀǐǀצ   !ɍ # (&ɡ  &ڏ 1 P@ōȡ-ݛ ݛݛaA/áá ˡ݂ݑ݂á٨ōئת(ۿڿ ȡ H ȡ (š  ȡ ܚܟˡܢC ȡȡType, Ref_Numb: Integer): Boolean; FUNCTION P_Set_Prefix(VAR Prefix: Path_String): Boolean; FUNCTION P_Get_Prefix(VAR Prefix: Path_String): Boolean; FUNCTION Start_Prodos_Session(VAR Num_Files, Num_Bufs: Integer): Boolean; FUNCTION End_Prodos_Session : Boolean; IMPLEMENTATION E ring; VAR List: Sys_Buf; VAR Leng: Integer): Boolean; FUNCTION P_Open(VAR Path: Path_String; VAR Req_Type, Ref_Numb: Integer): Boolean; FUNCTION P_Set_Prefix(VAR Prefix: Path_String): Boolean; FUNCTION P_Get_Prefix(VAR Prefix: Path_String): Boolean; FUNCTION Start_Prodos_Session(VAR Num_Files, Num_Bufs: Integer): Boolean; Si ת@-   !   ! N ȡ" š  !8H ȡ3 ߣáߣ áܯ > NݪP   ˡ˄áá   á á áCU á  }á b "á 8Í á 1áˡ  㚝 aa8aa ߚa Ä/`šá=ɧ=ō  > 8ˡz ašaáaá5á+ aޚaá áתP:š 7š /š1/Ó>?ABš >á) Ʉ á  Ʉ ^ Fڧ @צ@צ/A@B6 8ܪP8 š 7š > á /d v ܪP Ä/tá$ ? @ @A š 8 9š9: Ä   /ÓˡAǀ77ȡ1WǀWǀ ń 㿧Wǀ7/Ná$? @ @ Aš>?CCCwwȡDܛCá //wwȡ0ܛ/D}qDjܪP gNˡ/%۪P%N%N%ww%Pw_wP% /mǀwwȡ]ڧWǀǐǀNWǀǐǀWǀǐǀ ń/ á87 á:ˡ/á / á n  N۪PN Ä>>/ÓTS ˡáCTS  ɡ TSC䓡á /á^99ȡPá::ڟá٧W ǀǐǀ Ʉ áWbڪP ˄>ˡ87 / áCáCSTSCor lȡi ۟áݢڧW ǀǐǀ Ʉ p  RS STTUUVCá/ˡáCT>?788 á:>ABá á/CCRKv??ȡKTUá/98  98::/  /( ///??ȡ0/7a a /a áa  aa a9:ݡaaɡa a @a a aˡ a a a a87/áLaaá & babba98Wǀǐǀ Wǀǐǀ 8 ~ڪFá-. @ צ/ǀ/áFGG @GG>š -. @H h2h3hhhhh4h5hȱ[, ))0JJJJ4ȑ4HH3H2H` ?h0  LDLTr^HDN: J áLaaá & bab