LnSOS BOOT 1.1 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>+REQUEST.INV +!++REQUEST.DOC  +!+TEST.KEY R`++(FONTDEMO D++(STANDARDtt%APPLE++$BYTE++%ROMANtt,RENUMBER.DOC ++(RENUMBER Q++'READCRT ott+READCRT.INVtt,DOWNLOAD.INV++DOWNLOAD ++,DOWNLOAD.DOC b++VOLUMES X+++VOLUMES.INV++'TIMESET P +++TIMESET.INV++,RENUMBER.INV++BASICu' *SOS.KERNEL ,V$!a*SOS.DRIVER 46QQ*SOS.INTERP Y3d+!+%HELLO tt)BGRAF.INV(+L++VOLUMES.DOC >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*LLLLLhh`LLL`SOS 1.3 01-NOV-82(C) 1980, 1982 BY APPLE COMPUTER INC. ) `G`î** }*`o^`on 8 JJAj@` *?($`ΠņɠŠ堠РѠ͠஠әƆH v?c,,,,h߈ߢ~))`3PLLP*%(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 Qܐ'``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ƍťǍŠ)͠ Wٍۭۅ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 QL5WW{5 ې'`,55 ې'` ݠ B1 ȩȑ Lɦ8`5  @ R㥶i ` İG8`F`X8``éۅĩ >` 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Ѻ Ѻ  Qܐ'`i ҩ *C8/y.i/ ȑ  © $ E7<3W`ȽLֽȄ @8`R ) [)_[AͰ")[)_[A:0/.ЩȑΘ8e * ȩ`Loü 7)?۽۩ W٠Յ<ōōř ռV7 uM78 V榠=ü#)@5 ɐ /ݐE ) .) @L `lqhٯ޿=ϓTXIֲ̛̐~ؠIJK,-NOPQ0vt Ѷ"` ɰ Ȑ`E`Ɔ X̐8`>>5Ѷ Qܩ<`>`\ʊJJJJ ۍ۩  ˰Fȱ X̰6 0 Lɠ 0ۑۑ8ȱ`H8` ɹ $  8JJJJ8 ` ۪` H hQ)fʅ F jF jF jF &!  eװ*  ̰F湥 ƹ`Z8`@  ʰ泭ۑƳ ʐ` ʐ` ˰ ƹ Wː`ۘ . . .۪8*Jۦȱ ˦,+* ʈJj =ؠ yiȩ`y4泱ƳHhz ʠiȱizLA`L;ؠ"  `1` Đ7@8V۩ Lɠ۪8ۊ۠X)JJJƄ X Ġȱ۠ ȍ۱۠ ۭ) ۍ ð*)#  O̰``)(`N8` ) xհۈ ̰آ*գ  Ͱ ݢգ LvL{ؠ;i ڥ(8` ְ( ȱ5 HȦ)`Lxץ: ש ְ⥺i ꥻ(8`Lx Lxש u )۠0)p խ.8`)@ ϰ) ϰۈۅƭۅǭۅ5 X̰ *ƭ۬͵̶L  ΐ` Wհ> H۪ȱHۑhƳh sϰq ` ʰiȱi `)5©éՅĩ5 }JJ+`.`8`ɂ )`@ ש ְO ֤FHۑۑh8`P) հ Wհҥ,J+j泭۪ƳۑȊ ) ~ fPL ͊.>.ʱ+,EP!.E.Lw+,,ӄ*- P*e (` հB հ5 Wհ0,J۪泭ۑƳ sϰ(` L Ͱ2 ~ P kҐ#L8 T 2ΠHHȑhhȑ`Ld )N8` xհ*eȱ+eȱ,i۠Ѻ۹ۑ񥤅- ť.Lcԥ.La Ͱ$)rJ Lɰ )# Ԑ) ͰU..++,,IJ/ ӥ-.?Цե,J+jѲ4Ƴǥ4聠 H hH kh8`8-ȥ.L 8*Ʊ )8 0*-`.G.ʱ*+,EP'.E.LұE0+,,ӄ*p-e  )LBѠٳ )8`i (` )N8`*eȱ+eȱ,i۠Ѻ*ȱ+L - ť.Lkҥ. ՅL ͐Ld ~ pа.J/)@߅4N8`) ))УJ8` ۑȭۑǠۑۑȭۑ($S8`O8` "` / 򑺠+* ͐H h8` ΰi `()  *ǵ յý5Ņ4gȩυɩč5 iψ }.8` iϙLIѠ ˢ 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`$Jۑĥ` İo!)N8`WپX0 ĥLä X0 ĥLà !"#$ Đ2@H AڰCŰrP` 3ڰ(` AڰѶ? İG8`Fە1 ռ İ ЩP߭)@N8`1@8` Aڰ񈱴ۈ)ۅƭۅ X̰ 3ڰLÍLT̥L㼠  ʰ` İK ХP8` LɐH80)N  հ)@LO ˰)0 ̐` M ­۠泭ۑƳѲƱƳ X̰ Rڰä,] Xx,f (I0јIFjFjFji```x@gŽPy+wLwԠ͠ŠԹ.D1 .D2 .D3 .D`HJJJJh)y` (2ϩ 1ޠ== f ɰ`ޭ`5=(5= i Х(`=H hDC5 L3ܵ ɐ /ݐ 8`5 ˥JJJJ8 H h ` ܠ825H h5 ɐ /ݐ 8`Hh ܥ5 `ɥܥܥܥܥ5`܅܅܅܅܅5`( ݰ)Ѻ ݰL ݰ泱Ƴ ʰȭۮ ʰͩΪΩۦ eװqȭqLJ  ˰Aۅƭۅ X̰2%&N  ʰƭ X̐`Ӏ堁ӠҠՈ՘̠ƠŠӠ̠ɤӮȪŅ͠Ϊ ܆5 HȰ4 )ߍ) hjjjjۥ0CF = -$(L !LLL&L L-LJ٥eƦ ,L  # ` (L.L…ҥÅӭƅХDžѥL1LUȑ  i ߩLL )  札)  ҩLL` **éL0;` H ) abRcdTefVghXijSdfhj RR`^0U ` 0 ʠ0 8 `ůàՠԠàࠝӢӠ ȠDž̖͌͊頀ϐωŠŠӠҠȠγ`%!^0 ^)@`a R =` *^)ـooL]^)?i |TU QTU]qUoqTITsUsprRprqs]ToUXa` RL=Xa` R` *R`X`U T  *\AX[ @F\B9ɏ5\o*Ɂo)[[ @^`U V  *C?^0: ݳ ٢ ^)?i` *)@o `p^ XiH 1h `)X0 8~X 1`C X`)X0`C РǠ𠠐ŠŠӠҠȠƠŮƠҢâӠUAQY @?ZY 9ZYY^TU QZoȥɭ }`` ? }``  }`X0i 8~XX0H }h襯` ©Wéĭ }0W`F X0A */5BL. zF`LLz Lz`Y `Ơ堧 B k L( LO  %   }` ` ?!©UéĩU󥣍V }`` ?)) $p10LYeieLVȱ d0L`Hȱ hh` WɸSI I.ȩ8A 8ɸ4ɠ(H)h h8   `    i Ȣ d` $,)?P^ GL㢮 5L}P.)(Ơ L`ޠ LR  稱 I)0JJJJѤ  БĈ` H`)à`֩ нѽ>`]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 DžŠƠŚ̮ÎȠ Ӡ̠Ӡ` 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` @SATRDL8H\0`(d  $,($  ,\r.RS232 c "߄P(C) Apple Computer Inc. 1981L0,>!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:;<=>?@ABCDEFGHIJKLMN>>?">>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< SOS DRVR"ACS3FONT >>***=9 .(9  8:xxx0?? ?? ?  )* 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 HH` (# (#+Q`,Q$ ()PJK . "]RSiTUWZ[ Q`% (QLl  )JK `,Q0LpEąĩEŅ|o,i0prH 8fofo7,T0*,V- x) V()LU Hh,RSLCpA*0 A8` 2<>՝ԝӝҝ F `*x (CDHF h G I HEC`* G EELCx (̠`x (̠` A o  FLC F` F`H EE x (`x* ,; ȱʝ7 Ƚ7 C(`…ʍ/Åˍ031:)4I)4i 3`)4:`3xH)$ H4Q8 hh(`x ( ' t xI EE ZΤ`U Z`*8`@- =)AD)H mLL 0L 98x,; 2L F)( I JL ʎ7Q  P91*x (,; K x F C(`88 JL7 878998m7ʥi,:Ɂ)4i ɠ)43  t t o`H h (/­0í1L,L9Leʅ֥˅׭)ɏ 逅܅إ݅٭ 0`,;    ϩ΅Ӆ L"< 68 <i 6% LЭ"@ 6! L0B BL0 l'L,   ʅ֥˅׭ϩ;Ω ө - (@< 6LW g@ 6c R=S DC)YD)XRT!WWR RԙZՙz Rqȑ m?L 0LB |L l'5դԦ ˍ01.` 6<`>` hh- (GJB.hh`դ8eԅԥi( Մ԰MIPLIOKN`hh, ( mTݭSܭU`RZzL`֑L2`܅֥݅׭ʅإ˅٭)ɏ 逅 07 P PL=ȑȥ̍ %#$  " F 2 F`(%+ (#$L *x (I  ) (j` CÈ`ȑ`4R`! (`2!ÍSȱÍTȱÍUȱ!V`" (3mRVÍW`4аR׍R`> `)ߍJ "+ ( 4( (B= GIH̎ƅԥDžխ25x (* C)Э? ? 4' ( O 2 "x) J(`x)(` kHjH` (& (+__dd0@ 2 *KPFProfile Driver -- Copyright (C) 1983 by MicroMagic Inc. and Quark Inc..PROFILE&#%Z  #(-2=AJLNPXdmsy !+?MS[aeu "%*2NVY^adgjorw|Z,[0\[cLZnoln _L `L aXl ) ` ) `x,V0 ")(`JN{%*-LQ\r{~),b-cWLidWuoeQ,T0L@TEPd>gZ[M,h,oe$YHV ))ho kk0 qroqYLG,h,VLGj)`L5,jL",TP TcL,UUTdLXXL"lp,W0k,bP,U0x])] olXYmnpqVWkj^)  ]] ^ ) (`\" ( Ù\ `ÍRȱÍS`l031e-Y x V(Y H`j) )g kkL)` kkLi ȥȑ`,Q0LmEąĩEŅ Hm`l HL 8fol,Q0L KHJH`! (QRo}`\" (\ÈȌk`RȭS` l  o `ȩ`,Q0L HH`LE9Uc,T U H̠%LC #X "*-<X\jlnprtvxz|~ ">DJTdgpz #-Cy~ "%(+058;FKNUXadgx} ).3:AHMT[`gnqx{~ %058=EHKNRUX[`fq #&BGJX[^cq~AA@@8A@q==C)CB)B Crx 0, )ߍ:) J)*PR,T,V( : `,k<,: JI`I`<,:J̰`=m@>,:J}ʅ̽(I I `<Mj,:0pJՐ̑ʈ`pJн},,P,`,g$ ( $g " x) (,`% (gL,}0, `gé ĩ `:) j:;jN;~j;O,:0'???>>8?>p<<A~ F }~L } `,}0 x) `(`hh% ( ΍ ύ逅Ñ}`` " ( ĩ~Íĩϭ & &υΠÑΈ~ F ~ҰةeÅÐȱÍ3`)1`Ɂ" (cefd`Hcefh) `xÙ+(`xÙ&(`)4`)5`)6`)7`)8`)9`,i0!M:0p ȱq L `" (~)y ~JJ* I `x|x|,,}P-X`8`9`<ȭ=` & @jI`:ȭpȭqé,i0L È`,g HH`LL! l      5  Hdcefh&+si  M0   h) `(" (  (È& 8  `)2uL-upp<`uqq=L: vuL L L <Le Le ,g0L HH`! ( 9EKQWbmz`(" ((è%È`2ȭ3`1`d`c`+È`&È` & IMk`4`5`6`7 p<L<`<p<`,ms<L=q=L: ,lXL ==L: ,lCL <=L: <,n)LL8 L8 u:L8 ;)ߍ;j`; ;j`uBL8 uCL8 u)u;) u;L8    x) `(,  L`%CYgu #1:CY` 9C<m><=m@=>@?AL8 >m<>@m=@<=L8 <m>?=m@AL8 C9L8 ; ;k`;);k`,@`<,mHe҅Ґhe…å逅h,23Lhґȥӑ,10 h0  `,g0L  ҅ӥĥŰ+,0p 4 Ls  Ls i )"|tȌs|st HH` MjH,: <J h̰ <rh,oLŐL i,1HȊ©L,52,9-P" a{)9 Ln90$0%,7 ҥ L$0T,8OK50P;ҥ,8 L%\   8҅¥Ӆé҅L,5,6  & @jIH,5 p  ,9P"<:J H) +̰ H) +ʭcP h̰ʩd8,h)ec efeede`,5 H  h 4  `5!    4(P 4 4  `,g0L,10kH0 ԥ f0)ĭ9)9҅xh(ĥ`8 iIi`9A)I@`a{ ~I)_ bJ) b) )ab)a a,h0& &+%a0 +hcefd(c,@cfabdf`cnx  (,4h`dd ((((PPPPBTVSPLH   5"ʘ HH` (# (=  0`)aIٮ@8pذ `$0"8,:Jک@ׅפ؈۩MjL,:08*Ȅ B ,:J}΅н(I I $0;P̑бʑΈ,:JՐ̑ʈ0 Ցʭr̈A萠L: ֦ڱΑ0Б֤ h L  p,:0 JfiΥiώJe΅Хiю@ B $p̑бʑΈ0 Б̱ΑʈeمΐeمАA萿      " ' + 0 3 8 ; > B F I R U X \ a d f h j l n p r t       ' , / 2 5 : = G L O T W Z ] b i l o r  "+.14<:<>AFQU_acfkvz (,.0L}逅  L`8Ī8`]]],.0L} ;H:H`! (`,.0L} `H_H`LY`H h``H  "- hxȍȍ( "` @h'pt 7/20/84g.PRINTERD A "DATACopyright Interactive Structures Inc., Jan 1982 HH` (# (?dww.`,.$ () ") -'( .`% (.L}.'( `,.0L}&r.FMTD4 #(-CHMR'>AJQV]`gju)07Jehp{"$F7Copyright Interactive Structures Inc. 1981-84Ɠ8`% ` Ɠ8` a a$L HH`& (`! ( Í&č'( `+ (' (i0 (" (! (ȑ``"r.FMTD2 Dr.FMTD3  "L"L#L%ƓL` ` ѥ#H` wI)jH(ih`$֠LԢ` La` Laҥҭ%z8 a aHh` 9ԥ",8`` ` z0 z`h l m m m`HJН݌h Hh݌` JJJJ F``kpuLi hjI)`)&'( ׅP w VLxөЭ#iԩѥѢ` w`L [I꽌ɪVɭռYռY 꽌ɪ8``80^݌Hh [ [݌ m m m \ \ \EEHJН    ' + < ? D G N U f k p x (+@EIR[ty} NQ5(C) Apple Computer, 1983. Disk /// Formatter Driver.gr.FMTD1       . 3 6 9 < ? B E H N S V \ _ b w      ! ( 0 7 I N S _  . G R Y f {    ! $ 4 9 F I P S V \ a h m p s x |   !%*/369<?BEJMRUX]`h  2;AGMS[fot|        BGLQgjox',/25:BGKORY\aelpu !$(+.147<?BFILORUX]`finsw| :  `ʝ"`t  !#%')+;CNU\eh "*-036<BLORX_fj &+38;?DGLTot <?AGJMPSVY^cgr}"%(+09BGNQTW^adilqtx{ "%(+9=@CFMRX[^ehknqy~ %).3rux{ &+.3<FIUX]`cjorux  %(-3=@CILOX[`iluz} Apple Computer Inc.D vHuH` (# (jjA`,A$ (BC x) @( A`% (ALpx)`(BC `,A0Lp& (,A0Lp9 æĬSɀ֙TȌS !+?MS[aeu "%*2NVY^adgjorw|KP(Z.AUDIO C(C) 1980 by ) ` ) `x,V0 ")(`JN{%*-LQ\r{~  #(-2=AJLNPXdmsye$YHV ))ho kk0 qroqYLG,h,VLGj)`L5,jL",TP TcL,UUTdLXXL"lp,W0k,bPZ,[0\[cLZnoln _L `L aXl ^ ) (`\" ( Ù\ `ÍRȱÍS`l031e-Y x V(Y H`j) )g kkL)` kkLi ),b-cWLidWuoeQ,T0L@TEPd>gZ[M,h,ool,Q0L KHJH`! (QRo}`\" (\ÈȌk`RȭS` l  o `ȩ`,Q0L HH`LE9Uc,T U H,U0x])] olXYmnpqVWkj^)  ]]`,Q0LpEąĩEŅ|o,i0prH 8fofo7,T0*,V- x) V()LU Hh,RSLCpȥȑ`,Q0LmEąĩEŅ Hm`l HL 8f HH` (# (#+Q`,Q$ ()PJK . "]RSiTUWZ[ Q`% (QLl  )JK ;>ADG "$(*.24<>BFHLNPRTVZ\^`b   '*038@CFIPSW[`enw{~  #.158 9S`YX`X-,ˆ̭U)? VW @ ?ddxtB˩Eʍ@Xx ,P Eʍ(itiBX`,A0Lp HH`! (```,A0Lp HH`L%&S```lBSOS NTRPUcLcŮժᠺǥƂŠύ̕ŦåӁԠΠŠҟɀԠĠ̠ӠͮɅ ̠ȮӀՅ ̖ήFƈϐϠàӠЮЅ栠ҩŠîժŠ͠ŮҠɥơıŠƦ0ɔĐ 8,f 8f L`ʅUU=ȄL aȱi8eiiji!U)L`UUU`La` :0.`9::hhgg.%g& $gegަhH逪hhʰ`  0c 5bLT IJJABBU U`L^a8 UiXjjU):,$f 0$ p $ 0t!L`?iٰcL,aU )!a{)Qi ڐ߽U) xai) xaɢ ɣɍж$HU xahʥ0UUȩ5%"/װ&hԐɈf 56ɀ56H nhɀ])& UoL 2nL \ͷfL uf# 2nfHffhf) _ ʢLh `Lj lhP `U a-Qggeg5hih 6i6 hbU" b$%UUUg 5b bL6_ _^_ __hg^`8 ` i6g55``BY BSAMHH H]fHhH_HcH wwhch_hhhfhi0hhhB B A` L^'( z)&񦕤LNKM$Ld ě n 2n n6[6 5E UNAVAILABLDIRECTORY FULDUPLICATE VOLUM ERROR IN BREAK%&'(%+.@C$DE FG!H"I'MN#PQRTW(XɁ7XWWXjnXWi` 3^?@@bgchch ܆^ ^b ^b^b^L]b8g+H__^8O LONFORMULA TOO COMPLECAN'T CONTINUUNDEF'D FUNCTIOVARIABLSOS CALFILES BUSNOT SOI/FILE TOO LARGWRITE PROTECDISK SWITCHEBAD PATFILE NOT FOUNPATH NOT FOUNVOLUME NOT FOUNDUPLICATE FILDISK FULFILE LOCKEFILE NOT OPEDEVICE DISCONNECTERESOURC$CONV%LEFT$RIGHT$MID$INSTR>=<^/*-+NEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPRANGINVOKSTACK OVERFLOREDIM'D ARRADIVISION BY ZERILLEGAL DIRECTYPE MISMATCSTRING TONLISCLEAGENETABTSPCUSINTHEAMOSTEANOEXTENSIODIAFNOAAAAAAAAAAAAAASGNINTABSATYPRECAAAAAAAAAAPDLBUTTONSQRRNDLOGEXPCOSSINTANATNAAAAAAAAAAAASTR$HEX$CHR$LENVALASCTENAACONVCONV&CONVKBEOTIMEDATEPREFIXEXFNEXFN%OUTREINDENAAAAAAAPOHOMA SUB$OFTRACNOTRACNORMAINVERSSCALERESUMALEGOTIRESTORSWAGOSURETURRESTOOALOASAVDELETRURENAMLOCUNLOCCREATEXECHAIAAACATALOAADATIMAGCADEAPRINDEELSCOuuuuuuS}1DKuuuuuuuuuuuuȔ-zz4{ {@uu2{Ӎʍ?zzzzv#jvdvXX~}{{XJDފL^ENFONEXINPUOUTPUDIREAWRITOPECLOSATEXAAAAAAAWINDOINVOKPERFORAAFRHPOVPOERRLIERҟɀ jiLr pێrpE 먑uvfuuuuuuus2uuuIdUduuuuuu횑uu5d>;<<?@@V ě ]jhhHH  `89::  e!)`gHhHhH5?6@6@*5g5666gҦhhhhhhhhg:e:;e; ;m;`@c@c?be^@e@ _m__^ ]Lb潭`: 808`:LPL(\)&P ěj9ȑ9ȑ99i=:i: >i>`ff@ZH  c#IJJABB 9::)ѭp n mpV l$D$ P 膼Lq$0",i c{ ;mLmqHUHhp< $ p0H 07h m ,LoUVV r F uLp 0mLmqF вLo ?lȪL^ȱQȱȅR l uLqUVV$ LmjU r$ vuU UU@Lp " t ,; u nLOp#f 7 ;П ,ULp nʆ,U _U% oLwj nL_T ST#LT, U VV $ 0  rUVVE$ P% gV{||Hf Kh @r mLmq00$0 L o kff˻ffhhf`LvL6#&F 7 ; u d ` Lm$ uf#L5o566ȱ5Ln H# 2n n#͉L fhLn QRKLLuh$0LX$ LL^5r n ohhLiOPP` ff# hf dp,_;Ln  5s$0P ˌ˅5U66U n Lm n0 ok n#`$Ln#i)8#Ln "{ su u( LPdʊ# Lm n  zf5f$0H o kffhe##5ff˩ff?LUn ,?#$04fHHf yuHH 5sL mHHh$0'ph  ِlWȥmW`LVhXWXLhm lmmLlml ՔYZZ{|| y `lmmYZZ zWXX #z yYW# mXX =^W^0A,^`=8WW>X> XXXL^ h`L^ n Jj dxZkKhLhhhe9e:: mLi ?lei `Lu Bl:,"hhhhLiɜEɝDɞLe %{Hɾɺдmhɾ r l +k r l` lLk l,h`LwdLe$%/%5$ &5 &5e$$5e%%$&%$e$% Ll PMNKLhhLi`La, ; V aFL) u a }kLi &^hhh5h689H: H:HLHKHH6H5HHH` 0k` +k` r l +k r k` l BlK$L%8eȢ 9:: a.ghh ` ` `]ɾ,L^hhKȱLe潥ɂ逅$L# nKL n =jLiLuLe uj5逢)&a WHVHLgLl8:9: ІSTT`)ɀLK$Ld8gLOPPKLMNhhf 2n*]L_L2_-L(fPL^OW;8<< ` lLX*i mXX 熅XL| `]'_ch_chbi^g ]ihh &^ r l fkh r d s sn %jji56L|%}  d s  mXHWHHH iLOPP$pX0S&ȱhȱ  n#W", noȱ28eLgji`L2n noȱ"Ɂɂ ȱ :, iWjj ȱiYjj8逪XW0 ,h0WHW$ 0X: h lo ,h0 noLh) noWA 0 xa loLhfffff`,@ff Cg fʳfH @gh(fL2 \ffک,ffLgTg`zgfgHELLO l a(% -, dLu l {ghhh$PLuj 2nȱȱ%$LWH loh l aLK$L% L^gHhHhH , - d l$% ag5h6h6hhhhh8g5h6h `6 hbLbf 6`L6`  f.CONSOLE\ VfUfff gfg0  (`H uhLu ff h u e Re()' ReKHLI BlLl89弅:彬: `H hɝɞɜ)`ff  h芅 e ()'` e'()HKIL ReLjL^) jk!Lu 0c p a0d婷tgL6_$%L{g Lk` Dd` Dd` yuL%{ Sd#`L,H yu %{h 6Lۇ,L68f`  KL BlLlOPPKLLi KL` Ѽ  LL^&rL_```?EXTRA IGNORED?REENTER $0pL4{`LÍXW  m*iXX 熅X `]L^Xii7  n m$ WlXmXm uLrXXW }zEn{i { IH$ mh8 )KLe9e:: }Lii , Wr Vu$8$0p`PL^Յ H u rt ɀ ȱ[ Hih0 & ?<I?iE X Ls u )?JXK)JX  Ȋ' Lui imLLsLuhfh r$h8fLfg s$gPf8ef t~f X~f o0`Lt ` H$ge X~h 80 YLˀH h zEn{iL{f d$h0L| ef q80fLCOt#t$%] UoLKjk8  LUo -$nșUnȩ0iL炩 }e kjI*mlinL9|Fn`nEz0ʢiH {nihoi8傐IL`7 }!LiD8$n |iL"}n)FjjjL}iɠ WnnI*imL9|jklm` s e-o+ smo..IE)2s S -+vL~@jjj)(L L^~jklmL>|5665m5l5k5n j5i`d,]WXX566 m5 l5k5n %j5i5` m l)m m`znth` ht`i  | |`i n*` jfJ`5665y5x5w5zEn{z v5ui`uei0,iiLb|{n`nI0hhL^|L| i{ {i` o~{ L~ }L 8ii -~ivjwk xlym* 蕁24(y&x&w&v0⨥ymyxlxwkwvji0vvvvvj`L|^Vy dv88; 54541r LiHi?} {D} ~%} {*} I} {h YN} }L} -~~ }m }l }k }j }L L|J eyexew~ev~f~fffi0ŨV }${Wiuu8Iemlkj |jJkjlkmlmi in`emeymlexlkewkjevjL|i&m&l&k&j8iIiii9fjfkflfmf`nIngjIjgIm lkj`L^}Ym6Zm6Z y` zLr{5 LzL s ՐlmL z0566 `{{L s ِm*elL{mLiɑL Wlm$%`L{ }nInEz{iL{ }> }Luu8i$iznIi y("LiH)&h`( '&'`lmm566Ly ({H hjL` zYYHH 㔥YZZ #zhhe5566ɂ逅66 yZZY zL` zYILEzm ) u %{ zʊHYImm suhhhhYhZhZHHE` z YZZ yLyl5 Іf feLweLxL^lqx fyL^ Քxy{|y| yeGGHHɂHHlm{|m| y fyL` nxyyLzHI855J J6 666 h`{Hȱ{ȱ{ 656 syh H5Gh`lmm566 z5Hȱ5ȱ5 665 sy56h(`8ȱe iȅ s eff8  džffHs.GbHcHcLgxGgHhHhHH ]hhhGHHBBA!AghhLx8 džffeLw ]^A_B_B`)&N> ȱI8gJJ hhge ghhy6( y( y\LF )XHABB8 dž__^hHI8e^ dž@1 @+?%GHHHIJJih BABGHh`$  ě ww Дs IJJ^__Lhxeȱeȱe XE )s LxɁ >H>H= =>hgh<<;[a{gggegȱgehh LK ,L^  8` ^LВ hhL=6 $P 訽5cA[8饰 a{8`8\e@@He? 3^@@?hbbb0 ea ȑbc8L @@h5h656H mHlHkHjHiHl5 8eeghh^__` HHH H sh hhhn0iɐ ML {LW Lueff .!'$ iߪ$ 0 _H8eAfi\h$ P8 (L$ 0p ;<<ccb? @c@ube.a{bb,\(eb cc`eb`u ]LLi ]u ]Lui0 8 6,,% п zlm0}5}} kk} kklm Lz[ 80@ 6 2` { 㔠kH) ˎjhJJJJ ˎjL` 0:i`L^ u ` n-UUU`i` p`5665i`$0BP?iH i ]hLrv  mlmkljkij8ihn`L4{$0DpA ͍ nHi80 @L|u @u h `&m&l&k&j`L8{ 2 {L$0pLȔ ˌˢULi ]Ѕ ) }L`i i@Li$i0 p  `ui` L` u eLd5665`iɀ*iH i ] @8 i tutt tj hn` t` q0UN0U 0U$` ?p^|be ^b @ebbu|beiee^^iL\56^fbe55f5f6e}LɊe6u5u }`6ʈ`v`jip`  ?  ue }~ u 6 0 ъ}`  ъu ] iIii i)LɊ` i 0 3 0 0 `Hhth`^Qb ^^ 䊠bb `}i~ei^~0] e 䊠e^`}`566i5`_cf_cfi^eub` ^qbep`L^ 8b^e` Ίp`INLXZWX ߔ GGH HlHmHmH Qmhmhmhlh hk8j7k8LG t e77888 z57 yLy8I77JJ8 88`@iu +-ELƉ)  | .' "5 1  p)6mh6mhxhyhy y x Qȱx7ȱx88 Ƃ t7e7888ł75 78ߠȘH nyxy zhL "sHHHH u %{H , %{,H su yu 5shh 1 lhhXhXhWWȱW7ȱW8 eLji` HihJi(`  5s$L ɺ d$P i ]pi$ȱLlɻƟ l 柰ީ Lkhh uLi %{ u %{! d %{  u %{"!!!" 6 6 ۇ! ۇ 6 6 ۇ" ۇ 6!L`d8L6h suh5lhʥnH tiHɁ%} ~, hɁĠ {hLt` vy{| g|S}dpL}Qz}c0~~D:~L̑56gh6hegehh `iɂ8` `H Jh(L`H逨h` Hh8 Hɀjh i {     8᠄L}͠L  3٠ 3Ѡ J͠LĠ { ɠz }~  { {Π {nH {n0 I tΠ {h tӠL O K ]] n L~HL}IڢIڢ-(h#5ᆥ](Iڢ66ɂ66`8;)q4X>Vt~w/z*|cYX ~uƀ1r }iP  iɈ J~ i8Huiiu { t {h /~` O] } ]L} LoȘ戅 }iȅ {do`Abi$nFn) L56ۥ 8ee L^?be^@ce@c __^_ ]__^;<<6 $Phihi^Ȋ^6gȑgʆ5a g5ȑgȥg <^^^__ɂ逅____<;إy6 hlhm^Ȋ^LL^ȥ5^H^h Lel5emȆ6п  Le^e__ iLڏe *& eee`  ě ww8A?pB@B@ ܆onL8jkL ufȩ8 ufLLа,L^  u  h s su= uXHXHwwghhoؠKkqvj 8LV`$uZuukvN kGv@  vvyLSj 3L8 ,V-uukv kv@vvyLLޝj 3 8 A80멀uukeqqtt$uA)*Ң֢t ?L B$uЫkЦuuj 3ysLġ,VkLyh  (`|||}z,A[ :808Ш`,1@`y Gy`LޝHq1$u tAvʘtDթ 3q(~th`pvquts~y ffp$pp8j/;XAx=|8ez{{ Іghh "o `Lޝ x  -:/ UUhhh{hzh}h| w Zp 0|8pJ LXLLӟG $p0`pog nkڥrok8o,koLjAaCcoJ nko5 nkk nLʟ S L? nL֟ HG56H6H k l ٥z{{ Bl}hhh ;в| |膆  ,;' Lޝ w Z pLNL2n`|H}HzH{HHH ɶ# {hH u  5s su,; Lu  5s$ zrL qiLpnH hɀ8(*iU.YCBULěJAktbgIȌp q8  r s8 JJ` !UvUUU ^"( M F566 y}z{6{L% #z{{"} GLuL^ lHHcJcmi J_mjmjJ_AgBhBh ]^A_B_B`L^ JEI L r Bkgelge8Å c  uLRNO rAKНTJVP Q8 DDFR S8 DiFEC CD)XDmXDǩ|`LvH wwhA?B@7B@87F8f7877878L^7 8*JA5gB6B68 h圍h?H@H@HI?J@J@ hbh@h@h?gAhBhBJJ8 J圍J7d8eBaLv`ijBfi jL^`Ib^J88 ii UŦLXUU HHHHL̷ +hh LP iL +hlhkhn jhimhHN8 Lu`LȓJ1CUDVDVU Lŧ 0 7U L`uUU{U||LK: / cyUUȹUUȥ Uл yu U` hh U LuL  (L[ Uީ  @Y%(&:$LX Vu 2 iHn %jHkHlHK Vu ʍ ِlHmH5 Vu {iH ꎥHH楩e ) ,LuLK eՅ7Ui8U #  785U6VLǕU7e778ҥU^V_bcF_hcCgDhebbc ]^__`U8傅UV` uUȱU` L^ uUUƜ0ƛ ̘WqeWȱWqei W` u8UUWȥVUX`UeUV` UO / +'L U)łiV VL LB 8U 7ȱ7 UU ЯUVULU7V8 i L LS U qUU qUH85h688V77U U 5qUWȥ6qUX7qWWȥ8qWW ٥IiV) V LOU7VV 4YgXg8UXg5VYg665VgWg 4 4VgWgWgJi XgWgZgVg 485壍XgVg6复YgWg 4 c uUUHVH ̘U7WUV8XVV8 ̘Wb7ȥXɂ逅c7 5ef fbe  7U8VLh88h7UV^^`H"h{||kjkȱ{ "ie{||  Ք{|56|6 y&5L^i8IjJkJk ܆lmm'&`L^fCDDEFUVFVX L4  uVgWgXgYg8WHHHH lL d L s HHH mu shhh5ȱ6ȱLȓ65 h5H6 dHHHȱȱ6H6H5H u =к shhh Luhhhh` U/mZlmYZ wjHkkil$uhuuj 3 ?XkkNuuj 3k 4%v. ݠ J #  f`u Bvphh` Lޝjk ,hh`Sj9-k L9j ekekk|z)ekk |j[   Lޝ`j 9kkj"j"kеAX"+-&$.ECR/#Z*! DBA0 k$JJJJ) ݙUթU`yiɀjjn*8miɝ d L q$uLۤ$)JJ8偅8傪 ȥ f$i0Ł!y0GLĤLQ~䁰< a0$H ,GggL0sUgfɯfH chLv ov1 kffff LLvLefU L_H ݳhUUE UU`BLOCKS FREE: BLOCKS USED: TOTAL BLOCKS: ±`LvupHoHp  (hiXghiYg ? u`I !li)id`   r $ <,8 r  5si$ z656$0 p n %jjF$0ݢ0 liʽ`L , l)% `ٜL ` |u %{ Lʊ0 o `Ug c gg c Lm 2LˮL ꎅWXX` $` ,`HȘe`{ai|a|h - ;mLڮF 7 ; ` u op  4 t d sd LiLdʆ `! `Ȣ` :  `$ nL^u=g8i>hj>h ki=5j>6k6> hb 5b b$% kLi B  uLl$%`8f 7 ; ` u ` LuLeopL 0xH $0_ ih8fH`aai uhH2 {h JJJJf m ` :t osWgUg`Lvo`n}pm aa`dyopd8isŠt`dyoopd8ip`J uv`&&&8孪孪宐橈`! @ ; wwA?B@B @=g>h>h b=i>j>k V b LLLv ]gYg mZg8 n ]gvkUgl)@7gg0u(> ѨƬƫHH ^hohp` ]g0U`ȹU`VgVg 4LhsgN ǩ ? Og#X ggjgF=sg7N^g LsXggYgZg ? Og T L̬)Nl ^lEN)`L0s h  o d ɃɄ d`" lJJJJsg u ǩ LjLu RLN @uWgkjg tgg )llhgsigt hgigtggCighgȌWgXgUgVg ? Og"ighgH lhWUiUgiUVgL 5s zWH hW 5UWW nW` hL , u s Ր mqlr l)# u 0 ? OgLLv ``L ,Nku X ul)F UgH`UgVg 1gg Ngg 4NhHUg hUgl  Lv` H o h8L ± kLvUg 4 vkUgk L4 |u %{ʊ0  ekUg`L ({HIJh*Ug) H 4hVgL ({ъ) Ug)LLW= ɀ6"2豼U : , OgL ǩUgHVgH u ɩUgWgVgXghVghUgL4,fg ǩfWggXgYgL4 ǩL4 ({ n^8fl)I)I `op Ll L ({ nl)v rHqhLCLvkUg 4Ug jg wqr` hple Computer 1980, 1981  B n ꧠWgVg 4Lc gg` B Sb n Lc cLˍVgUWgYgXg=89U>:>:iU`9mU:mU: J &IHJh=>>UXgUYg9VgWg`L^ O aFL6_, ?U`Lv 6A ff# gf\ʐ 6 2nL 6 6 ff˻fдf`ffff \UgH chLLv`șfЂfffffffޭfffffffffнɯfз˩fб`  Apple Business BASIC v1.1 - (C) Apȥ xGƁ8 LQii0$iti8ti 8偅w恤wvwuJ-$n0+G0)GGwL 00`U 0r)`rqqLf $uyG-++ $n-G` kiekiiIif`ri8r` 0#U 0Ui)U`hGթ $u$n 0GЫ-Gv)' $G uJ-$n0+G $G0)GG(sȢ8傅䂐$u a0 xGL`$uAG)EGȩ+$i-Gȥf8 i y LH 0Gh 0GG5H6H6yLne ҥ GLOg qrL^op `VgWgsXgtYgkUg` ? OgLvVPgTQggRgfTg`EAd3] L^3]L^fWggXg Yg`agbgcg^WggXgYgdgegL4opqrst SVgVg` Ȳ ? OgXMLv$0% qr Ȳ 4qrqL `LeUsg La jg 3 Ugk 2nkUg ݳU nL@L 2nLRluvjghgsigtogwpgx`F UUq930>=22:=I:"*";H=79-I:"*"; R:930 \I=111f=I:=1:"*";p=23-I:=1:"*";z=I:=78:"*";=23-I:=78:"*"; =".D1"I=110:930::(930:1);:I=148:11);::::+l1):A$="B U S":650:A$="B U S S":650@vA$="B U S S S":650:A$="B U S E S S":650:A$="B U S I E S S"+650:A$="B U S I N E S S":650:930:: =12:500=1:11);:"78C";A$ I=391-1*=1:=I:"*";4=79-I:"*";9I=20 * "T5008^A$="* * * * * * * * *"h5008rA$="* * * * * * * * * * * * * * * "|500::::1);:"78C";A$:%X1):=12:=38:2);:=80:3)*b=40:"B S";:I=139:23);255);: * * * "5008A$="* * * * * * * * *"5008"A$="* * * * * * * ",50086A$="* * * * * * * * * * * * "@5008JA$="* * * * * * * * * * * * * * * "700KA$=" * * * * * * * * * * * * * * *"700:A$="":700:700:930600 =14:2):=22:=80:3):8A$="* * * * * * * * * * * * * * * * * * * "700KA$="* * * * * * * * * * * * * * * * * "700KA$=" * * * * * * * * * * * "700KA$=" * *  999 :930&22);26);80);10);3):100930 (800:990KdA$="* * * * * * * * * * * * * * * "n700KxA$="* * * * * * * * * "700KA$="* HH `DONN DENMAN STRIKES! H o h8L  kLvUQ 2 vkUQk L2 |_ %eʊ0  ekUQ`L{ (eHIJh*UQ) H 2hVQL} (eъ) UQ)LLW= ɀ6"2豼? : ^g ag_gbg`gcgLLLu_g`g  u s Րml0L`g_g`Vubhb]lk{aap8y^věyynyBOgՐihm?lK;mm0j̷5:?4ӍCHH CD\hh Hh`L)i   IC DATA WPTEXTSYSTEMRESERVRESERVCAT kUgo 1$'XgdYgVgUWg ? OgL8`L:LUUU) UJnU UJJJJ /UU`H hmUUUUUU`0U`UU :UUL ǩ u ɋ 0#agUpUoUn ˌUUUU ȹUUUʈ00U%U$U [UU. ['U&U( UU7 `st?9}Ust5 ewx! es8wtx euuLUUNKNWNBAD PASCODPASTXTTEXT PASDTABINARYFONT FOTO BASru HH` TakTu+ 1U)UU(U)U UU [VU#U ȹU Uuu`@nU TYPE BLKS NAME MODIFIED TIME CREATED TIME EOF U)!U)*UU)UUU mUmUUir GRAFIXMO hhhh  HH`420.,*)&#"! Rhhhhhh    HH`DB@><:983.+('&$h J)` `!0 nljhfdcbQNMLJFEDCBA<;6hhhhhh  HH`420.,*)&#"! Rhhhhhh    HH`DB@><:983.+('&$hhh-&#  P  `"hhhhhh  HH`420.,*)&#"! Rhhhhhh  B B HH`yyP`GB HH`)r` @A>~|zxvtslgbWTSRPMED=hhhh   HH`420.-&#  Phhhh   HH`420.h   HH`420.-&#  Phhhhhhhhhh  HH`DB@><:86421.+*)'jhhhhhhhh    X XLJFE>987410/-   `+(%" Bhhh h h h hh hhhhhh  HH`ZXVTRPNLJHFDB@<;85431hhh    `OLIHEDCB?<;8541.+*x  `"hhhhhhhh    HH`XVTRPN.GRAFIX jj# \\JHFD=;9210-,+*)!   v Q )``.`5`=`C`E` `BGRAF (C) APPLE 1980j @@@@ @``` kLK``9(89:9g:h:h L89:mm95:6:6hg gh h 99 O S   L `ee m`iɂ`0`hIhJh\h] wh]h^ w\\ ]] ]L ]L\A \A JHIH`i8\i]i\`\]`K`M %b&*L+ 16>:)    kLGA3/1.01/LIN 詏 )x `a^]NMJGF>=<10/.+* )) y xHHHJJiH 詏 鮀 `}wqnkjba_\[ZYXWVURQ$hhhhhh HH H)HHH`20+*)Hhhhhhh HHHH`&$<SWRITERWBUF  RETADDR c _ < 8 INITCHK O ITCHK WBUFLEN Y UFLEN SOSWRITE\ SWRITERWBUF T L H D @ DOTAT DOTAT RWBUF ZRNJFCALCABS BRETADDR SOSDSTATSDSTATGSCB  MOVEREL MOVEREL INITCHK ITCHK WBUFLEN UFLEN SOSWRITEWBUFLEN !UFLEN SOSWRITE$SWRITERWBUF BUF RETADDR ieB>INITCHK UITCHK MOVETO MOVETO  WBUFLEN _UFLEN SOSWRITEbSWRITERETADDR INITCHK ITCHK RANGECHKNGECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  INITCHK ITCHK FILLPORT FILLPORT RETADDR tpINITCHK ITCHK PENCOLOR PENCOLOR RANGECHKNGECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF |x FILLCOLO FILLCOLO TRETADDR  SETCTAB SETCTAB  INITCHK ITCHK RANGECHKHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  'SOSWRITESWRITERWBUF  RETADDR PLINITCHK sITCHK VIEWPORT VIEWPORTWBUFLEN }UFLEN SOSWRITESWRITERWBUF  xplhd`\XUFLEN SOSWRITESWRITERWBUF ~zvrRETADDR $ INITCHK ITCHK XFROPTIO XFROPTIORANGECHKNGECHKWBUFLEN UFLEN #ITCHK WBUFLEN DUFLEN SOSWRITEGSWRITERWBUF ?:72-(SYSFONT SYSFONT RETADDR njDRAWIMAG DRAWIMAGINITCHK ITCHK WBUFLEN RETADDR INITCHK ITCHK RANGECHKECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  NEWFONT NEWFONT INITCHK =+SOSWRITE@.!RWBUF  83& INITCHK uITCHK GRAFIXON GRAFIXONWBUFLEN UFLEN SOSWRITESWRITERWBUF zBUF GPGSREQDLGRAFIXMO GRAFIXMORBUFLEN 9RANGECHKwWBUFLEN ASOSWRITERWBUF \SOSREAD GBASADR TSOSSMARK$INITCHK ITCHK INITGRAF INITGRAFWBUFLEN RETADDR ISOSDSTATGSCB kSOSOPEN INITCHK READPARM5CREFNUM DWBUFADR ?BMOVCHK RBUFADR 7WRITEPAR=SREFNUM FRREFNUM 6WREFNUM >INITFLG KSOSCLOSEhhhhhh HHHH`&$<D^Z FpHx  )) y xHHHJJiH 詏 鮀CALCABS  ABS RETADDR  SOSDSTAT SDSTATGSCB INITCHK  ITCHK DOTREL DOTREL WBUFLEN  UFLEN SOSWRITE SWRITERWBUF  RETADDR % ! INITCHK  ITCHK LINETO LINETO WBUFLEN  UFLEN SOSWRITE SWRITERWBUF     CALCABS x q ABS RETADDR  INVOKEd before it can be used. Once this has been"J"done, the command PERFORM INITVOLUME will initialize the routine.":S" Before the rest of the Module can be used, a String Variable must be"a"reserved. This can be as simple as 'A$=" e and number of Free blocks,"Jd"(or a NO DIRECTORY message if appropriate) for all Block devices.":Vn" The Device Name and a DEVICE OPEN or DEVICE CLOSED message is displayed"#x"for all Character Devices.":T" The Module must be` +"76c";"VOLUMES INVOKABLE MODULE"2 /< (C) Copyright Apple Computer, 1981FRP" The VOLUMES INVOKABLE assigns, to a predetermined String Variable, a"VZ"string comprised of the Device Name, the Volume NamYLOC  SDSTATGSCB  INITCHK  ITCHK XLOC XLOC RETADDR     SOSDSTAT SDSTATGSCB   INITCHK  ITCHK YLOC  ASADR SOSSMARK SSMARKRETADDR  z v INITCHK  ITCHK XYCOLOR XYCOLOR RWBUF  F SOSREAD  SREAD RETADDR  SOSDSTATGPGSREQD GSREQDSOSCLOSE SCLOSEGRAFIXMO AFIXMOGLOAD GLOAD RBUFLEN  N RWBUF    SOSREAD  EAD GBASADR GBASADR ( ASADR SOSDSTAT~ SDSTATGSCB  INITCHK { ITCHK CREFNUM  EFNUM RBUFADR  ADR SREFNUM  EFNUM RREFNUM  M WBUFADR   ADR GSAVE GSAVE WREFNUM F  M GPGSREQD5 GSREQDSOSCLOSE> SCLOSEWBUFLEN 8  LEN SOSWRITE; SWRITERWBUF C F INITCHK  ITCHK BMOVCHK  OVCHK INITFLG  ITFLG RWBUF  F SOSDSTAT" SDSTATGSCB % CB INITCHK  ITCHK CREFNUM  EFNUM  T P SOSDSTATj SDSTATGSCB LINEREL LINEREL INITCHK g ITCHK WBUFLEN  UFLEN SOSWRITE SWRITERWBUF } d ` \ X RELEASE RELEASE ;34);" ";34);"'. Then, each time the command"P"PERFORM GETVOLUMES(@A$) is executed, the Device information returned will"U"be put into the String 'A$'. If a Device outside the legal range is accessed,"O"the routine will give an OUT OF DATA error and reset itself to the first"T"Device. (Or you can issue another PERFORM INITVOLUMES to return to the first""Device.)"2=22:"76c";"Press RETURN to Continue.":in$K=2:29):=5:" The following is an example of this ModuCURDEVNUBUFFER CLRBUF BUFPNTR INITVOLU INITVOLUCURDEVNU~BUFFER  CLRBUF {RBUF BUFPNTR YTNTR GETVOLUM neMA Device Open Device Closed Device Not Found |>=4,'     3ml\D4~L}.~}؈H) 0hJJJJ) 0`{|) |8! " ``L#L(LL  {No Directory} BLOCKS FREE 8 `KFAZhhhWhXXHH poLL-vI 0LHhh ߠ& `GA3/1.021 INITVOLU able"5"------";9);"-------------";9);"---------": a=1i a$(a)V a$(25)& --- INVOKE the module from Disk "VOLUMES.INV" (œ110!2 --- Initialize the Routine <INITVOLUMES Fi=i+1 P --- Get Device InformationZGETVOLUMES(@a$(i))d70n9x:=5:"Device";9);"Volume/Status";9);"Avail350:0"")PERFORM GETVOLUMES(@A$)":GETVOLUMES(@A$)'WAIT=1350:,")PRINT A$":A$:le:":+")INVOKE VOLUMES.INV":"VOLUMES.INV":*")PERFORM INITVOLUMES":INITVOLUMES:WAIT=1350:")A$=";34);" ";34): WAIT=1350:0")PERFORM GETVOLUMES(@A$)":GETVOLUMES(@A$)WAIT=1350:")PRINT A$":A$:WAIT=1GETVOLUM N  ' Set the Apple /// Date and Time .( Copyright (C) Apple Computer, Inc. 1980 - 1day$(7)2day$(0)="UNKNOWN"3day$(1)="SUNDAY"4day$(2)="MONDAY"5day$(3)="TUESDAY"6day$(4)="WEDNESDAY"7day$(5)="THURSDAY"8day$(6)= TIMSET ҟ,1,1)):h2%=ҟ,2,1))% mi1%=ҟ,4,1)):mi2%=ҟ,5,1)) '::c%)7+1)9d3%<0d3%=0> ' Get components of DATE$ and TIME$ # y1%=Ҡ,1,1)):y2%=Ҡ,2,1))# m1%=Ҡ,4,1)):m2%=Ҡ,5,1))# d1%=Ҡ,7,1)):d2%=Ҡ,8,1))< year%=y1%*10+y2%:month%=m1%*10+m2%:day%=d1%*10+d2%:2000# h1%=4 Zeller's Congruence to calculate day of week  Inputs: year%,month%,day%% Output: d3% = 1-7 (1=Sunday)  c%=19 d%=year% k%=day% m%=month%-2*m%<=0m%=m%+12:d%=d%-1=4d3%=(26*m%-2)/10)+k%+d%+d%/4)+c%/4)-2*MSET(%Y1%*256+Y2%,%M1%*256+M2%,%D1%*256+D2%,%D3%,%H1%*256+H2%,%MI1%*256+MI2%)b100 Get character subroutine d$d$)=27100: ESCAPE 3d$=" "d$=i): SPACE leaves original char d$<"0"d$>"9"1030$d$;.00:day%=c$+d$)day%<1day%>31400d1%=c$):d2%=d$) "/";0i=y1%:1000:c$=d$:i=y2%:1000:year%=c$+d$)year%>99400y1%=c$):y2%=d$)#h1%=ҟ,1,1)):h2%=ҟ,2,1))%mi1%=ҟ,4,1)):mi2%=ҟ,5,1)) 2000&600TXTI6002=left:=top+10::"Type D to change the Date")=left:=top+2:Ҡ,4,5);"/";Ҡ,1,2)=left:=top+2:1i=m1%:1000:c$=d$:i=m2%:1000:month%=c$+d$)month%<1month%>12400m1%=c$):m2%=d$) "/";/i=d1%:1000:c$=d$:i=d2%:10=top+2:ҟ,1,5)6=left+13:=top+2:0@i=h1%:1000:c$=d$:i=h2%:1000:hour%=c$+d$)Jhour%<0hour%>24300Th1%=c$):h2%=d$) Y":";1^i=mi1%:1000:c$=d$:i=mi2%:1000:min%=c$+d$)hmin%<0day%>59300rmi1%=c$):mi2%=d$) |":00"00:00"d3%=0160*ncoo&=П,2))12:ncoo&=0ncoo&=12$i=1ncoo&):#1;cuck$;koo$:i160=27=39999="t")="T")300="d")="D")400 2002,=left:=top+11::"Type T to change the Time"1=left+13:sing Space key leaves original value")"ESCAPE aborts operation or program"*notfirst=0"timeset.inv":notfirst=1 200=left:=top+2$Ҡ,4,5);"/";Ҡ,1,2);" ";3000:2000):left+6);::day$(d3%);::" "!ҟ,4,5)<>"oo$=128)+01)+095)+2)+08)+0)+128)+20)+095)+2)+08)+0) N=top#P=left:"Current date and time"#Z=left:"------- ---- --- ----" d=top+10'n=left:"Type D to change the Date"'x=left:"Type T to change the Time"1=22:"U"FRIDAY"9day$(7)="SATURDAY"<#1,".audio""A16);1): 40X24 Color modeED19);0);20);15): Set foreground/background colors FKleft=9:top=5QLcuck$=128)+01)+000)+2)+04)+0)+128)+30)+000)+2)+08)+0)PMk'II.0 [d.3](2 ,5 ȱ5` `L GA3/1.0V APPEND TIMSET TIMSET  hxhyhi0rhi0qhi0phi0ohi0nhhi0mhi0lhi0khi0jhi0ihi0hyHxHbc`f1900000COPYRIGHT (C) APPLE COMPUTER 1980{vqlgba_\Z5m56666 65 ` 5 66`+ ,5ȱ5 ( ,+L h +`h,&L`5b6c6c5 5^6_6_ ,5ȱ5 5g6h6h 5 LK/L4H568hH wh R173K91yy`5ȱ5ȱ5L/eIfd`H z h Γ`bccbHɂ逕h 1܌1`򩀍%1LFILNUM2 0RELTAB z GOMESH  APPEND APPEND MERGEOK &START XREFER HIGHRNGE#LOWRNGE !FINDTAB  CLSALL  OPENLEV  OPENTO  RENUMER  SETBUF 7653210.+'&%$#"   <LhhhhhhhhhhhhhhHH LQKIGECA?=41.-,+*)(|hhhhhhHH  L1$ JLL,|wvtmifcba`_\ZVUTSOKJI)&%# zvutrrhh_PMLK:7653210.+'&%$#"   <LhhhhhhhhhhhhhhHH LQKIGECA?=41.-,+*)(|hhhhhhHH  }{xunmlZWVUSPNKIHGED51.&%$ wvtmifcba`_\ZVUTSOKJI)&%# zvutrrhh_PMLK:pmlkjfdaXWRQNED?<;:7210/-,$" }zut^]\[ZUTSRKJA@?>=8721 %1/05665/ w123L7\ \ [ V P L C - ( # !         ~}SRQPMKBA840,* u /ć X . Lh-)͎ L / w-/%`/- ե9::,,`!L 2u 2 2 ,&hhhhhhhhHH /0   L ` `*,. L _ ` A\ _ 8_ ` L Lh a *b 8 f c d 8 f `!iɂ8`*e E LhL ,,-566 2LJ 53r *F-) y TLh L ,  z  5 66 = , ;h ^3$4% c$ c% cg^_  1e__gL Ȅh _1  L3 LC^^g2 c_h`5H6H6H$% 5$ȱ5%h6h6h5`L   0:,)$&%$%H$&%$&%e$%m$he%%ɩ`ȩ(L 5 `5%5$8` e  1` c., Lc`` u ,5ȥ5ȭ5 b3!4"!#$m m 5Ȋ5ȭ35ȭ45  g3$4%  , p 1 &ʭ1 L л5$ȱ5%5  p 1'â V L , = -? c1  p 1' V = LV 2`ɺ1-)%ɾ!-,,(0cȹ2ɄɁɃSȹ20L:Hh%$(203͉4(L h#1 ULh21 e ǩ421 L@ p L L p LHM(& ))L`h(`8' , u 4g354ȑ5g g$5ȥ%5Ș5 L L 5 66 1 V h`Lm 1b$&%mmmؘHJJJJ ]h) ]`b 00b1`1 !u1 1i1`` 0Ls` /Ls() F OPENBI  BUMP OPENBO  CLSOUT RESEQNCE RESEQNCERENUMEN CNUMEN RELTAB LTAB MERGEOK WRGEOK START kgT HIGHRNGEsoRNGERENUM RENUM LOWRNGE {wNGE FINDTAB NDTAB CLSALL SALL OPENLEV ENLEV RENUMER NUMER SETBUF TBUF OPENBI ENBI J200::110T --- MERGE^::"76c";"-- APPEND --"Uh:" The APPEND Procedure combines two Basic Programs together and puts them"Ur"into a single output file. One of the Programs MUST have ALL its line numbers"V|"higher (or lower) thOUT$)":")PERFORM XREF(@IN$,@OUT$)"6:"where IN$ is a string containing the name of the Basic Program to be analyzed,":"and OUT$ is a string containing the name of the file where the output is to be"3@"sent (i.e. a filename, or Character Device)."erence List to.":P" XLIST outputs a list of ALL Line numbers and any references to them."O" XREF outputs a list of ONLY those Line numbers that have references"""to them."c,:" The Command Formats are:"::")PERFORM XLIST(@IN$,@ There are two similiar Procedures for locating Program lines referenced"O"by other lines in a program. These Procedures are XLIST and XREF. Both"P"require a specified Basic Program to be analyzed and a designated file to"&"output the Ref Quit"48);:"Which option? ";a$:x=a$)-48:x<0x=0x210,340,560,19018);"Please enter 1, 2, 3, or 4":=-2:160:5=24:"76c";"Press any key to Continue.";:a$: --- XREF(::"76c";"-- LINE REFERENCES --"U:"f this or another Invokable Module."::2006n:"76c";"---- RENUMBER INVOKABLE MODULE ----")x:8);"Select documentation on: ":G20);"1 Line References":20);"2 Append/Merge Two Programs"520);"3 Renumber a Program":20);"4 ********6P:"76c";"---- RENUMBER INVOKABLE MODULE ----"|Z:" Before any Invokable Module can be used, it must be loaded into the":"system by the following Command Format:"qd:")INVOKE RENUMBER.INV"::"where RENUMBER.INV can be the name o *J2 * (C) Copyright Apple Computer 1981 *K< * * JF ************************************************************J ********************************************************************J * *J * Renumber Invokable Module Documentation *J( * XREF XREF GOMESH 7MESH MERGE MERGE  FINDTAB NDTAB CLSALL SALL XLISTER OPENLEV ENLEV OPENTO ENTO RENUMER SETBUF TBUF OPENBI ENBI XLISTER %ISTER BUMP c_ OPENBO ENBO CLSOUT SOUT RENUMEN FILNUM2 RELTAB LTAB MERGEOK RGEOK XREFER EFER XLIST XLIST an the other, and the effect will be as if one was Appended"S"to the other. (This can be arranged by first RENUMBERing both programs with" "suitable line numbers.)":" The Command Format is:"::")PERFORM APPEND(@FIRST$,@SECOND$,@OUT$)"::"where FIRST$ and SECOND$ are strings containing the names of the two Basic"r"Programs to be combined. Once combined, the file is sent to the filename":"designated by the string OUT$."200"76c";"-- MERGE --"T:" The MERGE Prmerge(@i$,@i2$,@o$)^h --- RENUMBER#r::"76c";"-- RENUMBER --":9|"Name of Program to be Renumbered? ";i$:i$)=020A"Save with what file name? ";o$:o$)=0=-2:29);:380_"What line number should I start renumbering at? (hich Program should be merged with it? ";i2$:i2$)=0=-2:29);:2709""Output file name? ";o$:o$)=0=-3:29);:2708,"Should I allow interleaving of program lines? ";a$$6a$)="Y")a$)="y")340@append(@i$,@i2$,@o$)JT0o$=".console"R"Should unreferenced lines be displayed?";r$:r$)="y")r$)="Y")230xref(@i$,@o$)xlist(@i$,@o$) --- MERGE'::"76c";"-- APPEND/MERGE --":2"Name of the first Program? ";i$:i$)=020Q"Wx=a$)-48xx150,250,360,14018);"Please enter 1, 2, 3, or 4":=-2:110 :: --- XREF::"76c";"-- XREF --":,"Name of Source File: ";i$:i$)=020B"Output file name? (Press RETURN for output to .CONSOLE) ";o$o$)=O "renumber.inv"#"76c";"---- RENUMBER ----"!2:8);"Your options are:": <26);"1 Line References"&F26);"2 Append/Merge Programs"#P26);"3 Renumber a Program"Z26);"4 Quit"d*n8);:"Which option? ";a$:- RENUMBER/RESEQNCE --"::" The Command Formats are:"::")PERFORM RENUM(@IN$,@OUT$,%BEGIN,%END,%START,%INC)":")PERFORM RESEQNCE(@IN$,@OUT$,%BEGIN,%END,%START,%INC)":V"where IN$ is a string containing the name of the Basic Program to be REN"-- RESEQNCE --":" The RESEQNCE Procedure is identical to the RENUMBER Procedure except":"that RESEQNCE will allow the renumbering of a line, or group of lines, to move"3"those lines to another place in the program."200*:"76c";"-ne Number"Jb21);"New Starting Line Number":21);"New Line Number Increment":l" If RENUMBERing a line, or group of lines, will move those lines to":"another place in the Program, the Procedure will return a RANGE ERROR."v:"76c";:" The RENUMBER procedure allows you to renumber all or part of any Basic"PN"Program and output the RENUMBERed version to a designated file name. The"iX"Procedure requires values for:"::21);"Old Starting Line Number":21);"Old Ending Lid. Once combined, the file is sent to the filename":"designated by the string OUT$."U::" If both programs have a line with the same line number, a RANGE ERROR""will occur."&200::1100 --- RENUMBER::"76c";"-- RENUMBER --"TDss care is taken, this can result is a very""unusual program.)":" The Command Format is:"::")PERFORM MERGE(@FIRST$,@SECOND$,@OUT$)"::"where FIRST$ and SECOND$ are strings containing the names of the two Basic"r"Programs to be combineocedure also combines two Basic Programs together and puts"N"them into a single output file. If the programs have line numbers that"O"overlap in range, the programs will be MERGEd together, putting the line"T"numbers in numerical order. (UnleDefault=0) ";low$:low$)=0low=0:4204low$)<48low$)>57=-1:400:low=low$)d"What line number should I renumber up to? (Default=63999) ";high$:high$)=0high=63999:4408high$)<48high$)>57=-1:420:high=high$)`"Starting value for the renumbered lines? (Default=10) ";start$:start$)=0start=10:460<start$)<48start$)>57=-1:440:start=start$)V"What increment between each line? (Default=10) ";bump$:bump$)=0bump=10:4808bump$)<48buGApple 1.1R READC %);VT=1:=22:"The ASCII value is ";value%;"; the character is ";34);value%);34)^200 h=24: "=1:=20:œ360C,"Enter a row (VPOS) and column (HPOS) coordinate: ",row,column,6row>24column>80row<1column<1300@=row):=column)Jreadc(@value%)L=row):=column):"+";Mwait=1200:$O=row):=column):value@ Establish a viewport just over the line numbers and REM's=10:=24:3)": Clear the little viewport%15): Turn the screen back on.4): and restore the original viewport"readcrt.inv")=48:=20:" dows, VPOS, and HPOS+F see "Formatting text on the screen",#P Apple Business BASIC manual.Ud-n Copyright (C) Apple Computer, Inc 1980 x"::1): Initialize screen/14): Turn the screen off while listing 10-130m / An illustration of an application using )( the invokable module READCRT.INV 2 C4 READCRT.INV programmatically returns the character displayed15 at any arbitrary location in the viewport.62< For a discussion of Winw,%high,%start,%bump).reseqnce(@i$,@o$,%low,%high,%start,%bump)e mp$)>57=-1:460:bump=bump$)H Map numbers larger than 32767 into standard two's complement form.3low=low)):high=high)):start=start))M"Should I allow lines to be moved? ";a$:a$)="Y")a$)="y")530+renum(@i$,@o$,%lo #.-2hhhhHH`$.CONSOLE24320/J^J ********************************************************************J * *J * Download Invokable Module Documentation *J( * "Error...Error":50$ --- font downloading utility "download.inv"a%(512):array$="a%" (œ150)2"Which FONT do you want to use? ";a$<a$)=0Fa$="?":501Pexpr$=34)+a$+34):getfont(@expr$,@array$)Zloadfont(@array$)d50#=255:Y5ȱg6ȱg@ ɀLDg eegghI8e556l6m`  lmL}\ZYc&h:h; (+65;H:H`,.CONSOLEg<:/.-+*(% CX`hhh5h66HH :~5~HHH|})   |}) @  hhh ghzh{ Qghhh5h66 HHH566 qyhhhpx{HzH`~ GA3/1.01:7SY GETFONT READC READC  *J2 * (C) Copyright Apple Computer 1981 *J< * *KF ************************************************************* >>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> " )((8*,;((*,((+)((9/(p((>3  =9 :9 .(+( 8#8# %3(8 ((,+)(%.4$)?((,(103  7  3  5  34)+a$+34):getfont(@name$,@array$)*loadfont(@array$)4-1):50 Znum=i-1\:=5:j=1num:a$(j):j"_i=1num:a$=name$(i):800:=19dtitle$=name$(i),1)+" Character Set":"73c";title$1n=21:"73c";"Press SPACE BAR to exit demo."xwait=1500: i:95a$="standard":800:1 name$=B$ --- font downloading utility a%(511),a$(20),name$(20)array$="a%""download.inv" #140 (#5, -ž#590 2i=i+1!<#5;a$:a$,3,4)<>"FONT"60>Fa$(i)=a$:name$=a$,16,15):j=115:name$,j,1)<>" "jPname$(i)=a$,16,jired Font":"name to another String Variable. The String Variable containing the Font"I"name is then enclosed in Quotes and assigned to a String Variable.":")ARRAY$=";34);"A%";34);:ARRAY$="A%":":FONT$=";34);"ROMAN";34);:FONT$="ROMAN":" Dimensioned, ALL the"n,,"free memory will be used and an OUT OF MEMORY":,,"error may be returned until a CLEAR is done.":=-2")DIM A%(512)":A%(512)wait=2500:270::"Next, assign the name of the array to a String Variable, and the desD.INV";34):"DOWNLOAD.INV"Wx:" Then an Array space of at least 512 characters {i.e. DIM A%(512)} MUST be""reserved. (When a Font is loaded, a BAD SUBSCRIPT ERROR will be returned if":"the array is too small.)":,,"NOTE: If the array is NOT******* P:Q$=34)5Z"76c";"DOWNLOAD INVOKABLE MODULE DOCUMENTAION"d:" Through the use of DOWNLOAD.INV, it is possible to change the Character":"Fonts used by the system. The Module must first be INVOKEd."""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>"""">>6>>***~" "!@?""?$$>>>  @@  >6>6 P"YEEY" > >">>""">>> >""">>">><>""> >>""""  IIII>"""">""">>"">>""> >">> >><$$$$<"""AIII"""""> >>>  00`00**?!%%;??!###?!##??!#?!!###????!9##?!!?!### 001! ##??IIIKKK')))++3?!!!##??!!??!!)+/?!!?##??00?? !!!###?!!##"AAIIKK! !!!!!? ?? @< <6c~66$""""">> >G%tRq  .     > >>@ ? ??? >>>>~B@x????????.333>> >333>!?&>33> 3333 00000633 ++++666666633>33> 6>06>; ++++>3 3333>$? ?pp86>6|~fnl6vf~><~~<`lnf~||f6|<~f|~fnl`<6vfff<<<<<````ff<f66f<<<<<<>~ZZZ>~fff<~f~<>~fv6|~fnl``<~f>><fff~|fff<ZZZ~|f<|>8p`xx``xx>8888866$$~$~$>> >B%$R! *,88888"6">~~`p8>"""> > >>> > >""> >> >>>">> >">">>"> ~~ < <~b0pppppppp"AAAAAA>>6>>***~" "w"w>>$$>>>00@@ !~6>6AAAAAA <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,>!$$$>>< (#21*,*>*>> "2*&" >" ">"  "?8>" """">"""""""< "00>> "  CONTROL ^adgjorw|KP%*-LQ\r{~  #(-2=AJLNPXdmsy !+?MS[aeu "%*2NVYP TcL,UUTdLXXL"lp,W0k,bPZ,[0\[cLZnoln _L `L aXl ) ` ) `x,V0 ")(`JN{Y H`j) )g kkL)` kkLi ),b-cWLidWuoeQ,T0L@TEPd>gZ[M,h,oe$YHV ))ho kk0 qroqYLG,h,VLGj)`L5,jL",T`ȩ`,Q0L HH`LE9Uc,T U H,U0x])] olXYmnpqVWkj^)  ]] ^ ) (`\" ( Ù\ `ÍRȱÍS`l031e-Y x V(x) V()LU Hh,RSLCpȥȑ`,Q0LmEąĩEŅ Hm`l HL 8fol,Q0L KHJH`! (QRo}`\" (\ÈȌk`RȭS` l  o Q`,Q$ ()PJK . "]RSiTUWZ[ Q`% (QLl  )JK `,Q0LpEąĩEŅ|o,i0prH 8fofo7,T0*,V- cguwy{}$(/4:?IXad#.&"&""` ,2"2l"><$,22, &""w  0 "2 # ***+&""#"""&&l22, `&< $g""2lg""c***6ccg""< >$>88  !-3>">""w"""""""""""?"  "??""r""w"">""w>**>8c  g"?c6**""w#&*2""w"""""""!!!)."""w1 #Iw"""""w""""c""**6"c""cw"">""> "GA3/1.01:7SY  *J2 * (C) Copyright Apple Computer 1981 *K< * * JF ************************************************************J ********************************************************************J * *J * Request Invokable Module Documentation *J( * FILWRITE FILWRITEGETRFNM RTRFNM ERROR ^ROR DOARRAY OARRAY  ERROR ?BUFPNT NT DEVINFO DEVINFO MOVESTR FILREAD FILREAD BUF :4 GETRFNM BUFPNT OJNT ERROR ROR DOARRAY e=TPARMSERROR uROR BUFPNT BMOVESTR REQNUM UUM BLDSTRN DSTRN BUF pia RETURN RETADR  GETPARMSFREQNUM BUF "CONTROL CONTROL RETURN RETADR GETPARMS TPARMSERROR ROR STATUS STATUS BLDSTRN ,BUF |F GETPARMSca` hhh5h66HH :5HHH) @  hhh g5ȱg6ȱg@ ɀL g eegghI8e556l6m `  hUhVh8 ㅊ eh֭VHUHk`HFB>;:9853/&" NL64Ch5h6h3lh4m 0/L6H5H`g8640'%76,V^dKA;6hWhXhhhQlhRm e Nb YMH YhLSꈭTXHWH`gca` hhh5h66HH :5HHH) @  hhh g5ȱg6ȱg@ ɀL g eegghI8e556l6m `  hUhVh8 ㅊ eh֭VHUHk`HFBhhHHHH l5m6m6  ЙW5X6X6 ` 5`MD32KA;6hWhXhhhQlhRm e Nb YMH YhLSꈭTXHWH`g##6 >?Bi{Ci|) |=! "LL{@?>8(O\ F9 >{i 5|i6) 6|8 L5{ hhhh0 hWhXXL `L5******** P:14)7Z"76c";" - - DEVICE REQUEST INVOKABLE MODULE - -"d:" The Device Request Invokable Module allows direct access and control":"of Block and Character Devices from Basic."Yn:" The Module must first be INVOKEd by the )PERFORM DEVINFO(@PARAM$) NAME$"::"where PARAM$ is a string variable that will contain the values of the"x"returned parameters, and NAME$ is a string containing the name of the device":"to which the call was to be made.":" The Parameters rthe list of Control Codes for the particular device.)" 730:80 --- Devinfo)14)::"76c";"- - DEVINFO - -":|" Operational information about any Device can be obtained through the use":"of the DEVINFO call. The format is:"s:"signated Device Status List will"q|"be returned, and NAME$ is a string containing the name of the Device where the":"Status call is directed.":" (Refer to the Standard Device Drivers manual, or to the manual received":"with each Device, for y the Command:":4")PERFORM LOADFONT(@array$)":LOADFONT(@array$)I=1WAIT:::FONTNAME$=CHR$(34)+FONT$+CHR$(34)":FONTNAME$=34)+FONT$+34)wait=2500:2703:"Once this is done the Font is loaded by:":H")PERFORM GETFONT(@FONTNAME$,@ARRAY$)":GETFONT(@FONTNAME$,@ARRAY$)wait=1500:2703:"and the new Font is used bGETFONT GETFONT DOARRAY2QLOADFONT LOADFONTDOARRAY2ARRAY2 rol the operation of the particular"\h"device. The Status call format is:"::")PERFORM STATUS(%STATNUM,@STATLIST$) NAME$":r"where STATNUM is the value of the Status Code for the operation desired,":"STATLIST$ is a string variable in which the de it will return an Error Message.",i=179:"-";:: 6730:80@ --- Status J14);!T:"76c";"- - STATUS - -":^:" The Status parameters for any device can be obtained through the use of":"the Status call. These parameters cont or to the manual received":"with each Device, for the list of Control Codes for the particular device.)"=18:i=179:"-";::""NOTE - - The Control Request is for Control of Character Devices. If a":"Control Request is sent to a Block Device, operation desired,":"CTRLIST$ is a string variable containing the Control Code Parameter List, and"a"NAME$ is a string containing the name of the Device where the Control call":"is directed.":" (Refer to the Standard Device Drivers manual,ontrol Sequence to a":"Character Device (such as a Printer) for special functions. Using the"e"following format, this can be done directly."::")PERFORM CONTROL(%CTRLNUM,@CTRLIST$) NAME$":"where CTRLNUM is the value of the Control Code for the"Select a number above for Procedure documentation. ";::" ";::a$:a$)=13 a=a$)a200,320,410,550,190=-1:150 --- Control 14)$:"76c";"- - CONTROL - -"::" Sometimes it is necessary to send a special Ccommand:"::")INVOKE REQUEST.INV":9x" Once INVOKEd, the available Procedures are:":=26:"1 Control":=26:"2 Status":=26:"3 Devinfo (Device Info)":=26:"4 Filread/Filwrite (File Read/File Write)":=26:"5 Exit" 15);X:eturned are:"::"Slot Number -","a value (from 0-4) giving the Slot number of the Device.":,"(Slot 0 means that the device does not use a slot.)"5"Unit Number -","the unit number of the Device."<"Dev Type -","a value representing the Device Type."?"Dev Subtype -","a value representing the Device Subtype."0"(Unused) -","(Reserved for later use.)"q"Blocks -","the total number of blocks on the Device.":,"(Rather meaningless for a Character Device.)">"Manuf Id -","Manufared line, and %INC is the numbering increment.":Z::" In both Procedures, every line number that references another line number,"X"i.e. GOTO 1000, has the reference changed to the corresponding new line number.":200::110 AUMbered"T"or RESEQNCEd, OUT$ is a string containg the name of the file where the output"S"is to be directed, %BEGIN and %END are the beginning and ending line numbers"D"within the original program, %START is the value of the first">"RENUMbeing read or a BAD SUBSCRIPT ERROR will be returned by the system." 730:80G=24:15);:"76c";"--- Press any key to continue. ---";:a$::n or equal to the size"7"of VALUES% or a BAD SUBSCRIPT ERROR will result.":" If the operation is FILREAD, then VALUES% will be filled with the data":"read from the file. The size of VALUES% must be large enough to hold the"S"NUMBYTES bee memory and give OUT OF MEMORY errors until a CLEAR is done."730614)::"76c";"- - FILREAD / FILWRITE - -"::" If the operation is FILWRITE, then VALUES% must contain the data to be":"written to the file. NUMBYTES must be less thae read from or written to the file, then":"ARRAY$ must be assigned ";34);"VALUE%";34);"."8:")DIM VALUES%(20): ARRAY$=";34);"VALUES%";34):"NOTE: The Array Name (VALUES%) MUST be properly Dimensioned or the system may":"claim ALL the freprocedure only, is the number of bytes actually read,"l"and ARRAY$ is a string variable containing the String representation of a":"numeric array variable. For example, if VALUES% is the name given to the"v"array that will contain the values to bRRAY$,%NUMBYTES,@COUNT%)":")PERFORM FILWRITE(%FILNUM,@ARRAY$,%NUMBYTES)":X"where FILNUM is the number assigned to the file in the OPEN statement,":"NUMBYTES is the number of Bytes to be Read from or Written to the file,"Sb"COUNT%, in the FILREAD irectly read":"from and write to a file. The designated file must have been OPENed by a"D"Basic OPEN statement before it can be accessed. Once this has been done,":"FILREAD and FILWRITE use the following formats:":lN")PERFORM FILREAD(%FILNUM,@Acturer ID (0= Unknown, 1= Apple).";"Ver Num -","version number of the Device Driver." 730:80& --- Filread / Filwrite4014)::"76c";"- - FILREAD / FILWRITE - -"::" Through the use of FILREAD and FILWRITE, it is possible to d