LnSOS BOOT 7.0 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!)SOS KRNLb.D1/SOS.INTERP٠Ӡ̠Ġ.D1/SOS.DRIVERؠť 0 ) (lH'&3&'&#e'#%e'%'&"$"$#%'#%h`$e!: -SYSTEM.PASCALA!: .SYSTEM.STARTUP !AWTRAN.CODE AW30UTILYu' *SOS.KERNEL ,V!A.SYSTEM.LIBRARYA1`!*SOS.DRIVER4%H ,MLMTRAN.CODE !*SOS.INTERP}"B!`SYSTEM.MISCINFO >dLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@L%e,ȥ,*,- y,,,-,,,ȱ,,- yL+,ȑ,` 2"p-,-L(Ġ %>,i-i8, ȱ,%,W,pp ڠ %p`l  " ) i   !"#$%&'()*+,-./0120 `8`HiHiH ihhȱh`86)IH)heuQɸ` ` W` ] %饚0` W` ߰4`)|E8LLLRLLLLL*LLLLhh`LLL`SOS 1.1 1-FEB-82(C) 1980, 1981 BY APPLE COMPUTER INC.G`** }*`o^`on 8 JJAj@` *?($`Ҡ ؠťРŠРŠH v?c,,,,h߈ߢ~))`3ULLU**-i+`Ѕ񩏍E H pph`X٠ŠҠî!((ŠࠠƠɠΠࠝӠ̠SOS NTRPSOS DRVR(.D1(YYYYMMDDWHHMMSSMMMР̠űυҎϥŰή̮ӠȠӀŠŠҠĠx߭J ʈc(()o/ e/''ʈ((''()(1i / e/''ʈ((''((''((''' ('`ŠDAY, DD-MON-YY HH:MMSUNMONTUEWEDTHUFRISATJANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDECé@L&I/O ERRORINTERPRETER FILE NOT FOUNDINVALID INTERPRETER FILEINCOMPATIBLE INTERPRETERDRIVER FILE NOT FOUNDINVALID DRIVER FILEDRIVER FILE TOO LARGEROM ERROR: PLEASE NOTIFY YOUR DEALERTOO MANY DEVICESTOO MANY BLOCK DEVICESEMPTY DRIVER FILE '(i%%%h}%%`8 ȥ!8 !)"qȥ#q#e$ȱe%L)%`@(((( % %`((((࠰$(ɠH(@(h((((@(`%z %% %~(A{(L%`.8(.Je.&ʈ.s(1 6$P8"ȥ#L1$8"ȥ#(ϸ`"##L]$"qȥ#q0,$p)@"q"ȩq"8`*$% $% 8% $L$* $8%8 $`8 &'$% 8&$'% 8$%%`H   q ȥ q Hi hi 1  % H H ȱ h h % $$ 0 e e H i hi âz %` 1 8`    # &ȱ ' # i" i# # #`8 ȥ H h `8 6$P`8"#%#%"$w"$#%"`荚ٍ荺 荚`荺``` D ( )  * ) 4* * h* ))` L% q ȥ q Hi hi  i" i# #% $ȱ %ȱ &ȱ '`<!((g %(r(z(q( %y(i(0z %"#$ %&' $"#$%&'   `%$%ɠ%* " ~#C #p $ %*0"#)#)i $"% * %*  L! {" j% %ƌ(X#"$% "$ #%%& '   ` {" & ɠ% %)  !( (" %(r(z(q( %y(a(0: %   "$%&e$'e% R % <`` LLɠ8`ΛLL渠`ǽi `< Ȱ+<#5 ې'` ɐ ,ݐE`W8`R` 5&i ` Ȱ 0i `<8> ȐT eİF cȰB)Hh5 ˭)*ȑƑȥǑ'(ȑ`L)ɭ)Ѷ*e`M) `ۅH)Ѱ%}ʈh Nܐ'``hi ` p6۽ͱZ5 HȐ/i i `гW8`0( ɐ Ȱ ʮ6E`5 խ ɐ ޢ ȰLȍ۱Ǎ X̰% & !J8` *LĢ `8 iۥƍۥǍ`ۅ %  6 )Ѱ Ѱ` 𝭤e ǐ bǰL*ۈ5ȱ۠ƍȱǍ X̐ H h1  ,ݐE`ۈۅ ۅ 8ƭ X̐`LLŠå  ݭv̅w̅ ðzv̍ŭw̍ŭƭ ­ōō T̰]ŅƮņ X̠8iȱiiȱi ṰŅǭŅ XLōۭ۩ۅ ȱ8D`F`8eYƍťǍŠ)͠ Tٍۭۅ5ۅƭۅ X̰ ìۈۑ T̰ۅƭۅ X̰ۙ%ۍ" T`K8`)` İ ۱ۈ` ưW/ۈęۈЍ۩@` 8 MƐ  5 Q8`LŅ ۅ ۩ۍۅ Lɰ ʰۅۄÍÍۙ'Ù ۍ*ۨ  Ѝ۹ۙ8v- ðJ ¥ ð, ðLO ʰƥLT`'  mې浰``8 8 nʰ0 ̰+泱Ƴ m° x̰ ̐8` m° x̰8 ۢ8 ˰y ` ¥ nʰ泱Ƴ T̰#泪 Ѳ *Ƴ ` L@Ϡ`泑Ƴ` LaĥH8`JȘ I8`  S`ۈۥۥ۩Íۭۍۭۍ հL¢H8`Jj Ȅ ۍۆeۅiۅ Lɰ ʰWۅۄ ¦J> ɩE` eĐL Ȑ 15WL NL5WW{5 ې'`,55 ې'` ݠ B1 ȩȑ Lɦ8`5  @ R㥶i ` İG8`F`X8``éۅĩ D` T֩xxMH]@ Kۅ5H ɐE$ eİ Ȱ h`h`8`W h8`hR`hLҿ i x +ۅ5ۅ6 ǰ `E8<W`­ `0XLۅ5` ռ``ߤeI`IiţO`Ȯʆ/ )󘑡`()0zq 滅ѺY Ueۅ5Ѻ Ѻ  Nܐ'`i ҩ *C8/y.i/ ȑ  © $ E7<3W`ȽLֽȄ @8`R ) [)_[AͰ")[)_[A:0/.ЩȑΘ8e * ȩ`Loü 7)?۽۩ T٠Յ<ōōř ռV7 uM78 V榠=ü#)@5 ɐ ,ݐE ) .) @L `lne ٫޿=ϏZaĚֲ̛zؠIJK,-NOPQ0vt Ѷ"` ɰ Ȑ`E`Ɔ X̐8`>>5Ѷ Nܩ<`>`\ʊJJJJ ۍ۩  ˰Fȱ X̰6 0 Lɠ 0ۑۑ8ȱ`H8` ɹ $  8JJJJ8 ` ۪` H hQ)fʅ F jF jF jF &!  aװ*  ̰F湥 ƹ`Z8`@  ʰ泭ۑƳ ʐ` ʐ` ˰ ƹ Wː`ۘ . . .۪8*Jۦȱ ˦,+* ʈJj 9ؠ uiȩ`u4泱ƳHhv ʠiȱivL=`L7ؠ"  `1` Đ7@8V۩ Lɠ۪8ۊ۠U)JJJJ X Ġȱ۠ ȍ۱۠ ۭ) ۍ ð*)#  O̰``)(`N8` ) |հۈ ̰آ*գ  Ͱ ݢգ LrLwؠ; ڥ(8` ְ( ȱ5 HȦ)`Ltץ: }ש {ְ⥺i ꥻ(8`Lt Ltש u )۠0)p խ.8`)@ ϰ) ϰۈۅƭۅǭۅ5 X̰ *ƭ۬Ͳ̳ƄǺ yϰL  ΐ` [հ> H۪ȱHۑhƳh yϰq ` ʰiȱi `)5©éՅĩ5 }JJ+`.`8`ɂ )`@ }ש {ְO ֤Fi)# Ԑ)Hۑۑh8`P) հ [հҥ,J+j泭۪ƳۑȊ ) jPL ͊.>.ʱ+,EP!.E.L{+,,ӄ*- P*e (` հB հ5 [հ0,J۪泭ۑƳ-e(` L Ͱ2 P tҐ#L8 T 2ΠHHȑhhȑ`Lm )N8` |հ*eȱ+eȱ,i۠Ѻ۹ۑ񥤅- ť.Lgԥ.Lj Ͱ$)rJ Lɰ  ͰU..++,,IJ/ ӥ-.?Цե,J+jѲ4Ƴǥ4聠 H hH th8`8-ȥ.L 8*Ʊ )8 0*-`.G.ʱ*+,EP'.E.LұE0+,,ӄ*p)  )LHѠٰ )8`i (` )N8`*eȱ+eȱ,i۠Ѻ*ȱ+L - ť.Ltҥ. ՅL' ͐Lm pͰ.J/)@߅4ѥ N8`) ))УJ8` ۑȭۑǠۑۑȭۑ($S8`O8` "` / 򑺠+* ͐H h8` ΰi `(  *ǵµ ՕØ5Ņ4mȩυɩč5 oψ }.8` oϙLOϐ ˢ L΢ ΰ LϠ ˢ ΰ1` Đ@ АP8`B8`ۑJJJJ -+jѲ84ƳJJ 2ΐ3泑ƳLTΩ潑ƽ`ƱƳ ΰ( {Π۵*+)e`8`)` J J + ΰ" 0 ΰ 🱼ѼL8`ǩ Ϡ` ϰ ƑȥǑ` Ѻе*`)ȥ+8ۍې  ,ѺLTΠ"LΠ5 խ ɐ ,ݐE`C8`)@ ϰa)ۥ,8ېu+J,\ ȱLJΠ) ϰ'#,J(] { ΰ ƑȥǑ.8` { ΰ,JѲ ƳL΅ƱƳ ΰҥ,J0`#$"0#`!qȱi 5H5Ƶ ǽ jh5`L2̩ƍv̥Ǎw̩ÎL+Ϡ©ƄǥLj̩۬L~̠HHh` ̐`*ѺG0?M`)J"u-- M8`۬` # ː`  = O̰)= I`JJJJѶQi Lˢ  0 ̐ `"L˦ `H8`8$$"$= O̰=`$0`#$"0`$ۑĥ` İp") N8`) TپU0 ĥLä U0 ĥLä !"#$ Đ2@H >ڰCŰrP` 0ڰ(` >ڰѶ? İG8`Fە1 ռ İ ЩP߭)@N8`1@8` >ڰ񈱴ۈ)ۅƭۅ X̰ 0ڰLÍLT̥L㼠  ʰ` İK ХP8` LɐH80)N  հ)@LL ˰)0 ̐` M ­۠泭ۑƳѲƱƳ X̰ Oڰä泱,] Xx,f (I0јIFjFjFji```x@gŽPy+wLwԠ͠ŠԹ.D1 .D2 .D3 .D`HJJJJh)y` (2`]PU]]UPPX0 0 PPXPP  РŮÀӀӠŠҠҠŠ宠栠ՀʡР̠ҠұŠԠLQ  * WHHH>%H H @`)h8`  HШБˆeЅА SYSTEM FAILURE = $hh8`hhhxآY_Z@tPRVT,p S JJJJ ) ʍL@ i0i6`àРŠ̖堠 ``HhHy)(h`H` 0L?i `h` `` `x)( 8 `jjJJԥ)եӬɂ )Ӆ҅`  `H0Xh`'ȠȈL` 8`څ  Lk%  Lk8Lu텚8嚅 L L Ld V ``  h` ک V `ۅץ  VLFx) ( :` H ) L  .P'pб0 &L:L5'8+8`0Fܢ` ř,Ř 0 8f)J àӑґ𠠣ŠŠ` LL#L/LL'Lgab `abBcd cdBrcadbho:ab.cݰdDcݰd8abҊ v+abcde0f`   cCȱcD C Ea  UV 1 ELUFVG FUUCVDեYCWZDXWXCUDV[ v`b0WXYZiUcȥVcWX eeYZ ggE` @SATR """"""""33333333DDDDDDDDUUUUUUUUffffffffwwwwwwww(C) 1980 Apple Computer/DL8H\0`(d  $,($  ,.GRAFIX b """"""""33333333DDDDDDDDUUUUUUUUffffffffwwwwwwww0,>!SHOLES 1!1!2@23#3#4$4$5%5%6^67&7&8*8*9(9(0)0)-_-=+=+\|QWERTYUI OP[{]}`~`~ASDFGHJ K L ;:;:'"'"ZXCVBNM ,<,<.>.>/?/?d0hp00000>" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  8>> ""*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>>356789:;<=>?Tefghijklmnopqrstuvwxyz{ 7  3  5  >>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< SOS DRVR"CHARSET )((8*,;((*,((+)((9/(p((>3  =9 :9 .(+( 8#8# %3(8 ((,+)(%.4$)?((,(103  )* i LiHh`PQPQ>P Q,PQ"PɀQ@PAQ`8`nɀ<)nopoLpp` 0h8蘠fȊf` ab 1abo)abaݰb L9c`` a N0Ioa0H ha`pLopna n`  3ɠ/8 L %iLɠ8逨J Hh $`b >_-%^%p_^^_ab"08^c_L8^c_L8^c_L8^c_ȑcc\] ab^_ ``aV R0M bba dda `Q8STRQ ST`c\ȱc]a  b 5DU e\^e]_ ^_ ^_LH8\^]_?Je\^e]_,78\^]_ ^ݰ_ ^_LH^_ $bL@A^_aoQ*@A RQL@A `T8`RLSJTKQHIQiHiIKNJ)M8逅OPOPHMIN'a MHNILHOIPaOHPI8JHFKIGFGaHMINNMʆSTL8HSITQQST((((PPPP @``` @@@@`xp<@ @ :H9H` (# ( (l..PcJt`,t$ ( t`tL4`,t0L4 HH`! (`ɖ" (èÈ``,t0L4 HH`L  d!  `ɖ" ( dÈ  ``,t0L4 d0Cս30. ( R  @„ȄL5`ʝ`))ժuvЭ H ʊJyJ`&&*`JJ` **&*&ߥ`J` ***`` ` Jjjߊ` ߊ`JfJfFߪ߆` `JfJfJfF`ߩ`$011̰JJJJ) ܭL FܪJJJJ)`'+9;=?ACEGINR\aejns~ϭ - g, ϥ- gϱϮEϑʩ`P v  DH` g(h`$0#$E$0p Q%Qʑ`pPIE1p$E$0p Q%Q̑`pPIE1pΦ#$01ʐ1`JJJJ)`%υߥ`1(ȦJJIiHمh8Iif٤Φݰ>Jj8ۅe݅eޅ $  i`!J8݅ eۅ$  i` ( R $צ! LP XL@$7߭$PH8 jߩ jh ߍv`i,ʐi,iPIIʥ)ifʦʆ̐pLf/Fϐ&Ȅ`'@τ`Fϐ@ E҅F8ئȢΆѽϽ`/(L!τ`ϩE҅0Ȅ(fL! ('Άѽн`8Hٰ h      0  ` ` @ ``8٨JJJ ) u˘ vͽʅ̆`8Hi #iϤҐ мφi`Jf`<,&ʰ,i8i#Hiihifʦʆi) `  )`%)8`)    D   ʥ)Ģ    D Ģ L E% %) L 8`ۅ&ۥeepɀjff&ݥeepɀjffݠ %)  %)`%  0.)  ( R Εm٭mڭ))njnjnjfjfjfj+mӥmԐ8L$ Ӣ ,$0F u բӅLt  mӥmԐLY h028ٍڍ0Z$eٍeڍm٥m8٥08ٍڍ`8٥058ٍڍ0ԭeٍeڍ808٥8٥ 8مڅ H80 J8}L u L 0yʽz0 u L3  Lh `*f*&*)` ` i f`Hآ Hӭԭ h h`8٭  \L` H ( 8 R ТΕLϦI Y +)J* c I R 8fxL@ Y I)!) c Lթ`~L8L)  =H 'HH N M))Mhh0 ϭPh0 йPL)`)L` L\`ɠɀ)ӮԮmwӥmxԐ mi` CHBH`{ "`LL) @L) L8``,P<0 )ߍL( J,P,QJ,R,SJ,T,U,W`,t0L40 ( dȅɥŐ ĐL  xLJ}~~Șݶ~`}}~L7 L }ީ~` jhz|ֆ׆ح)JfJf$PIJfש ʈ8 @ש wx   ʊJJJ莟mwwxix 0ޤՐڢ  #&).369<ADGJMP^g $*-06=BKOR^agjmpu}*/28BWsvy~ " pH. APPLESTULONGINTICHAINSTUSOS2 NUCLEUS NUCLEUS SOS  -e*)eLL`pMK hh hhHH`'6hh  ;C hhȥ ߥHH`  87M9\hhhh᭙0:0D0  !"#$%&'()*+0123456789:;@ABCDEFGHIJKPQRSTUVWXYZ[`abcdefghijkp@=97)('%#  zhh ?hh)HH`*c<`&&&e?L' hhh)?hȼhhhhHH`hhhhWV) ) 02@*P"`pL&&&LFfFfFfFfHH`P.AUDIO,d`hXȑhhWȑhhHH`_`O?/!hhhhhh9.:.;.<0(0(099JH;HHH`Z310/$ Thh   MyMz { | y z {U|HH`A<62,('&% `hh hhhhhhh)h' 1H)/HHH`,d+`,+#Lhhhhhhh)h) YH)U)HHH` !<hhi )n YhhV)ȑhhU)ȑhUE hxNIL :pMAXINT |RRKBYTESTREWORDSTRE .WOR 0BN DY  P  V  STA READ!PROCEDURE SOUND(PITCH,DURATION,VOLUME: INTEGER); !PROCEDURE DATE(VAR D: DSTR8); !PROCEDURE TIMEOFDAY(VAR T: TSTR6); !PROCEDURE CLOCKINFO(VAR YR,MON,DAY,DAYOFWK,HR,MIN,SEC,THOU: INTEGER); !PROCEDURE SETTIME(T: SSTR18); !  IMPLEMENATION E TRUE hxNIL :pMAXINT |RRKBYTESTREWORDSTRE .WOR 0BN DY  P  V  STA READPRbRINTEGER R CREAL $X CHAR 6b BOOLEAN fhe STRING P TEXT $vMEINTERACTL|ouINPUT xvSTOUTPUT bv KEYBOARDv0FALSE hTRYPRESS: BOOLEAN; !FUNCTION RANDOM: INTEGER; !PROCEDURE RANDOMIZE; !PROCEDURE NOTE(PITCH,DURATION: INTEGER); !Copyright (C) 1980 Apple Computer] ;Clear the Buffer 0LDA #16. 'b'b)Rb  !TYPE "DSTR8=STRING [8]; "TSTR6=STRING [6]; "SSTR18=STRING [18]; " !FUNCTION PADDLE(SELECT: INTEGER): INTEGER; !FUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; !PROCEDURE JOYSTICK(SELECT: INTEGER; VAR X,Y: INTEGER; VAR B0,B1: BOOLEAN); !FUNCTION KE@BCDEFGHIJKLMNOPQRSUVWXYZ[\]^_`abcdggbgbbg qr80bHH`' <<EBi[ZXGFD@2  FdhFd  P  V  STA READ $ "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:IتPRš+R+PP4تPRšG+R+PGP4GRšزGRPزGPR0D~YSLIB:CHAINUNIT.CODECHAINUNIT.TEXTSYSLIByy6JJ>Bb^JJNR^^ bb"L^LtJ ^JECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, ( (PROCEDURE SetChain( Tytle: STRING); (PROCEDURE SetCVal ( Val: STRING); (PROCEDURE GetCVal ( VAR Val: STRING); # #IMPLEMENTATION E _ERJSYSLIB:CHAINUNIT.CODEhhƀ 0ȑƀ0hJJJJ 0ȑ) 0ȑƀĆLOL,3-'~{vvvvvvvvvvvZTNlb3 `\[TOG@;:3(  T[Fc= YP12 &%& FTYP13 &%& FT ei|ʽ 8襁i}ƅ|L,hƀhhh8hohlhXhhhFffff80)ƅܥ#FfII懥HHL,LGhhhhhƀhh-Ȅʈƅ})H揥>ʈƅ ~擥  抦|ɥ8包~ƅLII懩&&u`hh HHHHHL,}ʈƅFyʈƅ}ʈƍƎƋƊЌإL2d|e~28ʈƅyʈƅƉ` _LWŁ|}ƅLwE||怦}ʚH恺8倅偪ƅ  ILL, _LwLL,E0LL _Lw ILL,ELL _LwEe8刅刪ʈʈݒ&~ƀLV~HHL,~HH~HHHHHHL,~ʈƅFHHHH恥HL,0~}ʈƅ0I愊iʈؚH恥LŁ|} ƅLw ~~8ʭ==` 5l 5 l 5lhzh{hƁhhhƁ}eʆƀƀ|ʊe~8偅z{lzhhhhhh8冐 0 h HHHL,LGIL,h hBCʈ _.ł( Ł|} ŀ}|z Z   :    ( tV8$@hvhwhhxylxh:vwlv8<<+-Í-۲0ݡߑ ع       &  * عteVG8  )   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 ^JECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, CHAINUNIT.TEXTSYSLIByy6JJ>Bb^JJNR^^ bb"L^LtJ ^JECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem,   Procedure SCTLSTAT(SOSNumb:Integer;DevNumb,StatusCode:Integer; 2Var StatusList:ByteStream; Var RetCode:Integer);  Procedure SOSDATA;  Procedure SCREATE(Var PathName; FileID,AuxId,Storage,EOFBlk:Integer; 2Var RetCode);  Procedure SDESTROY(Var Pa"MAXFIELDS= 12; "FILTRSIZ = 9; "  (* DISKETTE GEOGRAPHY *) "DBLOCK = 2; (* DIRECTORY BLK *) "HBLOCK = 8; (* HEADER BLK *) "IBLOCK0 = 9; (* 1ST BLK WITH INDEXS *) "IBLOCKZ = 38; (* LST BLK WITH INDEXS *) "LBLOCK0 = 40; (* 1ST BINTERACTHxINPUT trOUTPUT ^rKEYBOARD rFALSE dTRUE dtNIL 6lMAXINT xNBYTESTREWORDSTRE  *) "NZCHARS = 9; (* IN THE ZIP CODE *) '^'^)N^PN^NINTEGER NREAL  TCHAR 2^BOOLEAN bdSTRING L~TEXT  rC A N N O T EXCEED 6!) *) "MAXLINEL = 40; (* MANIMUL LENGTH OF A PRINGING LINE *) "NLCHARS =105; (* NUMBER CHARS IN A LABEL, *) "NNCHARS = 9; (* IN THE NAME CODE *) "NTCHARS = 20; (* IN A TELEPHONE # *) "NUCHARS = 6; (* IN THE USER CODE USES APPLESTUFF,SOS;  CONST  (* MAILING SYSTEM VERSION NUMBER *) "MOZARTVN = 16; " "(* DISKETTE GEOGRAPHY *) "NSLOTS = 960; (* MAX # LABELS ON DISK *) " "(* CONFIGURATION OF A MAILING LABEL:*) "MAXLINES = 6; (* MAXIMUM # OF PRINTING LINES (@Sbu|   ! & : = D G V r v y    ! ( - 1 6 9 > G N V [ ^ c j o t z     % * 2 9 F L O T W   / 6 9 B `  "&),/4:>BDFHJLNPRTVXZ\^`bdfhjlnprtvxz|~  !$)039BIQTX[fiv *-25 hhhhhhhh ȑ H H`RP<8741.+)  ph h hhhhhhȑ H H`HF1.+)$ `fnFB Retcode);  Procedure SD h hhhhhhȑ H H`NL7630-*( jh h hhhhhhhhhhȑ H H`hfEDA>;941*'$"h hȑ H H`nlc`]\[YVTRNMLKJA><31h h hhhhȑ H H`:8)&#!Ph h hhhhhhȑ H H`HF10-*'% bh (h h hhhhhhhhh3hȑ H H`LJ;863/( fh h hhh h*hhhhhhhhthName,RetCode);  Procedure SRENAME(Var OldPath,NewPath,RetCode);  Procedure SGETINFO(Var PathName,FileList,RetCode);  Procedure SVOLUME(Var DevName,VolName,TotalBlks,FreeBlks,RetCode);  Procedure SGETDNUM(Var PathName, DevNum, Retcode);  Procedure SDINFO(DevNumb:Integer; Var DevName,DevList,RetCode);  Implementation E usList:ByteStream; Var RetCode:Integer);  Procedure SOSDATA;  Procedure SCREATE(Var PathName; FileID,AuxId,Storage,EOFBlk:Integer; 2Var RetCode);  Procedure SDESTROY(Var PathName,RetCode);  Procedure SRENAME(Var OldPath,NewPath,RetCode);  Procedure SGETINFO(Var PathName,FileList,RetCode);  Procedure SVOLUME(Var DevName,VolName,TotalBlks,FreeBlks,RetCode);  Procedure SGETDNUM(Var PathName, DevNum, Retcode);  Procedure SDLK WITH LABELS *) "LBLOCKZ = 279; (* LST BLK WITH LABELS *)  PBLOCK1 = 7; (* 1ST POINTER BLOCK *)  PBLOCK2 = 39; (* 2ND POINTER BLOCK *)  A{MAXAMISIZE = 26; MAXAMSIZE = 9;} "BLANKLEN = 80; "OKTOCLEAR {ERROR WINDOW AFTER USER ACKNOWLEDGES ERROR} = TRUE;  IGNESC = FALSE; {FOR ERRWRITE, SPECMSG - FLAG VALUES TO IGNORE, ACCECP ESC}  ESCAPEOK = TRUE; "EMPTY = ''; "BLANK = ' ';   {^EJECT} -O_RETRN = 13; -O_ESCAP = 27; -O_HOTAB = 9; -O_UPARR = 11; -O_DNARR = 10; -O_PREVS = 16; "LASTU: INTEGER; (* UNIT# OF LAST DISK OPERATION:*) "U: INTEGER; (* UNIT NUMBER *) "BUFFER: PACKED ARRAY[0..511] OF CHAR; " "(* THESE INDICATE IF INIT RUNS FOR 'MAILER' OR 'MURGER' *) "AUTOMATIC: BOOLEAN; "INITUNIT: INTEGER; " "NT: INTEGER;EGER; "CURRSLOT: INTEGER; "FREEFORM: BOOLEAN; "TTYMODE, "ERRORSOK, "NOERRORS: BOOLEAN; " "(* R)EADING & W)RITING VARIABLES: *) "B: INTEGER; (* BLOCK#, USED BY R,W *) "LASTB: INTEGER; (* LAST BLOCK READ/WROTE ON DISK: *) LINDENT: INTEGER; $ &FD: FIELDATA; $END; " "CRTCOMMAND = (EOS,EOL,CCU,CCD,CCR,CCL,LDI);   {^EJECT}  VAR " "BUGPATCH: ARRAY[0..10] OF BOOLEAN; "SELECTED: BOOLEAN; (* IS A DRIVE SELECTED FOR MANIPULATION? *) "MXOCSLOT: INTEGER; "DSKIDNUM: INT&MXOCSLOT, &VN: INTEGER; & &DID: STRING[31]; & &MINZIP, &MAXZIP: REC6; $ BEEPCHOICE, &REMBEEPCHOICE: BOOLEAN; & &MINNAME, &MAXNAME: REC6; &NAMORDER, &ZIPORDER: BOOLEAN; $ &LABROWS, $ LABCOLS, $ GAPROWS, $ GAPCOLS, $ NUMBRUP, $ /A: ARRAY[1..MAXFIELDS] OF FIELDSPC; /PRMINDX, /SECINDX, /PRMLINE, /SECLINE, /PRMFDNO, /SECFDNO: INTEGER; /PRMNAME, /SECZIPC: BOOLEAN; " END; "DISKID = {UN}{PACKED} RECORD &DSKIDNUM: INTEGER; &MM: STRING[5]; &NUMSLOTS, &SERIALNO, ISLOT TYPE *) " " "INDEX = ARRAY[0..NSLOTS] OF ISLOT; " (* ONLY 1..NSLOTS ARE STORED ON DISK *) "  {^EJECT} $ "FIELDSPC = RECORD S:STRING[11]; L,F:INTEGER; END; "FIELDATA = RECORD & NLINES, /NCHARS: INTEGER; DEFINE THE DATA STRUCTURE OF AN INDEX: *) " "LOCATOR = 0..NSLOTS; (* INDEX INTO LABELS ON THE DISK: *) "SOUNDCODE = INTEGER; " "(* FORMAT OF A SLOT IN THE INDEX: *) "ISLOT = PACKED RECORD %L: LOCATOR; %N: REC6; %S: SOUNDCODE; %Z: REC6; END; (* ED ARRAY[1..NUCHARS] OF CHAR; " "LSLOT = PACKED RECORD $DATA: STRING[NLCHARS]; (* THIS IS THE LABEL'S MAJOR DATA *) $LENS: PACKED ARRAY[1..MAXLINES] OF 0..MAXLINEL; (* CUTS DATA INTO LINES *) $PHON: PHONENO; $MISC: USERDATA; END; $ " "(* "(* PHONE NUMBERS (DOMESTIC OR FOREIGN) " * ARE ENCODED AS UP TO 20 CHARACTERS #* CHOSEN FROM THE FOLLOWING SET: #* [0123456789X-():#]. *) "PHONENO = PACKED ARRAY[1..NTCHARS] OF HALFBYTE; "TELSTRNG = STRING[NTCHARS]; " "USERDATA = PACK6 USED TO STORE 9 CHARS IN JUST 6 BYTES: *) "REC6 = PACKED ARRAY[0..2] OF INTEGER; (* REC6 OCCUPIES 6 BYTES *) "REC9 = PACKED ARRAY[0..8] OF CHAR; (* REC9 OCCUPIES 9 BYTES *) " " "(* DEFINE THE DATA STRUCTURE OF A LABEL: *) " O_BKTAB = 137; {128+O_HOTAB} {THIS IS THE "BACK-TAB"}  {^EJECT}  TYPE " "HALFBYTE = 0..15; "{HALFBYTE IS AN ENCODED, RESTRICTED SET OF CHARACTERS: " ['0'..'9','-','(',')',' ','#','X'], CORRESPOND TO $[0..15], RESPECTIVELY.} " "(* A REC156; *O_ULCOR = 146; *O_URCOR = 148; *O_LLCOR = 149; *O_LRCOR = 151; *O_LSIDE = 144; *O_RSIDE = 145; *O_TSIDE = 147; *O_BSIDE = 150; *O_CAROT = 143; | <- ][ } *  O_INSRT = 201; {128+CHR('I')}  O_DELET = 196; {128+CHR('D')} *O_LLAPL = 156; *O_ULCOR = 146; *O_URCOR = 148; *O_LLCOR = 149; *O_LRCOR = 151; *O_LSIDE = 144; *O_RSIDE = 145; *O_TSIDE = 147; *O_BSIDE = 150; *O_CAROT = 143; { <-/// }   { ][ -> | O_BRAK1 = 91; *O_BRAK2 = 93; *O_ULAPL = 152; *O_LLAPL = "{ ][ --> | O_RTARR = 12; | <-- ][ } "{ ///--> } O_RTARR = 21; { <--/// } -O_LFARR = 8; "{ ][ --> | O_ENTER = 92; | <-- ][ } "{ ///--> } O_ENTER =129; { <--/// } "  { ///-> } O_GAPCH = 140; *O_BRAK1 = 141; *O_BRAK2 = 142; *O_ULAPL = 152; {NUMBER OF TITLES} "TITLES: ARRAY[1..20] OF STRING[4]; "MINONAME,MAXONAME: REC6; "MINOZIPC,MAXOZIPC: REC6;  MINUCODE,MAXUCODE: USERDATA;  UCONSULT: BOOLEAN; (* IF TRUE, NIXLSLOT MUST EXAMINE USER CODES *) "FILTERS: ARRAY[1..MAXFIELDS] OF BOOLEAN; "FILMIN,FILMAX: ARRAY[1..MAXFIELDS] OF STRING[FILTRSIZ]; "BLANK6: REC6; "BEEPCHOICE, REMBEEPCHOICE: BOOLEAN; "SHORTSTR: STRING[1]; " "HOTU,HOTSORT,HOTTOP,HOTGETF,HOTPDEST,HOTPITEM: INTEGER; "BRACK1, BRACK2, CAROT: STRING[1]; " "DIRDATA: PACKED 8?8`DE( 8DCDE` E0LXDE`DHEH hEGhDFL \DF]EGL) d>`H_E ^Db) b bh`  b)h` mDm`DE(EDmCDEhBkȌB`LBkB` '`)" (ÙY`L_Ùe`Ù `` q>  ,  C[JC` ?`> HH` s) L/ d` 6H5H` D^Ol>` ,b `  L LBa@LB a @LLD( (,=) =x)) v(cd `# (,=ȅɅŐİ  ( ,=  HH`! (88" (èYÈ`,=0L  ZHYH`Lh~}k} =@ '` `è 'H&H` (# (9d7="Z` Jcd % ( i=` : > D I o  \ax"'*MRU_fquz#6w|  .SILENTYPE A@  @ (C) 1980 Apple( jצPdچۍ,P QPچ0ڎ áۓ0PJV ^"ˡ"צreturn to previous level.Pצexit Mail List Manager.P11(Press RETURN to try again, or Eɡ٪PצP/.0101ȡ9./š$/.Ǐ. -0ɡ .-.001.-1PRtaġ zȡ   Uצ MEMAVAIL=  #ݞ( NCTION GETYORN(B:BOOLEAN): BOOLEAN;  PROCEDURE INITISLOT(VAR I:ISLOT);  PROCEDURE I2S(SRC:INTEGER; VAR DEST:STRING);  FUNCTION LESS6(VAR R1,R2: REC6): BOOLEAN;  FUNCTION MIN(A,B:INTEGER): INTEGER;  FUNCTION NIXISLOT(VAR TGT:ISLOT): BOOLEAN;  FUNCTION NIXLSLOT(VAR TGT:LSLOT): BOOLEAN;  PROCEDURE RAWCONREAD(VAR C: CHAR);  FUNCTION SPECMSG(MSG1,MSG2:STRING; BEEPEM,CLEARIT,ESCOK:BOOLEAN):BOOLEAN; PROCEDURE SHOWMEMA;     IMPLEMENTATION E VAR F:STRING; S:STRING; N:INTEGER); FUNCTION GETYORN(B:BOOLEAN): BOOLEAN;  PROCEDURE INITISLOT(VAR I:ISLOT);  PROCEDURE I2S(SRC:INTEGER; VAR DEST:STRING);  FUNCTION LESS6(VAR R1,R2: REC6): BOOLEAN;  FUNCTION MIN(A,B:INTEGER): INTEGER;  FUNCTION NIXISLOT(VAR TGT:ISLOT): BOOLEAN; STRING):BOOLEAN;  PROCEDURE BEEP;  PROCEDURE CLEARSCREEN; PROCEDURE CRT(C: CRTCOMMAND); FUNCTION C2UC(C:CHAR):CHAR;  FUNCTION ERRWRITE(MSG: STRING; BEEPEM, CLEARIT, ESCOK: BOOLEAN): BOOLEAN;  PROCEDURE FEXTRACT(VAR F:STRING; S:STRING; N:INTEGER); FUOLEAN;  PROCEDURE HREAD(VAR I:DISKID);  PROCEDURE HWRIT(VAR I:DISKID);  PROCEDURE IREAD(VAR X: INDEX);  PROCEDURE IWRIT(VAR X: INDEX);  PROCEDURE LREAD(L:INTEGER;VAR X:LSLOT);  PROCEDURE LWRIT(L:INTEGER;VAR X:LSLOT);   FUNCTION AUTOINIT(DISKNAME: CRTINFO: PACKED ARRAY[CRTCOMMAND] OF CHAR; $PREFIXED: ARRAY[CRTCOMMAND] OF BOOLEAN; $ $MENUITEM: INTEGER; $BLANKSTR: STRING[BLANKLEN]; $ $  {^EJECT}  FUNCTION IOWORKED: BOOLEAN;  FUNCTION VERIFY: BOOLEAN;  FUNCTION ENSURE_SAME: BOARRAY[0..511] OF CHAR; {CONTAINS FAKE DIRECTORY} "(* MAIN PROGRAM MUST INITIALIZE DIRDATA! FROM DIRMAP FILE *) " "ENTRY: LSLOT; "ID: DISKID; "IFILE: INDEX;  "BUGFILE: FILE OF CHAR; (* SOMETIMES THIS IS THE PRINTER, FOR DEBUGGING *)  ݲ>`A@>A HH`>`<>EeFJKL.^CcHV=WwBbG? "#Rgnh*2U^wb b) b b)b``@?m` _ ^`\]LY@?m`  ٥`^_LY j` j@)` jLX@)c`@)a`@HEmDh0_^`0]\DEH j@ jhLXB j@0)HmHHh jܭ@L`@)[) L:[)L:[0 H j[ jh[ j X `[) >`b b)b`@d`x) @( A`% (ALpx)`(BC `,A0Lp& (,A0Lp9 æĬSɀ֙TȌS 9S`YX`X-,ˆ̭U)? VW @ ?ddxtB˩Eʍ@Xx ,P E     ' + / 1 3 5 7 9 ; = ? D I M T Y ^ a f k q v { (Z.AUDIO C(C) 1980 by Apple Computer Inc.D vHuH` (# (jjA`,A$ (BC -047CKNUX[^nqt $ * - 2 7 > C F I L Q Z d k |   * - 0 3 < ? B E H K N o x    ! $ ) , 1 4 7 : ? B J O T [ ` e j m p {  !&),14>ADHKPSW`eipuy|  "(+037:?BGKPSdilotwz   "&) !$'048;@FIMPUY\`hknqw  %*.38AINQTY]bv{~cpa ,&(*,.0246;@Cchkx 2;@CNRWY[]_acegjq{'+579;=?BFKQTWZ]`ehknsvy| 6A}5 AA>III$QIHII""M]DIAAIHIAHEHIIAA H_ AAp*@"*QIYQIPIIAPIDIAAIHIA"AHBLI@QA@^ A6$# >1fN&`6> 9?6">A@.~A>0=3&@~| S ` 348``  y y 8 ``  b6>#B r>@62 >?>>>>2@~|cpC p*dI"*E!EAQIGIIA@ADIAAIHAAAHAHI@EA@?A>5 X 53e,<0m;f,<0m< X ij X h`  `0>H hJ)@$0P L S S L P  J L `J0 H/ H` d y ~ o t Z 8`8 8`8)8ILH > ' ` j 8` ) ` > ` C ` L `'8` P a P a J  L a 0 P a0 P a0 P a0 ) 9:`Y_Zx) ) =(`H6H 7I%h7680 9:LV 9:98;;<3ij X 3gh t,80,[ t` ^H ))[_^Zh`3J 3L 3 ) 4J 4 ح4 ) 3 5 P L 4  J L5 P P ) ` C $ a0 ,8BkL  ,8Ii`a a tL> a0ca t L 8D9E:II  t8 t`A t\] L  67L) [,8누 ,[ Hh tFI[J`K`IZJ[K`` H 0L06,8 `  t( K ,8`   ) J J LS HH `,80`B`#$+29Y` `` Z` [`  ) P LL ) 0)9  tL> )&0 e`BNk B L;<,b= ' 9 : , FDGE  L BLqk E: -D9%    C  tB@Bk L!8D9E:98F:G0 г氭LA t  BHb)bZ(itiBX`,A0Lp HH`! (```,A0Lp HH`L%&S```lBcguwy{}$(/4:?IXad#.PRINTER A"(C) 1980 by Apple Computer Inc.H HH` (# (Zg] >M")"#)  #ΝL{  `,0 x) `(`hh% ( ΍ ύ逅Ñ`` " ( ĩÍĩϭ & &υΠÑΈΝ % ҰةeÅÐн,QȱÍR`)P`Ɂ" (`Hh) `ÙJ`ÙE`)S`)T`)U`)V`)W`)X`MY0ȱ͏ ȱ͐L" ()X JJ* I `x|x|,,P-X % `T`U`V`W`X`[ȭ\`  `YȭȭéL, HH`L5L ^ ~     HEJ lO  th) `(" ( (ÈE  t`)) `(,LL͏[`͐\L L L L [LG LG ,0L5 H H`! (/0IU[agr}`(" ((èDÈ`QȭR`P```JÈ`EÈ`SZ`Z)Z`,@`[, [L[`[͏[`,s[L\͐\L ,XL \\L ,CL [\L [,)LL L YL Z)ߍZ`Z Z`aL bL )Z) ZL  xH,Y [J h̰ [h,L`  ;Yo}"+9GPYo ` Xb[m][\m_\]_^`L ]m[]_m\_[\L [m]^\m_`L bXL Z L,T ,U  H,T p  He҅Ґhe…å逅h,QRLґȥӑ,P0 h0  t`,0L5 ҅ӥĥŰ+,0p J L Lt )"Ơ̏ HH` M҅x  (ĥŐL ,PHȊ©L,T2,X-P" a{)X LnX0$0%,V ҥ #L$0T,WOKT0P;ҥ,W #LA\   8҅¥Ӆé҅Ӣ`[,S`,XP"[YJ H) +̰ H) +ʭP h̰ʩ8,)΂ ̓`,T H h J `,T!   J(P J J `,0L5,P0H0 ԥ f0)ĭX)XL5 I`6 `7 I`8 I`9A)I@`{ ~I)_ J) ) )) ,0E EJ%O J(,@OEJL` ((((PPPPBTVSPLH   5Aʘ ;H:H` (# (I// 0`)I<0 ^)WL)6 "%/27@EHRU\ain #03@INQ_dos|~ .CONSOLE a(C) 1980 by Apple Computer Inc.O  ODNNLSOPRnPO  % &$N) `,M0L }H|H`! (```,M0L HH`LwO NPQ #) "# ```FJ`,M$ ()LFG O M`% (MLOFG `,M0L& (,M0L7 Đ`ʥ逅8nOQRnʐQxOeʍOH )  h(eʅ8ʅİLp )` ) `),P,`,$ ( $  x) (,`% (L5, `é ĩ `Y) jYZNZ~ZO,Y0'^^^]]8^][[```__8`_\\b)ba)a b 04 )ߍY) J,P,QJ,R,S,T,V  `,[,Y JI`I`[,Y J)`)`\m_],YJ}ʅ̽(I I `[M,Y0JՐ̑ʈ`Jհ0yhhjjjjyjyj yLNz yy͔vy ?{>{HH`yvyvy y`hhhhhhUvȑȭvȭvȭvȭvȭvȭvȢvv u{ {HH`?{>{ ;{>{@ yxyxLyxy `7y y`>y y`nvPnvPhy`# y`iy8y %y`hy y`y`# y`y8y %y`y y`y`# y`y8y %y`y y`y`# y`y8y %y`y y`hhhhyvvvvvvv v wvLxv~vvvvvvvvvvvP wHva v9vLxb v*vLxA vvLx v wLx vЧv8y %y u{ { $v~vvvvnvƳv)b|LR!&X(E'+@FGH{|}~ |~vv莒v`͔v+͖v&͕v!͝vv0ݗvv0``ZwvSwRw`Zw]w [wvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv vvv1SOS NTRPvALvLzL@{L,|L|L~LLBLKL'~LN~Lu~L~~L}L}L~L~L~L~L~L~LlLLLL ~LkznvPL_wLcwv.CONSOLE.GRAFIX.PRINTER.RS232.D?vvvvvvv莓v`H M R Z n  "'+4=V[_kqx-0kqy: @ E H N Q T i q v y |      ( - 2 > i q t y ~ & 1 8 E Z _ b y   # * - 0 6 ; B G J M R V Y \ _ d i n q t y }   ! & ) 0 7   !$'*-27;@EILORUX[`chknsv   "$&(*,.BKQW]ckv        % ( + . 1 4 7 %=BEHKPX]aehorw{!$',/47:>ADGJMRUX\_behknsv|(,:<>@BDFHJZbmt{!$,169>AILORU[aknqw~ $27?DGKPSX`{ (+2;X[^chmI I $0;P̑бʑΈ,YJՐ̑ʈ0 Ցʭ̈`萠L ֦ڱΑ0Б֤ J L׭,Y0 JfiΥiώJe΅Хiю_ $ $p̑бʑΈ0 Б̱ΑʈeمΐeمА`萿  `ʝA`b`Ցʭ̏Ȑ`\m_[ $ J `L 8,YJf׮_$P` $ $P_/`'ʤ˅΄ϥ̤ͅЄ $ $̑бʑΈ0Ƞ J L $)טɀIim]ٮ_8ذ `$0"8,YJک@ׅפ؈۩MLj,Y08*Ȅ $ ,YJ}΅н(`>{ Dwviy<{jy={ky?{Șlymy Ey Dw:{`:{hhvyhyhyhhyy ryHH`vy\|y]|yy yy y?{y y y y y y`vy\|y]|y y y y yy yy y Dw Dw Dw Dw`hhh|h|hhTc| | u{HH` Z|f|^| || |  `vvvvd|ve|vv`vyLyhhhvhvhvhj vhh vvhvvh а HHXYp X lL`hh)X0 eXXYLeTveUwUwv8vXwvYL HHLXHXHL飨RHRHL gRe`fSeag fHfHL Re`fSeagfi fggHfHL gRe`fSeag hfhfLèPHPHL ]\R]S]S_\ȥ]Z[[ z ꮠRPRRSQRRQ RȥRi iL XaXYX `&a` `a`RdSeSedvȱdevd`ȱ`Zȱ[`XiXYXiXYUHH LXUVWXYZUmvmwwyz{{|}}}|Fxy exxx&yvexxweyyxȩxxixyzxȱzxȱzxȱzxziz{|i|}Г\]\8\VX WYZ@UUVWXYAUAUZ[\]^ 8 8 ť 8i杩村ƝUVWeYfZ[\]g^h_pح)pUVEUUVWXYAU[8  Z8L]Z UVXWYZ@UUVWY[ZUHH LUXVWXZYU6vUUvjjj)*U`4OOQUѥԩA8I֮|gsssssssʎ(@NX٤L\.D1/SYSTEM.PASCALj.D1/SYSTEM.MISCINFO<Put Pascal system disk in built-in drive. Press RETURN.!?_ @`7-$<ѐסMEEWݏ&{\\vEbA  e'<Ό"BձaYc]U|eƊRnVssѤ oooooooooooooooodaaaaaaa`)͓v vyLUz`)͓vvyLyhhhhhhHH`H yLyhhhnyhoyhlyhmyhhjykyh)͓vviyhhh EyHH`hhhhhhyhyhh h h  yyh)͓v݅ vyhhh) $y y ryHH`hhh))Z[L[ k    ڀHH`* X8  L{ X`X` ` `8\] ڀ hhhhHH``8Zy[yyy ryZ[`kylymy Ey`?vy@yAyyy ry`?vyLUzvyLyhhhnyhoyhlyhmyhhjykyh)͓vviyhhh EyHH`hhhhhhyhyhh h h  yyh)͓v1 vyhhH` v` `vyLyL|viyL~jyM~kylymy EyK~`K~r~vys~yt~yyy ry`r~vyLUzvyLyviy~jy~kylymy Ey~`~~vy~y~yyy ry`~vyLUzvyvLyviyjy  hhvv v.vUv8\Z][TZ[vevvv e    yHH`(L}L|hhhvhvhvhji vhhvvhvvhhhvv yHgPe`fQeag fHfHL Pe`fQeagfi fggHfHL gPe`fQeag hfhfLX  eg`edfaeeg fHfHL艠X  `edfaeegfi fggHfHL艠X  eg`edfaeeg hfhfL艠Xw e`veawvHvHL艠Xw e`veawhvhvL艠X e`eaHHL𨭙whvhwȱvHvHLhvhwhxhyyvxȥwxLȱXȘ vX)XYXHXHXevXYL ȱX khjhkjHjHLȱXvevevɀ6vlhh0jH*vjHHHl`w $x$y $z}F`} $~ $ $vL֚$x0$~0 2)hhLxxFx~F~yТ|8`$~ $$`|0 2) J8`068刨L 0 8`hh Řv h0 LH LHlnLgLm/ L 8L Řv hI=+ L Řv襀I= ƀ LȄHHLhhhhh*68jh*v x #n0 2)Lx%n HHLHHLh)vhh)hvL nhxhyhvhwEy0wyvx/1'w0+!hvhwhvhwHHLhHHL%nHHLhhh ~hxe~ |ŀ8~e|vl nXLvLL@LQ   Faf`LP hxhyhvhwXYwy`LvxvwxyaL LLwyhxhyxyxyhvhwvwvwvxx ȱvxvх~hL})L8|~}L~) w~fjv|) y|f}jx8xvyz–{{HzHz{{HzHzw9ᖅz{9▅{{HzHz{v {HzHHxiHLHHLHHL??zF~H~HLX hh&ņL0eeƆL8儅ņ 8刪8刪ƄLhh&eȹ~Ȅh)1~)wf~jjj)?vńevw9ߕ hHHLhHHL @hhHHHHh|h}hȱzxI%vyI%wzȥzLhhh ~he~Ȅ Ȅvl (~8~e~ h9 0 ʚL (~~ hI9ʚL (~0~ hʚL|v|z}{zve|ʥ~z{X|}hh &hezheHzH}H|He|HHLh~hh|h}hzh{{zȱz~80 iff| ==HHLhvhwh~hh|h}| x%vvy%ww~80vwwvxyyxi v&wx&yhzh{{zi檥HHL𑭙kmhjhkhlhmXk&ljȑlLjjlLTjlLL}wvwvLL{ he`zhea{zHzHL he`heaHHLhh a `&L钥`a ohezheHzHLXwE{0{wvz{LL^__`XȱY`ȱL. XYXYXXYL XYXYX步kg\8孅\]\)\]H\H0X\\8\]\ȥ\ȥ^\ȥ_\\^]_8\Z][LHXeXYL IiIi挥IiIiƌ8別剰 ` gf!ffgff8fg8&&`ffgff&&`hhhh 鏥IiIiHHLhhhh 鏥HHLhvhwhxhyz{Ey0y{)zx!{0ȩLLvhh0HHLIiIiHHLhvhwhhevewHHLhIihIiHHLhvhwhh8vwHHLgfff fefgegfgffff`hh0 hhLяhh"IiIiIiIi oHHLHHLfgL[X&XeYei揭W8XYL XiXYL hvhwv&whxhyy8\v\]w]8\Z][LH\xȥ]xL ȉhvhwhxhyv&wyZxȥ[xZevZ[ew[8\Z][LHL ȉhvhwwZvȥ[vLhvhwwvZȱv[lmmvLhlhlhhLhvhwhevvhewwwHvHLhhhvhwhevvhewwwvLkmhjhkhlhm Lhvhwhh%wH%vHLhvhwhhwHvHLhhIHIHLXXhhQX0XŏoXf0bXE0XRXŎIE8X65``ō0 2)sV.Ń ƃƌ2Ffff 5Ō10 2)L0  I2)hhLx`Ń 0"kgffff惩ŃO0 2):4)@ L54)  L50 2)hhLx`0!ƍL\&&&0 ƃƃ`\0 2)hhhhLx40$494) 0-L"L&% 8`$ `Vvvv`w8}Iȥ}v `0xȱx,xyL xȱxxyLHHLDHHLDHHxvȥyvL8~`~ȱ~wL8~~vȥ~wvevȱvev~8~Ɔ`ȱXXXLHUVi WYAULNZ\hhhhLhlhmhellhemmma ʑlmL$`LTu§ͧvxȑvxLje`jkeakle`lmeamakm ʱjlL*`LJjlLh`ha hhhhhhhhLkmhlhmhellhemmhjhkhejjhekkXL aʱjlmkL`LjlL8\Z][JHjHLhhhheȱe 0X lhzhhhTLvUwT8vUwv8vXȥwYzT VL SRSLqȱ yxȱyxLx8xyx8xyx zxб wvȱwvЗL  LXiXYL`hvhwhxhywyU焵V!cX_Z[^]k _#ǭ`xXb'dxehSgiQYjoNln9?oIqr|otEv7w߄y @{Η|½~v``| ˙v ˙w?}:w}NE||0vEvvv|)0LLv j$| jv| w}L 5)@ w}Lwv0|Lx0 xyzL&Fxfyfzzz賂%z!vxyz ]0xyvxIxyIiyx`v ˙ ⡥xHyHLv ˙ ⡥xHyHLhh' ϢH΢HѢHТHLHHHH0 2)Lx? ABzDF@GPtI$KL nN(kPQChS֢| Lw}v | Lv ˙v|L^LILhhhh4IiIi&lh{hzhyhx U xHyHzH{HL U Lw`8w0 2) hh ͞ Lw8}8eP&$0 LhhLxwe}8eLZiLZ挅@Fxfyfzeee~ffffإ Ln ] `v ˙| ˙ X LvE|v|w&}0  I2)2Lxv L}w~8&&&&&&&~ȥ~ 7 ] `v ˙| ˙ X LvE|v|w}M0 2)Lx IL}| L}wLw0 2)LxLv 𚥌 5Le| }8wei Li8iyzzv`v ˙| ˙vIvL.v ˙| ˙ XLǞw} LŞ|LO}%v0tn50h0 2)XLxw } LŞ}v| L Z%!0~0500 2)Lx L [Fxfyfzf{F~fff8{zy~x | `v|`4) ``5)@v|v`0  I2)hhLx` {ezeyexe~ ] ` 8{zy~x4) ` 7 ] `w}"$x~yzŀ {Ł|8`w}w}x~x~yZ[8 [ ΰ0 ^LU^VEU\8居\]岅]LHE08居\岅]LH8\Z][ ȉ8\Z][LH\]ee8)/H׳HHHHHHH YvLoLVUWX[ Yȱ*Z.[U!UWXYZU\]Li``­8Ɠ R~…`ŧVUEUL\]L %<B -\ 4PASCALSYUSERPROGDEBUGGERPRINTERRINITIALIGETCMD UCSDFILE EXTFILEMEXTFILEMTABLE INFORMATIONCI4Current date is Hd*Bƣed on U.  P ? Apple //X @{BB@6bBB@ijpbZb ԳԳ@vLϷ \vLϷ vLϷ &vLϷ 2vLϷ JvLϷ hhhhL5~ L}zLY~? + ,|$RќĆL||}z{Lv o ܶLQ| o|}zЬ{~  ܶL+8 Ɛ  6L~``   6  6`  6`8\] ܶLж`8Z[0[HZHHH HH}H|H{HzHyHxH~ 5vL$ 8vL`hhL`hhhhLhhhhhhL~[Z[h))hhxhyhzh{0Lh0{h|h}he||he}}hhɀLȴ ׳0Lv ⳅ㳅~ Lv)vAvAv `hhLHHLLnLhh HHLhh Lhhɀ SvL ׳0 ;vLȅɥHHHH vL #vL /vL GvL LHHHH}H|H{HzHyHxH~ MvL PvLHHzLLLL/ Stack overflow Type to continueGHFH LvLLpL L L L L Lhhhh漥HHHH v v 楽HH`` v,vDvDvvvv^ȱv_ȱv\ȱv]X i RHL RwRvȱRwVv wWvVwWWURTȱRUWYRXȱRYRRRSL vPQvȑ RȥSTȑVȑUT8U8񹅻񹅼8X廑Y弑 ~ƆSRSL%ȱ ȱņڠRRL Xz L Xz PQȑL XzX XY ꮠ ~0 LXz QHPH PȱPPQL RhPhQL걠 RSwR8vSwLH8~Ɓ8 ƁP Ymi lim~LPhl w~iviwY8vvXwvYU~iTiURSy8xy^xȥ_xȥ\xȥ]xx\y]^_WVW8\Z][LHlXz vwL.hhWwVvWw]}\|]}XiXYv8zvwv8zvw8vv~wv~\ť~8~8~~ȥ~))i )ԯHӯHl0 L ï~8~}8|~}~LH~L PQ R~v~8~8~~ȥ~~8~~ iiLZ i)i i)i i i8Ɠ|L ` 38`"\]ŧ VUEU`hh Lhh Lhhw  `\]e&mmeeUȱP8\\]]LH8\Z][ ȉ8\Z][LH\8]` |8Ɠ R~5~8~8\~ȥ]~8~Ə8 Əbbbbbbb>g?b@O^^GCopyright (C) 1981 Apple Computer Inc. All rights reserved. DBG:OFF aah ,  & "ë 넡6 & Í< š˄ u 8 Í`&Ꟛ š#ńW   0  𓍡ńȄ (˫/ ˡ   Í wˡ ˡ ! ˡ( !(š]8W.TEXTת .CODEתš!!Ȅ!!P!x!P ( >ˡ 뚹  צצ.TEXT7.CODEׯ$צ.BACK.ASCIׯA&*:˄/˄&ڲ#áצ:áD8>.ת(.Ä !á צ[š!!P4á74ׯ6848@/64:ץ.Í6š/ץ44š>464ȓ6.684874/ץ46644ȩ4å.ˍo˩4ń\88P7Í6!ץ44á46צ:4*å#Í4ōM4á@6Pá/á *á ?@צ:44ȡAá+#Ó6Ŧ/ץˍ6@צ@6 @ A P @6d\7P6ת@ת.š[ץ44š7]ץ114á7g14š^743355 5073331é731é14Ä3*á7414צ to continue% " ,Í ˫hp$ á (ȡ*龫 ȡazȄaA3>.ء6ت /6: á : 4& |" "%: ˡ J#鿥  &'azȄaAB% Type á+ ɡ _" ġ4 4fj <54 &ˡ 4 46!ˡ 4Rˡ 4=˄+&ȡš B4  ,á/ 0ت1S# 1أ d/, P# 1أd/, I# 1أ /0@2! áצ IO error # 1 d/צ Exec err # 1d/0áɡ 럚肚`諁6"  >  >b) á إaaġ00000תȡ  ڕ0قPSYSTEMPW\PIj :́@́AƁAa@ƁAǐƁAP:ץaá:/Pa8ʁ@ >"á"ʁ@ˡ ʁ@ʁ@ʁ@ צʁ@ ʁ@á áÄڡš  @ ; ɡ'áצ-32768 ` 逫-ġ@00ń0ˡ ɡc ȡꫀZ v  ꫀ𩀄򩀄"7ũ  @š& "ˡ鿩/ȡšhFF >"ˡFFTFN áEF > 섡/ F >"ˡFFFFF@N @=" "ˡá áˡ á ń# Ȅ ꚹ~á^"Ä<7?+ > ˍ >  )ʂ($ʂ($Pd? šš > "ˡ "Lá"  ë   rp ,p "ˡq*  )á =ˡ땏  šá áK>"á83 ɻ  X\Hب&̂(ʂ( ʂ(ʂ(ʂ($ʂ(̂)ʂ)!&ʂ)š땫ĻD>ꓡ"á삫ûš > "ˡ˫   ɡĻ2꓄ > >"ˡ ꄓr>Lá > "áۂˡ 3ء #צ ۂ #ء >  >݂"ˡ ޕ݂ނɡ  >Ąɡ낫š ꓡ 삫@ >'@ => )#%0ë>>@@@| V  )šá4?š?̥PVU _VP><+>P<X=髁@@@˄@#@ˡ @@#>@@ O@ ˡ? @ ?>@ > ? @ ?>쓡 @ ?>@ > á@ > <@ >< [L&á'횩)ˡ8 >#> \ˡآآآ*<UU šC+P VVaaaO@á ( ˄ ë ;:ץaššë 铄˄dS9;P9 a(9ڢ٣ آآ-? :آ&آ#> ?  ڢڢצڢ ڢ  آأأآآآ ;Pš8P8>뫀 8a a:a aɡá >ʁ@ צ" ˄ Ʉ:>ʁ@"ؚ"álʁ@&ʁ@ > "áVʁ@ ʁ@"Ä:ʁ@铡-@ ʁ@ >ʁ@ @>ʁ@ @>ʁ@{ 9( آڢآآ"پš "1諀멀ȡ!뾿 9šš @ | á1á5  ] |Nš 3"#쾿 @ 9dá. 6áálת(צ vol not found(צfile not found( dup dir entryת(file already openת( file not openת(wbad input formatת(^צwrong disk format(Dצdisk write protected(' }hO2qZBצ IO error: (צSystem IO error(צ# (out of filename storage spaceת(illegal unit #ת(צillegal IO request(illegal directory specת(צvol went off-line(צfile lost in dir( bad file nameת(no room on voצ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( SYS:SYSTEM.TEXTJs*:}|/ Pascal X15 tSYS8yy6JJ>Bb^JJNR^^ bb"L^LtJ ^JECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, No debugger in systemתP:...+: Compilingbb"L^LLSYS:SYSTEM.CODEE[*]\JJRj___ERJ|d@1^L1 *SYSTEM.FILERSYS:SYSTEM.CODE>EXEC//@1^L(19^L9 SYS:SYSTEM.TEXTJs*:}|/ Pascal X15 tSYS8yy6JJ>Bb^JJNR^^ bb"L^LtJ ^JECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem, No user programתP4le=:...+: Compilingbb"L^LLSYS:SYSTEM.CODEE[*]\JJRj___ERJ|d@1^L1 *SYSTEM.FILERSYS:SYSTEM.CODE>EXEC//@1^L(19^L9C-E;̀̀آD'ʀˡEʀáʀá>??>D;HPVvd T B:P,"n#$$%8%R%<0$  P 0!!">"V!H,l :$ 0 > V<$Ez>Ct!-ǀ@? ? צP+z>{ yC  579;=?ACǀ$ á"ˡ"" ''D>zˡá>pq+u"ˡ צclosingAuB!dt -z>>"ȡ{ˡo!צError # . closing FILE or DEVICE opened by last program$>"z>u uu"˶u reading fromA+söusÄ+f,u迶u"ˡצ writing toA+sársá+rL*ˡ ؞!؟B!B BˡxBwBvB@šQȡ2 š:X fצError  exec fileFApp) rs* rs*q q>+{]\ ȡ*ńȄ4šáRתPńȄ ,ń.áš蕿:00áQP 0á0 é000+-Í-ë0^ 000á'5á 000 צUnimplemented instruction(צFloating point error(uString overflowת(]Programmed HALTת(EProgrammed break-pointת(&|dI+oYC ád/ *R#,n vo٢ š٢ ٢٢ 4$  ؗ(/  ؗ(Ƃ+ צ*SYSTEM.MISCINFO"á̃ܢʃʃܢʃܣʃ!&ءdt >uˡpq- ? ? ȡoڢܤ ܤ˄R slot   is not from Apple III Compilerר d't!22>  pq%sy!{P{ 1 %System re-initialized h(.$bl R   צ(C) Apple Computer Inc. 1981 צ(C) U.C. Regents 1979 Based on U.C.S.D. Pascal II.1c ë0???JanFebMarAprMayJunJulAugSepOctNovDec?????????ר d't!22>  pq%sy!{P{ 1 %System re-initialized h(.$bl   צ(C) Apple Computer Inc. 1981 צ(C) U.C. Regents 1979 Based on U.C.S.D. Pascal II.1c ë0???JanFebMarAprMayJunJulAugSepOctNovDec????????? צ,|__________________________________________|44ȡ44 l Current date is  -- آأ% š  + __________________________________________ | *| צ,| Apple /// Pascal 1.0 |?"?[צ0Bצ0tצ0SYSTEM.WRK.TEXTײ[2 SYSTEM.WRK.CODEײB* , צCONSOLE:(#צSYSTERM:(>zܪPAƂg/0̂gƂg*ƂgQƂg A0"ˡ\٦׷T0̂gƂgPƂg:QƂg`Ƃg š/0 0 /A0؞"Ú/ۧ?PצPA$    H2צ*צ:צ?.תP צPGתPˡǀ?P:ײP)@ x$$$  wxvu -;.áʂ;ʂ;ʂ; ˻عcʂ;CONSOLEתiʂ;צSYSTERMXʂ;GRAPHICתGʂ;צPRINTER6ʂ;REMINת'ʂ;צREMOUTj[L A2%ʂ;xʂ;ضágʂ;š^?ʂ;צ*SYSTEM.STARTUP"ë11*SYSTEM.STARTUPצ#5:SYSTEM.EDITOR צ *SYSTEM.FILER #5:SYSTEM.LINKERת ̂;ʂ;ȡ+٤ ̂<ʂ<תʂ<ʂ< Ȅ٤ ̂; ʂ;ʂ; >ʂ;׷ړ ؞&"ڡؿʂ;áʂ;0 ʃ ʃ  ʃʃ̃ʃʃʃʃʃʃʃʃ  ʃ 48Ƃ+צ#5:SYSTEM.ASSMBLER צ#5:SYSTEM.COMPILER ܢʃ%ܢ% ʃ>ʃʃ+ >&?̃ʃʃʃʃ%̃ ʃʃʃʃʃ ʃʃ ʃw ޢ ȡڤ ˡpݢڤ?Xܢ0ۤ ݢ`ڤáޣ!ݢ`ڤˡ  ޣ  ȡ6ݤˡ&ޢ`ݤۼޢݤ> X ȡ۲"ڤܾ!2 ́́ʁʁʁ ʁ > "áń́ʁʁȡrƀʁ́bʁʁ ʁʁʁ Ä  ʁ> ,>9<<<<;67>%sצ Terminator=sצ, change it ? ٶ,áu-ٳ@@YyÍ)צNew terminator:s rqs* ت  ء r <צNew exec name:P.á>šF.á<,צ[á==P=צ[8]S=P-uu"á-uu"áps,>P % *!,,,צ:,*,PBš!צ/PBP) Running...ءillegal&-צError opening exechء PTצExecuteצ what fileצ? PGצPšš,,ȡپaġ پ ,,EXEC//ׯMqp- P   š, š!y*SYSTEM.WRK.CODE׷N"tB0*š5**צ.CODE:* * "á.צNested exec commands D+$á/+TPצ.TEXT+}}}+Ä+}+P +P"ˡ%>צ Can't open *צSYSTEM.WRK.CODEP+*~+:+ }+ƀ}ƀB+ƀ}+}ƀ0   áثle what text? +P+>+צ+,á+( T+P +"ˡ)+> Can't find +צ*SYSTEM.WRK.CODE[*]PTo what codefile? +P+>+צW+, + }+}( áצ Assemblingצ Compiling... á̀̀ʀW+̀ƀƀצ:ƀ[@ƀ/Aƀ2PƀP[á +} áצAssembleצCompi1Cáۤ&./0000ˡc0 DDPDת0&;2EEDE:E&E 2C ۤ2 00ÍCC1CáۤC11 Ä  ! +...vܡ  # Must L(ink firstƁ1ƀ:.Conflict between intrinsic and user segment(s)@ƀƀƀ 1v -"LۤCo file ́v́ʁ@ʁˡ צ not codeʁ1ʁHʁ ƁE> ƁEƁ5>ʁAáʁ 1> צ not code"ˡ Bad block #011Ɓ1 cݡ; Linkingse required intrinsic(s) not available: 1, 0?404ȡ<0|0,#0  111 á00Jd  ުP-vƁnPv>"ˡCۡ>"áצIllegal file nameNwwn"á 3w   wwxwxnצ*SYSTEM.LIBRARYPxn"á3x  ;36,No Library to get required intrinsic(s) from 3צ+The ʁʁ́   n$2$ $š$$צ.CODE $$ š$$ צ:š/:n@A$P.LIBTPZ3 PR"צChange this? Y)es, N)oٶ,@@ٳH vؓ! צ NOT ת ,Currently Apple II Pascal disk routines are ,0צresident8ؓ@ؓ! צSOSצApple II Pascal &Currently file names are displayed in & 6 צ format= ؓPצ%Option Bytes reserved for Graphicsצ%------ --------- ܣġ ۤ ٤ ڨ ܢܣ*@ٕ۶š ڸ۸۶ š۸ ڸ:   ȡQ  ȡ   ȡ? ȡ  ġܡ=" áܡ ܓצ $  ޓ(ݤ ߢܯߢ  d˯7 H ۣȡڤ  ۣ צۣۢ0H dō (ܓ(*(ܡ )*) *)* ܓ)ת) (!($IKPz(  Íܡ  , Ąܓ"á    (( )(á (((ܡ( **(( *Ä(*Ä**Ȅ*Ą*MȄ*)v*ȡO(ۤ +++ō++ɍ+ ō+ ȍ+ ( ́ ́ ʁ ʁ צ ʁ ʁ ˄ʁ @˄ʁ ˄3 ʁ ! ʁ Þ"Ä  = &)ʁ á ʁ   "ń,ʁ !  ʁ ޾6A3; "Y&(,. CtT^( 2 \ :Ht:Tb6L :0]P#%!?áW@Command: U(ser restart, I(nitialize, O(ptions, H(alt, M(ake execתP#%!$j쓡 Linking... vá% Can't Restart$צ Restarting...gaXOKpq7AX0ǀ     ˡצECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem,? [A3/1.0]P#%!?áW@Command: U(ser restart, I(nitialize, O(ptions, H(alt, M(ake execתP#%!$jatus of Apple II disk routines #C) Change file name display formatצO(ptions: A, B, C, Q(uitP#%سQˡع ACQáp $`[!0System will re-boot to reallocate Graphics space׮Ǡȡ '   !צ$A) Change Graphics space allocationצ+B) Change st! 5Error: New options could not be saved on system disk.צ*Graphics space allocation has not changed.8(Other options have changed until reboot.$ƁƁ0  ?Ɓ*SYSTEM.MISCINFO""˄Ʉ9צ!Error: must insert system disk. P#$ááRƁá<" ""Ɓˡ ! A!BCD Currently you have option צGraphics Options: A, B, C, D, QP#%ٳٹ!ADt ZƁƄ------------------צ A) 0K bytes (No Graphics)B) 8K bytes׮C) 16K bytes׮D) 32K bytes׮ءt  Currently  K bytes reserved for Graphicsá (No Graphics)  á ġMáš6 ܂ۻݪ d ( ڣ"ڣ١ڢڣڢ#ڣ$ڣáڣ$ڣ#š ڢ#ڣ$ڣ%fڢ%ڢ١ڢ&ڣ$ڣ$ ڢ&ڣڣڢÄڣ%ڢڢ& ڢ&ڣڣڢ$ڢڣ"ڢÄڢá     á ۢڤ š sá ŶÄ)ڤ ܢɡ ڶáá56:PP#PC/š:1צ:P5 ./Ad ?- +ˡI á+ݢˡڦתRáצ!צ,ڧ? š ǀڧ?ǀǀ Ǔš@4צ!á צ!P$5ئ00000תP  0ڂȡ۾0Ʉ< R621  áG4/ |11áBš2@/áf3šoá+ھ.á ھ/á 2á3&á3á  áán2ڧ? á 0ȡ/ݾ!á ݾ /P޾ /P 5RR-ۂɄݓVá(۾'ۂ@n: צ/˄/ȡ0ƀƀP̀ʀȡ0ܾaġ 00ܾ 87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8ת802Ȅ&0á݂0 . 0ȡ4 0.  á/٪P,0YتPš  ȡ޾ *:Í#Í*á ޾:ˍ צ:P?P#áL۾ ݏ۾0 .ޕ P/:Ä:P.áٳ ا?ǀǓ ا?ǀ:+!&ÍXÍc(ÍEÍ QáG'á@=+á3@á)Fá Gá Há >z? ؚ,+!$.YP>-$M l 0 nL T "&"ˡ.&"ˡ$  " áP$ނ š: -Ʉ  $ $ $šš$%&$۞$$ۂۂەߓf%%&"ˡ|ɡ& & "ˡN$ߡá4 á,á"$࣡ $ $šš&$۞$$ۂۂە R%%&"ˡ.&"ˡ$  " áP$ނ š: - ݓۤ ۤ Äݓ š ۤ  ɍX ޚ "ˡ8ˡޚ   dܓڢڢ   "ġ$ނ#˄ɡۤ  dáߢ  dá ߢ &ޣ˄ ߢ  ߢ ۤ ߢޣ"ߢ ޣ#ޢ ޢۤ ޢ á٢á( ת$&(0!    š ڪ 0ޢߢšáޢޣߢ  dޣ"ޢ#ޣ$)ޣߢ  dÍÍޢ  ܓۤ ۤ Äܓۤ  dÄÍߢۢڤ   ڪP44444444"ߚ44 4 4!4"d4$4% 4#44#4á74-4& 4&44&4T  jáL۝?"ܓ ?#?#۾áܡ?#ڧ?#۝?"ڕ?"ە?",L dáˡL," ۝?"ܓ?#۾á ?#ܡ$?#RšR?#ئתPVd ٪P--,,á55תآ1آ 0 5 6633 ȡ 6363 dȡ 6 3 65 4/ á5  5 -5 ---525 ˡ 5. 5.2,,h  ػ, hhhh jj HkHL#6?l JBLf \D\H80*N h 6 & $  : Z   2  R(>9NGE); " "{Returns the current position in the file with reference number FID "{hL#"!6?    L*?    jbj L%$:?    jcj L%$:?  jhkhj L0?edbVRQPONMLKJIHFDCA>963?  hhhphhhno0 ȩhh  jj mȩLa`XMJ0-*('& ~?    L*?    hlhhk f?    hlhhkhL#"!6?  hhhkhjj njmj*lL=<40.-,% V?  hohhhtmnuvuwvwyjz*y{*z{  L'&$"<?  hohhhHH  jj ȑjȑ*ȑLedbROLJI |?  hhot|{mn  LGF=:43-,+*%"  Njj oqLCB1.-,*)&# ^?  hkhL  ?  hhhnho  hkhSjj pqȑLED<:520.-+*)$ f?  hnho  hkhLjȑ(!Hh0?H&h*0HH`?  hph h jj L+*(" B?  hh  jj mȑL54)&#!  L?  hhhhi` hhHj*H*HHL&SOS-PARAM-TABLE{@H?hhhhhhjWȑ 5ܻ56; ; ;  <  - 5=%=,hx? ?"? ? ?  hh%hh%HH`%ʎ%HH` hhL&ȑ`W CL& hʈL&fX?#XW?"XWš?#X?#XW?"X?"W?"?#VVVU, R2 ػ",تP-+#+,T$á  ܚ,"  P ٨ ب5 5߻5޻5ݻ0á!?#?"?#?"1?"00, ,٪PتPZ,PƀPZ-ƀ-ZƀU!UáVV?"ɡYV?"YB?#V,á?#VZ,,ZYYV?#VVY,W?"Wǐš ?"VUiV,XWɡ?#;8  ō> 8 0', &,ܪP/ۻ0/ٻ1 2-/33,\ 6۪Pá? ?"11ǐȡg. .ٻ..3P3-? 223.20 7 7 ;7c7 0Ʉ  廹> ō> 0 0,8? 19 c8 88á>0 ;8 8 ),*,ȡ ނ0ō>- >7(,ȡ09ō>0 ˡ c7 770Ʉ廹> ;in the pair (BLK,BYT). Calls the SOS routine GET_MARK.}   PROCEDURE P_GETPATH(FID: BYTE; VAR PATH:STRING);  "{Obtains the pathname, as originally input, associated with the "{file with reference number FID. Errors are indicated by a PATH < MLMTRAN  ȡ=ɡ šH VڢZWڢڢ`]ڢRiڢ=99ȡ=fɡc;Q :MLMGR.DATA\Pצ!Name of Apple Writer /// volume :;P;á ;.D2/תP;;P/QPd;PצMLMDATAWP0Insert your diskettes in the appropriate drivesצMAIL LIST MANAGER TRANSFERצ,Drive number of Mail List Manager diskette :á ~$2, &   16 ,($ ;P #d )Ǽ)Ǽb  )Ǽؿ,   )ǼR> ȡ   (ȡ" ȡ< š"(("" 'ȡ"  ( D ؂ ġN)Ǽ" ˡLƀƀ4ƀƀƀfF0ƀ.../&'(<.́.ʁȡ.... ; J fڪPš --0-ˡ6 Drive dosn't contain 280 blocks.ם /=/0MLMgrת54637VUƀǧ.́.ʁȡ._ƀ ƀƀ ō8צINVALID LABEL NUMBER:  ۝˝ˍ(ǀǀ(O  ȡ,ۿ< &< &ō8צINVALID LABEL NUMBER:  ˝ˍ(ǀǀ7.It seems a different diskette is now in drive .0צ; press ESCAPE?צBto return to main menu, or insert proper diskette and press RETURNF 00SCAPE to (1x1Pš "11 I-O Error # 11 on drive #11 " ڝááצMLMgr- 8šbbbbbbbbbbbbbbbbCP??n_dš299ȡ)22ڢ5 99ȡj m ڢ5š& :2ڢ5:P תP m  š     v Xvڢڢڢ$  2   ˡYˡ Nˡ ˡܓ ܡ á ۭhhhhhhhEhjk>< AGF=kHjHHH`B.DMeJIMSTEINfba_^[ZXWVTIBBh6h7hh 7H6H`86HhhhhhhHHtSOURCE2:MACHINE.TEXTn_|U@|{  tW16yx4JJ<@r]JJLP]] ``BK~KI ^;IECommand: E(dit, R(un, F(ile, C(omp, L(ink, X(ecute, A(ssem,   PROCEDURE LOADFONT(VAR FOOPTR);  PROCEDURE LOADCHAR(VAR FOOPTR);  PROCEDURE UPLOAD (VAR FOOPTR);  FUNCTION ATSIGN (VAR FOO ): INTEGER;  FUNCTION GETNBLKS( C:CHAR): INTEGER;   Implementation E hhhhhhhh ȑ H H`RP<8741.+)  ph h hhhhhhȑ H H`HF1.+)$ `fnFB Retcode);  Procedure SD h hhhhhhȑ H H`NL7630-*( jh h hhhhhhhhhhȑ H H`hfEDA>;941*'$"h hȑ H H`nlc`]\[YVTRNMLKJA><31h h hhhhȑ H H`:8)&#!Ph h hhhhhhȑ H H`HF10-*'% bh (h h hhhhhhhhh3hȑ H H`LJ;863/( fh h hhh h*hhhhhhhhthName,RetCode);  Procedure SRENAME(Var OldPath,NewPath,RetCode);  Procedure SGETINFO(Var PathName,FileList,RetCode);  Procedure SVOLUME(Var DevName,VolName,TotalBlks,FreeBlks,RetCode);  Procedure SGETDNUM(Var PathName, DevNum, Retcode);  Procedure SDINFO(DevNumb:Integer; Var DevName,DevList,RetCode);  Implementation E usList:ByteStream; Var RetCode:Integer);  Procedure SOSDATA;  Procedure SCREATE(Var PathName; FileID,AuxId,Storage,EOFBlk:Integer; 2Var RetCode);  Procedure SDESTROY(Var PathName,RetCode);  Procedure SRENAME(Var OldPath,NewPath,RetCode);  Procedure SGETINFO(Var PathName,FileList,RetCode);  Procedure SVOLUME(Var DevName,VolName,TotalBlks,FreeBlks,RetCode);  Procedure SGETDNUM(Var PathName, DevNum, Retcode);  Procedure SD   Procedure SCTLSTAT(SOSNumb:Integer;DevNumb,StatusCode:Integer; 2Var StatusList:ByteStream; Var RetCode:Integer);  Procedure SOSDATA;  Procedure SCREATE(Var PathName; FileID,AuxId,Storage,EOFBlk:Integer; 2Var RetCode);  Procedure SDESTROY(Var Pa0YY0PYצ.QYPYY *** ERROR: Y[Y0 4> n4R  F & x& R ~ 8á á:ǀá áǁ&DŽá áǏ áljá1ުPݪP 1[ ڡ[[ܡ ZZ[Zۡ6ݪP0Press RETURN to go onתPڡA0YY0PY%, ESCAPE to return to previous level.uYPYáNácnǀ    ǔˡxǔá2 áǁ#áá á:ǀá áǁ&DŽá áǏ áljá1ުP`hwhxhhehsrxHwH`i.CONSOLE:80/.,+)& h7h8hh%(328H7H`).CONSOLE:80/.,+)& T\b!D+$13(70:<>@BDFHJLPRTVXZ\`bdfhjlnprtvxz|~q ,\. P P~7Aġ .7.0YYPȡ Ǐ š^ !צFL= š^@@)Ǽ  ꩈá []ȡ ꥀ" ˡd&0;xVتPצȡ ,צOUTPUT LABEL #  쥀 <> ȡ ;צLO=  HI= ".To continue, press RETURN :á v" ˡVϥd" á " áϥd"  áϥd" ˡ dá8^ F  59 á9959  צTRCK-SECTR LIST: 12 9> צREAD VTOC:  9<9=9'83( (% 41v Gצ READ TRACK  צ SECTR   59 á99 Gצ WRITE TRACK  צ SECTR Páá צPتPǠ ȡ!ǀ) " ˡ-צ I/O ERROR # > Ʉ ڡڹ CPتPšצ.TEXT../á..P.Ǡ.PZתPצ/š ZتPZۛ/ˡZۿZ..ZP.TMP.ASCIX.P١@C RצP5צ Name of Apple ][ file :צP/ˡP/QP.ˡ/QPءT  Name of Apple /// file :Páá צPتP..ȡۛۛ  ë0ܡ 덡G RëYyÍ(azȄ צName of Apple /// volume :Pׯ .D2/תPábbbbbbbbbbbbbbbb_ZAWTRAN Y.ǠYPÍHá8.á .Oá$TáTá>C.ڹšMɡYY.PYSOS (4(.WWWyɡYY.PY I/O ERROR ( ):  ILLEGAL FILENAME-  DISKETTE FULLצ IS NOT ON LINE,(or two diskettes have the same volume name) FILE>9?jȡoɡ܂!ܕȡLɡەەa"ەa"APPLE ][ DISK FULL   800ȡ,8<09E9 99ǀLz 99 !f"á1P@ZPf"ˡ<צUnable to open צREWRITE CATALOG: ڮ Zˡ_Unable to rename Zצ to x9 "@9ڡRȡ;X; ;$?9צREWRITE VTOC:  צREREAD CATALOG: ڮ #܏ 9394999"9!ǭzšzݩɄTzz12 zz ;ɡ9;;;šXX;L š;XǠ ;ۂ;88šȡ&;݂X98݂ǀ;ڂ;8ڂ8C  9TRCK-SECTR LIST: 12 >צWRITE FILE DATA: ۮ ther name. t121324 <@9ë66 80?98á68 98 98áA98 7Unable to find 1 REREAD CATALOG:  # 9192 =  already exists.Delete it, or use ano7ڳ    < :ɡؕ 9 ̀ʀáǀ̀ʀ9ʀʀ̀ɡ9 ̀ʀff f<۩ń[ɡI Last byte in  צ is  ɫ==9ە š ȡ9<@ɄǠ.Ʉ  ɡ  š@ǀġǀ9EAD FILE SECTOR:zz <ÄX992  bytes to transferܕ9 ܂HצFound NULL at  צ in   3sY[=<ńȄzšzzáMz1z21é2Ä zzÄߓRApple Writer 1.X file.?1צ type is 9/ 64Ʉ14ɡ 1 . - 114ɡ9.9-43č.-Ä.-Ä?APPLE ][ DIRECTORY IS FULL!DŽÍ5<3ɡ򩆯83%Exact match found<5@BDFHJLNPRTVXZ\^`bdfhjlnprvxz|~To continue, press RETURN :VX צ NOT FOUNDצ FILE  ALREADY OPENצ DISKETTE IS WRITE PROTECTEDצ DEVICE WENT OFF-LINE FILE צ IS LOCKED/// files to Apple ][ filesצ43. Mail List Manager files to Apple Writer /// filesצ4. Quit Enter your selection : Í%á$ë#f@ x*.bFn " t T  | & ^ v||J%99  APPLE WRITER FILE TRANSFERצ$1. Apple ][ files to Apple /// filesצ$2. Apple /// files to Apple ][ filesצ43. Mail List Manager files to Apple Writer /// filesצ4. Quit Enter your selection : Í%á$ë#f@@f9999@999  APPLE WRITER FILE TRANSFERצ$1. Apple ][ files to Apple /// filesצ$2. Apple boot diskette and0 Press CONTROL-RESET to start another program.or" Press ESCAPE to return to menu."  á%( %five and Press RETURN to continue.or" Press ESCAPE to return to menu.0 MLMTRANá$6 .$Insert 2RD"ׯ#111צ##צ)"듡# ˡ @ fx #@Insert APPLE WRITER /// UTILITIES diskette in built-in dr  59 á9959  צTRCK-SECTR LIST: 12 9> צREAD VTOC:  9<9=9'>9?jȡoɡ܂!ܕȡLɡەەa"ەa"APPLE ][ DISK FULL   800ȡ,8<09E9 99ǀLz 99 !f"á1P@ZPf"ˡ<צUnable to open צREWRITE CATALOG: ڮ Zˡ_Unable to rename Zצ to x9 "@9ڡRȡ;X; ;$?9צREWRITE VTOC:  צREREAD CATALOG: ڮ #܏ 9394999"9!ǭzšzݩɄTzz12 zz ;ɡ9;;;šXX;L š;XǠ ;ۂ;88šȡ&;݂X98݂ǀ;ڂ;8ڂ8C  9TRCK-SECTR LIST: 12 >צWRITE FILE DATA: ۮ ther name. t121324 <@9ë66 80?98á68 98 98áA98 7Unable to find 1 REREAD CATALOG:  # 9192 =  already exists.Delete it, or use ano7ڳ    < :ɡؕ 9 ̀ʀáǀ̀ʀ9ʀʀ̀ɡ9 ̀ʀff f<۩ń[ɡI Last byte in  צ is  ɫ==9ە š ȡ9<@ɄǠ.Ʉ  ɡ  š@ǀġǀ9EAD FILE SECTOR:zz <ÄX992  bytes to transferܕ9 ܂HצFound NULL at  צ in   3sY[=<ńȄzšzzáMz1z21é2Ä zzÄߓRApple Writer 1.X file.?1צ type is 9/ 64Ʉ14ɡ 1 . - 114ɡ9.9-43č.-Ä.-Ä?APPLE ][ DIRECTORY IS FULL!DŽÍ5<3ɡ򩆯83%Exact match found<5