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?6#c(-READ.ME.FIRST01!FLASHNAME.DATG(w %SEG.T j&Ÿ/ *MENU.MAKER { }&>*SOS.DRIVER `4&Z*SOS.INTERP .4ke ! *SOS.KERNEL ,V !aSUE++,TRUCK.DRIVER  +++USER.MANUALSE+k+FILECABINET .X+*HELLO  **HELLO.TEXT$+HELLO.TEXT2 *5*5&HELLO2+,MEMO+kIII.MISC.01046Au' BASENAME  BRIAN++CUSTOMERSHF< CUSTOMERSIF+DISKNAME.DAT"#(#EXPENSES >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   !"#$%&'()*+,0 `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 ) ̠Ώ h:gpOn[n٧s]ds3issssssss0b>&dsjs|T}|s[-/0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ŭ᭭򭭪𭭠򠭠頭퀠Šӳ頠𠠀𠠠堠젭ӠΠSOS NTRPRHeLZĠР쁭堠堠ՠP򠭠έ魭*/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 ssssssssss\3!z~IssssssssssssIG%ӓ,ssևwn7}|tttUUZ{fzxxˆU膅[L<^ENFONEXINPUOUTPUDIREAWRITOPECLOSATEXABYAAAAAWINDOINVOKPERFORAAFRHPOVPOERRLIERKBEOTIMEDATEPREFIXEXFNEXFN%OUTREINDENAAAAAAAPOHOMA SUB$OFTRACNOTRACNORMAINVERSSCALERESUMALEGOTIRESTORSWAGOSURETURRESTOOALOASAVDELETRURENAMLOCUNLOCCREATEXECHAIAAACATALOAADATIMAGCADEAPRIL<^gHhHhH , - b j$% @ag5h6h6hhhhh8g5h6h 悅`6 "]La ud `L  d.CONSOLE[[ TdSdddddd0 ddddd`dd A 6 s e 9c()' 9cKHLI jLdj89弅:彬: 悅`H hɝɞɜ)`dd  6芅 e ()'` e'()HKIL 9cL>hL<^) i!Ls j @aLK$L% :: 悅 lc!)` +b` +b` sL :b#`L,H s h ऊL(,L8f` A KL jLdjOPPKLL h AKL` Ѽ   (`H shLs Aji!S)Lt`SSS`L` z :0.`9::hhgg.%g& $gegަhH逪hhʰ` ҥ [ aLT ҥIJJABB=>>;<<?@@T ě hhhHH  `89$ 0~!L`!sm?iٰcL`S )!a{)Qi ڐ߽S) -ai) -aɢ ɣɍж$HS -ahʥ0SSȩ5%"/װ&hԐɈf0ɔĐ 8,f 8f L_ʅSS=ȄL`ȱi8eiidHddhd) _ ƢLh _L>h jhP _S @a-Qggeg5hih 6i6 "]S" ]$%SSSg a aL^ S S`La8 SiUjjS):,$f 0$ p fHhH_HcH uhch_hhhfhi0hhhB B A` ֥'( )&񦕤LNKM$Lb ě $m wl "m6X6+5 56ɀ56H $mhɀ(Z)& mL k~ wlL ͝dL Nsd# wl^_ ꂅ__hg^`8 悕`gHhHhH5?6@6@*5g5666gҦhhhhhhhhg:e:;e; ;m;`@c@c?be^@e@ _m__^ \Lx] i6g55``BY BSAMHH H] LPL(\)&P ěj9ȑ9ȑ99i=:i: >i>`Ɂ7XWWXjnXWi` ]?@@bgchch )^ ]b ]b^b^L\b8g+H__^8_ABB 9::)ѭ [ I[ aυ婶ZeLLL^$%Lae LGidFddddddd.ddddddddd ɕdˏd`Ls  Apple Business BASIC v1.23 - Copyright Apple Computer, 1980-83 CTERESOURCE UNAVAILABLDIRECTORY FULDUPLICATE VOLUM ERROR Please Press SPACE BAR IN PROGRAM INTERRUPTED%&'(%+.@C$DE FG!H"I'MN#PQRTW(X潭`: 808`:dd@՚H Z#IJJCSTRING TOO 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 DISCONNECONV&CONV$CONV%LEFT$RIGHT$MID$INSTR>=<^/*-+NEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPRANGINVOKSTACK OVERFLOREDIM'D ARRADIVISION BY ZERILLEGAL DIRECTYPE MISMATNDEELSCONLISCLEAGENETABTSPCUSINTHEAMOSTEANOEXTENSIODIAFNOAAAAAAAAAAAAAASGNINTABSATYPRECAAAAAAAAAAPDLBUTTONSQRRNDLOGEXPCOSSINTANATNAAAAAAAAAAAASTR$HEX$CHR$LENVALASCTENAACONV,@dd )e dʙdH &eh(dL ddک,ddLd:e``eLeHELLO ue 5eLse6e:7ee8ee:e`EAd j @a(% -, bLs j {ghhh$PLh wlȱȱ%$LWH mh x~  m#W", mȱ28eLeji`Lwl mȱ"Ɂɂ ȱ :, iTjj ȱiVjj8逪XW0 Vf0WHW$ 0X: h `LćHƽ Ƽh`$ lȱlLL{ɝɍLɎСL s HI s shmHmHlHHɦ# shmHmHlHH , hHLt  ,, shTTLui ui,L3$0 |Lu xijk6kxyy xxy6i L[ s r$PLsi,L3-hLs L*tɘcɭ_ TTLdd`jk8L|L3L3TL3,L3i LL r$PLLBLsș Ȅ ( qƚƚ` s s),;,=,#,(,,ѼLL<^L<^ llmm$P$?TUJ)TU  ' Lsi imLqLsh E0`H ty ))ELyq  8 $0!PizEn{dUeUi hLqLs `wLr !L2 {}$ 0`QɀX zLs.+"2mXm tL qXXW zzEn{i x }H$ ]kh8 )KLe9e:: }Lgi , p s$8$0p`PL<^Յ H s r ɀ ȱX Hih0 & ?<I?iE W Lq s )L<^ȱQȱȅR dj sLHoUVV$ LhU Lp$ LL<^opL^```?EXTRA IGNORED?REENTER $0pL,`LgXW ׫ k*iXX 4X \\L<^Xii7 { n k$ |WlXVVE$ P% eT{||Hd ̐h p IkLo00$0 L>o "m nV dj$D$ P 膼Lo$0",i [ kLoHSHhp< {}$ p0H 07h ]k ,LmUVV `p F sLn 2 ukLoF вLm jȪЖ LL<^~p l nhhLgOPP` Add# 6d s S SS@Ln A " r ,; s lLn#f  ;П ⭩,SLn "mʆ,S _S% nLh "mL_T ST#L(, U VV ׫$ 0  QpU= d hkddhe##5ddˏdd?Ll ,?#$04dHHd = d hkddˡddhhd`LsL#&F  ; s b 0` L+l$ Nsd#Lzm566ȱ5Ll H# wl m#͉LchL$m QRKLLsh$0LU$^`=8WW>X> 悅XXXL:^ g`L<^ l Jj bx bp,_;Ll  ~q$0P oՅ5R66R l ~ L%l $m0 =k $m#`$L#i)8#Ll  s s( L7bʊ# L-l m hxd5d$0H h`L^bLb$%/%5$ &5 &5e$$5e%%$&%$e$% Lk ׫ sHH ~qLPkHHh$0'ph | ZlWȥmW`L$|hXWXL-hm lmmLkl VYZZ{|| w ᐥlmmYZZ LxWXX ox ExYW# kXX 4=^W^0A, 9:: Ga.ghh 悅` A` \\ɾ,L<^hhZkKhLhhhe9e:: mLg jei `Ls j:,"hhhhLgɜEɝDɞLb Hɾɺдmhɾ Qp aj pi `p j` jLi j,d wlOZL^L^-L(dPL<^OPMNKLhhLg` Ls ҥ?ieCiLa,  aFL s a iLg ]hhh5h689H: H:HLHKHH6H5HHH` ui` pi` Qp j pi `p i` j jK$L%8eȢЅ iLOPP$pX0S&ȱhȱKȱLe潥ɂ逅$L# $mKL x~ m khLgLsLc h5逢)&a TH THLgL6k8:9: STT`)ɀLK$Lb8gLOPPKLMNhhm Vf0 mLf) mWA 0 -a mL8fW;8<< 悕` 6kLU*i kXX 4XLy \\'_ch_chbi^g \ihh ] Qp aj ih `p b iq bqn %jjg56Ly { b bq | XHWHHHֺyH8iinn0 xj*% $\hxy56y6( Cx( >x\L|F )XHABB8 __^hHI8e^ @1 @+?%GHHHIJJih BABGHh`$  ě u Дs IJJ^__Lveȱeȱe XE )s LvɁ >H>H= Vt~w/z*|cYX ~uƀ1rP aziP | |iɈ { T}i8Huiiu x BU 瀩{h z` |] az 뀩]Laz | i8fe.șR0șRmymlylkykjyj00ڊIi i/ȄȪ)Re.șRI)ЪR0.ȩ+f.8f-RER/8 i:RRRRRR`y`'d |Ģ { &{f o0`LB ` H$ge &{h 80 '~L}H |h |zEn{iLxf d$h0Ly ef q80fL}COt#t$JZ mLKjk8 | ~Lm ^|-$nșRnȩ0iL f~ azea~ } \~ } &{e B{e yx %}ei0nihoi8傐IL|`7 z!L|iD8$n yiLyn)FjjjLyiɠ %}nnI*imLyjklm` s e-o+ smo..IE)2s S -+fh r$h8fL}fg s$gPf8ef B{f65m5l5k5n j5i`d,]WXX566 |m5 ^|l5k5n %j5i5` |m l)m |m`znth` |ht`i  y my`i n*` |jkjI*mlinLyFn`nEz0ʢiH xv5ui`uei0,iiL0y{n`nI0hhL,yLy |i{ xi` |={{ {LZ{ zL{ |8ii zivjwk xlym* 蕁24(y&x&w&v0⨥ymyxlxwkwvjvL{@jjj)(L{L<^~jklmL y56y^Vy dv88; 54541r |LiHi z xz U{y xy рz xh '~z zLz z~ zm zl zk zj zL{LyJ eyexew~ev~f~ffffJ`5665y5x5w5zEn{z lkj |yjJkjlkmlmi in`emeymlexlkewkjevjLkyi&m&l&k&j8iIiii9fjfkflfmf`nIngjIjgIm lkj`L<^}i0vvvvvj`L656 wh H5Gh`lmm566 Lx5Hȱ5ȱ5 F665 w56h(` x("LH)&h`( '&'`lmm566LxĠLx znInEz{iLx y? zL||uu`8i$iznIii0ĨV y${Wiuu8Iem_B_B`)&N> ȱI8gJJ hhge ghh f feLe8 hx57 xLCx8I77JJ8 88` H dhjL YYHH dYZZ oxhhe5566ɂ逅66 wZZY L YIL=m ) s  ʊHYImm shhhhYhZhZHHE` 3YZZ xLCxl5Ym6Z78ߠȘH yxy hL3 j kqHHHH s H , ,H s s ~qhh 1 lhhXhXhWWȱW7ȱW8 eLNLXZWX ` GGH HlHmHmH khmhmhlh hk8j7k8Lޒ e7788IjJkJk )lmm'&`UR{R||L̐: / cRRȹRRȥ Rл s `Lsh sh5lh6mh6mhxhyhy x x Qȱx7ȱx88 Ƃ 7e7888ł75 楽HHȱȱ6H6H5H s =к bqhhh Lshhhh` ~R/mZlmYZ PujHkki^^`H"h{||kjkȱ{ "ie{||  V{|56|6 w&5L<^i8e` ě u8A?pB@B@ )onL܇jkL| Nsdȩ8 NsdL2Lа,L<^ A s ׫ g iq s= sXHXHWHHHH ajL? b rLiq HHH s iqhhh5ȱ6ȱLI65 g5H6 2|Hgȑgʆ5a g5ȑgȥg <^^^__ɂ逅____<;إy6 hlhm^Ȋ^LL:^ȥ5^H^h ͎el5emȆ6п  ͎e^e__ iLZe *& eegggegȱgehh Ľ ,L<^  8` ^LQ ŠhhL6 $P 訽5 ͎56ۥ 8ee L:^?be^@ce@c __^_ \__^;<<6  $Phihi^Ȋ^6h656H |mHlHkHjHiHl5 8eeghh^__` HHH H bqh hhhn0iɐ1 }L yxL%}\i FHHHHH 6hhhHHlm ,҄ shh)>=>hgh<<;[a{p ;<<ccb? @c@ube.a{bb,\(eb cc`ebcA[8饰 a{8`8\e@@He? ]@@?hbbb0 ea ȑbc8L@ @@h5H ?5^6_6_hhXhXhWLk ? % ?Џ`5566` xe5566ɂ66` s p `  zLseff z.!'$ iߪ$ 0 H8eAi\h$ P8 (Lt$ 0}5}} ,kk} , kklm Lٓ[ 80@ 6 2`  dkH) ojhJJJJ ojL 0:i`L<^ jHHHHHH s jhLyqhhh6h6h555_ȱ5VHHHH %L/5H6H6Ht $mlmkljkij8ihn`L,$0DpA q enHi80 @Lyu \ % @u ćh `&m&l&k&j`2L0 և yxLT}$0pLI oբRLi `u LLi u Lui0 ܆ چ,,% п 擩lm0u 1eL5665`iɀ*iH i  @8 ei $ tutt tj ȡhn` t` 0RN0R 0R$n-RRR`i` p`5665i`$0BP?iH i hL?e8V je?e>e8U>e5V?e665e=e@ee3  =9 :9 .(~|L|LNqooGoDDDcc0ccpc]]c"QM"|@@pAATT**|RR(R)R RR VR#R 3 ~ȹR Ruu`AFR TYPE BLKS NAME MODIFIED TIME CREATED TIME EOF lR)!R)*+RR)RRR mRmR贙Ri<R) 0:iߴqr  jeqrqLб ɩ`LcRYe Ǧ lL9 dPe 3 ;ek wlk;e R lL[@Lڭ wlL luvPeNesOetUewVex`F RRqru ۲HڲH`,9,u+ R)FeEe` `LsupHoHp  б G(hi>ehi?e ueL5e qrL,op ɩ`et?ek;e`hZ L<^hZL<^L=ee>e ?e`opqrst !e5ehe?eLje LjeR=89R>:>:iR:RiRRiRL`8(RR(`EeFe  s bq Vml0L dMeL` bՍe :RRRiRȐȰRe9Re: J 2IHJh*=>> 95:6:6R L1 1Lԫ`L:^  aFL^R, ue 5eLڭR7>e?e5e?eJeKeLje֩ u>e?eՍ "] a a$% iLg֢   sLj$%`8f  a e ; ` s ɩ` YLILcopL7 z0xH ׫$0_ ;h8fH`aai shH2 h zJJJJf Ik ɩ` ̬ t os YLA ևLLק jWXX` ׫$`pd8isŠt`dyoopd8ip`J uv`&&&8孪孪宐橈`! @ uA?B@B 悅@=g>h>h ]=i>j>k a=g8i>hj>h 悅ki=5j>6k6k;el)@7Me0u(> ƬƫHH ,hohp` ɩCe0R`ȹR`ee?e@e ue 5e T L=e;e`Lso`n}pm aa`dyo ɃɄ b`" lJJJJYe s ˰L8Ls LԫN l@u=ekPe tMe )llNesOet NeOetMeCOeNeȌ=e>e;e>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< _abcdefghijklmnopqrstuvwxyґȥӑ,10 h0  `,g0L  ҅ӥĥŰ+,0p 4 Ls  Ls i )"|tȌs|st HH` MjH,: <J h̰ <rh,oL`%CYgu9 Ln90$0%,7 ҥ L$0T,8OK50P;ҥ,8 L%\   8҅¥Ӆé҅L,5,6  & @jIH,5 p  He҅Ґhe…å逅h,23Lhʩd8,h)ec efeede`,5 H  h 4  `5!    4(P 4 4  `,g0L,10kH0 ԥ f0)ĭ9)9҅xh(ĥŐL i,1HȊ©L,52,9-P" a{) b) )ab)a a,h0& &+%a0 +hcefd(c,@cfabdf`cnx  (,4h`dd,9P"<:J H) +̰ H) +ʭcP h̰BTVSPLH   5"ʘ HH` (# (=  0`)aI88  >!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>0# #0~$ <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>>>> ""*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>>xr #1:CY` 9C<m><=m@=>@?AL8 >m<>@m=@<=L8 <m>?=m@AL8 C9L8 ; ;k`;);k`,@`<,m 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) `(,  LuL-upp<`uqq=L: vuL L Lwww """"""""33333333DDDDDDDDUUUUUUUUffffffffwwwwwwww(C) 1980 Apple Computer (+@EIR[ty} NQ9Copyright (C) 1983 Apple Computer, Inc. Graphics Driver..GRAFIX b """"""""33333333DDDDDDDDUUUUUUUUffffffffwwwww     ! ( 0 7 I N S _  . G R Y f {    ! $ 4 9 F I P S V \ a h m p s x |     ' + < ? D G N U f k p x ?BEJMRUX]`h  2;AGMS[fot|              . 3 6 9 < ? B E H N S V \ _ b w  KORY\aelpu !$(+.147<?BFILORUX]`finsw| !%*/369<+;CNU\eh "*-036<BLORX_fj &+38;?DGLTot <?BGLQgjox',/25:BG̑ʈ0 Ցʭr̈A萠L: ֦ڱΑ0Б֤ h L  p,:0 JfiΥiώJe΅Хiю@ B $p̑бʑΈ0 Б̱ΑʈeمΐeمАA萿 :  `ʝ"`t  !#%')L: 8p,:Jf׮@$PA B $P@/A'ʤ˅΄ϥ̤ͅЄ B $̑бʑΈ0Ƞ h L: $)טɀIim>ٮ@8pذ `$0"8,:Jک@ׅפ؈۩MjL,:08*Ȅ B ,:J}΅н(I I $0;P̑бʑΈ,:JՐrx 0, )ߍ:) J)*PR,T,V( : `,k<,: JI`I`<,:J̰`=m@>,:J}ʅ̽(I I `<Mj,:0pJՐ̑ʈ`pJհ0`ՑʭrpȐ`=m@< B h A$g " x) (,`% (gL,}0, `gé ĩ `:) j:;jN;~j;O,:0'???>>8?>p<<AAA@@8A@q==C)CB)B C}0 x) `(`hh% ( ΍ ύ逅Ñ}`` " ( ĩ~Íĩϭ & &υΠÑΈ~ F ~ҰةeÅÐн},,P,`,g$ ( efh) `xÙ+(`xÙ&(`)4`)5`)6`)7`)8`)9`,i0!M:0p ȱq L `" (~)y ~JJ* I `x|x|,,}P-X~ F }~L } `,,i0L È`,g HH`LL! l      5  Hdcefh&+si  M0   h) `(" (  (È& 8  `)2ȱÍ3`)1`Ɂ" (cefd`Hc <Le Le ,g0L HH`! ( 9EKQWbmz`(" ((è%È`2ȭ3`1`d`c`+È`&È` & IMk`4`5`6`7`8`9`<ȭ=` & @jI`:ȭpȭqé/((((PPPP @``` @@@@`xp<@ @ :H9H` (# ( -l..PcJt`,t$ ( t`tL4`,t0L4 HH`! (`ɖ" (èÈ``,t0L4 HH`L  d!  `ɖ" ( dÈ  ``,t0L4 d0Cս30. , V  @„ȄL5p Q%Q̑`pPIE1pΦ#$01ʐ1`JJJJ)`%υߥ`1(ȦJJJ`&&*`JJ` **&*&ߥ`J` ***`` ` Jjjߊ` ߊ`JfJfFߪ߆` `JfJfJfF`ߩ`$011̰JJJ LP \LD$7߭$PH8 nߩ nh ߍϭ - k, ϥ- kϱϮEϑʩ`P z  HH` k(h`$0#$E$0p Q%Qʑ`pPIE1p$E$0(L%τ`ϩE҅0Ȅ(fL% ('Άѽн`8Hٰ hIiHمh8Iif٤Φݰ>Jj8ۅe݅eޅ $  m`!J8݅ eۅ$  m` , V $צ!ϤҐ мφi`Jf`<,&ʰ,i8i#Hiihifʦʆi) v`i,ʐi,iPIIʥ)ifʦʆ̐pLj/Fϐ&Ȅ`'@τ`Fϐ@ E҅F8ئȢΆѽϽ`/epɀjff&ݥeepɀjffݠ %)  %)`%  0.)      0  ` ` @ ``8٨JJJ ) u˘ vͽʅ̆`8Hi #i,$0F y բӅLx  mӥmԐL] h `  )`%)8`)    H   ʥ)Ģ    H Ģ L E% %) L 8`ۅ&ۥe륅eٍeڍ808٥8٥ 8مڅ H , V Εm٭mڭ))njnjnjfjfjfj+mӥmԐ8L( Ӣ й` m j`Hآ Hӭԭ h h`8٭028ٍڍ0Z$eٍeڍm٥m8٥08ٍڍ`8٥058ٍڍ0ԭ V 8fxL@ ] I)!) g 80 J8}L y L 0yʽz0 y L7  Lh `*f*&*)` ϭPh0 йPL)`)L` L``  `L` H , 8 V ТΕLϦI ] +)J* g I`LL) @L) L8``Lթ`~L8L)  =H 'HH N M))Mhh0 }LO}~~Șݻ~`}}~L< L }ީ~` ɠɀ)ӮԮmwӥmxԐ mi` HHGH`  &xix 0ޤՐڢ,P<0 )ߍL- J,P,QJ,R,SJ,T,U,W`,t0L40 ( dȅɥŐ ĐL `ʝ`))ժuvЭ H ʊJyjhz|ֆ׆ح)JfJf$PIJfש ʈ8 @ש wx LVخ ʊJJJ莟mwwJ) ܭL FܪJJJJ)`'+9;=?ACEGINR\aejns~  #&).369<ADGJMP^g $*-06=HLORWcfloruz/47=G\x{~'+.149?CGIKMOQSUWY[]_acegikmoqsuwy{}B$(I);v:520: 500THPOS=4:I/2=I/2)I=I-1I=IBOTM THPOS=44:I/2<>I/2)I=I+1I2=-1:I=I-2:IBOTM<30THPOS=44I=IBOTM/2)*2:=+IBOTM/2)-1:CA)"PRINT.ALL": OA+P 3HA=(81+UCA)A=(81+LCA):::: OA+Q Quits 3IA=(83+LCA)A=(83+UCA)"PRINT.SHOW": OA+S 2JA=(68+LCA)A=(68+UCA)/Screen.Savers/HELLON=THPOS:B$(I);XA<8A>11540bA-7640,660,690,720l:=THPOS:ٺ1600 =Q:WW=0A=:A=21A=9&oldprefix$=40A=31410: Control C "aborts" program to Basic(:A=13770: Return Selects a file *DA=27:50: Escape to change disks/FA=324000: back out one directory level 3GA=(80+UCA)A=(80+L"BASIC 0":150A$="TEXT 0":150A$="CAT 0":150A$="FONT 0":150A$="FOTO 0":150A$(L),"BLOCKS")510*=27:=19:"FREE MEMORY AVAILABLE: ";=7:=20:"80C";A$(L);$:=5:THPOS=4:I=1:IBOTM=J-1:620Q=:=26:=21:sic; +Q Quits."r12);::"80C";a$;:+w#9,"DISKNAME.DAT":#9;DISKNAME$:#9|d$=DISKNAME$$=23:=0::"80C";d$;::12)201M=3:=14:"This /// SIG Disk is \^ 19";Р,2)", Washington Apple `, Ltd."=4:B$(1)="":B$(2)=""A$=16,B) THEN 240 #1, d$="":=10:"80C";d$ ž#1300I=0"I=I+1:#1;A$(I):290,#1 6L=I-1@j=1:same=0 J:SEG=0 Tœ2030^CT<1CT=1cCT>13000Zha$="{,|,~,}; selects; to new disk; J/2)=4:=+1:ۙ=44B$(J);:J=J+1I:1,180,22:2,280,21:2,2380,23:8A$(1000),B$(1000),C%(511),C$(20),name$(20):=10:=0UCA=128:LCA=UCA+32CT=15 IF PREFIX$= PREFIX$+MID$(B$(I),z|}~VOLUME NAME (/DISKNAME) OR DEVICE NAME (.Dx)"P12);::"80C";a$;:Zb$="CHANGING DISKS"$d=23:=0::"80C";b$;::12).n=12:=20:"MAKE A NEW MENU FOR DISK: ";N$xN$)<2110=N$ :210 I=1L(A$(I),A$))200B$0 WAP /// SIG MENU.MAKER PROGRAM (v. 6.2) =".D1"210: Coldstart (320: Warmstart &*X=11000: TEXT SLOW-DOWN LOOP ,X.1 CHANGE DISK SUBROUTINE23œ202:2200<RFa$=" YOU MAY SELECT YOUR DISK BY    ) . 6 = J P S X [    $ 3 : = F d  > B H M s `e|&+.QVYcjuy~':{%(-47=FMUX\_jmz  .169DWfy   % * > A H K Z v z }      % , 1 5 : = B K R Z _ b g n s x ~ 0=+IBOTM/2-.5):I=IBOTM:I/2=I/2)I=I-1 œ2120B=B$(I),16)," ")-1 B$(I),"BASIC 0")850B$(I),"TEXT 0")890 B$(I),"CAT 0")1140*B$(I),"FONT 0")18504B$(I),"FOTO 0")1930>B$(I),"PASTXT 0")2070H540R\A$="RUNNING "+B$(I),16,B)f"79C";A$;:=0pB$(I),16,B) z::SEG=1".D1/SEG.T"t=+B$(I),16,B) yCT=CT+1~240:=24:=0:"@ ..... "DATE.TIME.LINE" ....JM=Ҡ,4,2))BTM1630,1640,1650, * * < ******************************************** ! version - 1.0 8/19/815 Converted from Apple ][ version by Dick Stein * 30000: INITIALIZE STUFF IS UP THERE(640 <:"=".D1":10: Cold Start "=".D1":20000: Warmstart 9 ******************************************** : * * ? * F I L E C A B I N E T / / / * 9 -8060 WELCOME! WAP /// SIG Public Domain Library Disk Category/Number : Miscellaneous/3MSC-01 Disk Format: Self-booting Pascal (Side Two) This disk side contains Sort Di /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// SIG, Washington Apple Pi 7910 Woodmont Ave. Suite 910 Bethesda, Md. 20814 (301) 65479C";"PRESS ANY KEY TO HALT LISTING"::202 1020#2,B$(I),16,B)ž#242:::1160Z=1#2;A$:"78A";A$Z=Z+1:Z>1842:::Z=1980*:=23:=0::"79C";"CONTINUE...?":1C$:C$<>"Y"C$<>"y"C$<>"N"C$<>"n"10 MENU.MAKER TEXT MODULESEG=0"MENU.MAKER"890&*X=11000: TEXT SLOW-DOWN LOOP ,X.1,180,22:2,280,21:2,2380,23:z:A$="LISTING "+B$(I),16,B)$=01:=0::"80C";A$;::12)>=23:=0::"a$,1)="/"5060:s=s-1 5030=a$240 MENU.MAKER 6.2 * Thanks to C.M.Davidson for his help!el; G$:::320H: Error Routine 202:U=11:"79C";"BAD PATH ERROR (NO DISK IN DISK DRIVE OR DESIRED FILE NOT FOUND.)"X=11000:X:::210Z a$="{,|,~,}; selects; back 1 lev 1600 &:WW=1:0 :SEG=1;".D1/S EG.F" SEG=1".D1/SEG.G"diskname$=3802  CATCH PASCAL TEXT FILES 202 :F*=08:"78C";"SORRY BUT MENU.MAKER CAN'T READ PASCAL TEXT FILES."04=10:"M$="NOVEMBER":1750M$="DECEMBER":1750826);"-";M$;" ";Ѡ,2));", ";"19";Р,2);" ";/П,2))=>13П,2))-12;џ,6);:1780$П,2))=0"12";џ,6);:ٟ;$П,2))=>12" PM-":" AM-" 1830WW=1530 =26:=211660,1670,1680,1690,1700,1710,1720,1730,1740^M$="JANUARY":1750hM$="FEBRUARY":1750rM$="MARCH":1750|M$="APRIL":1750M$="MAY":1750M$="JUNE":1750M$="JULY":1750M$="AUGUST":1750M$="SEPTEMBER":1750M$="OCTOBER":175020000F=VP:7);31);:P=VP-1:7);31);:d14);:M=NRnM=M/2):M=0210xK=NR-M:J=1I=JI1=R%(I):I2=R%(I+M):L170 O150"N$(I1,S))>=N$(I2,S))190180"N$(I1,S))<=N$(I2,S))190180 O175N$(Ij=0860:800 pJ=0J=1 qR$(J)=A$ xœ890 yDP$+F$,)z:NR=J:DP$+F$:410:DP$=R$(J-1):670<"Delete which : ";S$:S=S$):S<1S>J-1VP=:80:800:=9:"Ready to delete "34);R$(S);34);"."::"Once deleted, this data cannot not be \œ141000]"Name for new File Cabinet file - ";A$:VP=^863::879 _badname=0 `œ867.aa$,1)="."You_can't_use_device_numbersb870cd<>30badname=1::ۿf i#1,a$k#1l nœ890,obadname=1badname=0:80:=1NR:J" "R$(J):J::J" Create a New File":J>1J+1" Delete a File":J+2" Rename a File":J+3" Exit Program"*,4"Which ";S$:VP=:S=S$):S=J+1:9005S=J+270009S=J+314100>S<1S>J80:820HDP$=R$(S):S<>J670 R:860WWhich field will be your time field ? (press return for none) ";TFIELD$ TFIELD$)=0tfield=0:780;TFIELD=TFIELD$):TFIELD<1TFIELD>NRVP=-1:80:771 NR=17);::760( NR=NR-1:FF=2:420:1,180,24::690 !"Select from:"::JH+7*NH)):N$(B,NH),R%(B):F$="IF":œ60"SC=:350:SE=:ST=SC-SE:20000:Tav=30:=1:=29:"Press 'RETURN' when done":=4:"HEADER TITLES:"::1,680,24:II=120:"HEADER # "I": ";:"";R$(I):R$(I)=""I>20NR=I:I=20:771 I:NR=IP:"AC(21),K(89),H$(21),RN$(21),K1(21):D1$=7):H$(0)="REC":DP$="":F$="BASENAME":œ860 350:800F$="HF":FF=2:œ710)I=DP$)1-1:DP$,I,1)="/"673I:PFIX$="":680PFIX$=DP$,I)360XI=1NR:H$(I)=R$(I):I:NH=NR:NR=0:B=/(AV*Nort you want deleted ";A$:a$="")gRF=A$):RF<1RF>I-1VP=:80:610lF$=PFIX$+RN$(RF)+"RF":F$7qNN=NR-1:J=RFNR-1:RN$(J)=RN$(J+1)::9660:NR=NS:@v:"Select From"::I=1NH:I;" ";H$(I):R$(I)=H$(I)::::1,180,24::_R$(89),C$=C$+"00":C$,1)="."C$=C$,3)!0C$,1)<>"."C$="."+C$,2).:A$=A$+C$:N1=A$):A9=1A$="-"+A$:N1=N1+1?2DN=((K(3*(I+1)-1)-K(3*I-1))-N1-1))+K(3*I-1):(NN=((WIDE-K(3*I-1))-N1))+K(3*I-1): XI1=1WIDE:#1;"-";::#1:2b"Enter repR$(RH*3+2):"Total width - ";R$(RH*3+5):1,180,24:=22:=25:"Press any key to continue";:A$+::"Select From:"::MF=0"0 "H$(0) I=1NH:I" "H$(I)::MF=0:A9=0:N<0A9=1:N=N)#!A=N):C=N-N):C<>0C=C+.0017&A$=A):C$=C): Total Column":"------------------------------------------"PI=1RH*33:H$(R$(I)));:=21:R$(I+1);:=29:R$(I+2))=0A$="No":490 A$="Yes"*A$;:=38:R$(J1))=0A$="Left":510A$="Right"A$:J1=J1+1:y::"Total at - ";:FF440,4500J=1NR:I=1NH:#1;N$(R%(J),I):I:J:460J=1NR:#1;R$(J):J:460+J=1NR:#1;R$(J):J:#1;AV:#1;TFIELD#1:FF=0:JJ=1:J1=RH*3+6:"This report has the following options:":25,580,24:_"Header Tab P=:70:320 TL=0::^F$<>"IF"FF=1$h#1,DP$+F$:#1;NR:FF380,3904rJ=1NR:I=1NH:#1;N$(J,I):I:R%(J)=J:J:400|J=1NR:#1;R$(J):J:400'J=1NR:#1;R$(J):J:#1;AV,TFIELD#1:FF=0:F$<>"IF"FF=1$#1,DP$+F$:#1;NRY"L$="y"F$="IF":DP$+F$:410:20000%L$<>"N"L$<>"n"VP=:80:210 20000O," "H$(0)": ";J:I=1NH:I" "H$(I);:=20:": "N$(R%(J),I):I::L=L+NH+2:J@"Press RETURN to continue, ESC for menu";:L$:L$)=27:E=0:20000JL$)<>13V1,S)>=N$(I2,S)190180N$(I1,S)<=N$(I2,S)1904X=R%(I):R%(I)=R%(I+M):R%(I+M)=X:I=I-M:I>=1140J=J+1:J>K110130c15);:=5:"Sorting is done";D1$::"Want to SAVE the "DP$" File sorted by "H$(S)" to disk ";>"(Y/N)? ";L$:L$="recovered.":"Are you sure that you want to delete it (Y/N)? ";S$:S$="Y"S$="y"940S$="N"S$="n"800S$<>"N"S$<>"n"910B:=12:=32:"[ DELETING FILE ]"::=(80-R$(S)))/2):R$(S)DP$=R$(S):œ960)I=DP$)1-1:DP$,I,1)="/"953I:PFIX$="":958PFIX$=DP$,I)J#1,DP$+"RN":#1;REPORTS:I=1REPORTS:#1;A$:PFIX$+A$+"RF":I:#1 DP$+"RN" DP$+"HF" œ990 DP$+"IF" œ995'F$="RN":350:I=1NR:R$(I)+"RH": DP$+"RN"7:DP$="":F$="BASENAM410800I ::=19:"ERROR - Your file has not been renamed";7);12):8016FF=2:F$="HF":NZ=NR:NR=NH:DP$+F$:420:NR=NZ:200008(#T9=0:WIDE=80:RP=0::I=03*NH+5:K(I)=0::PF=0:NL=2412#I=0NH+1:AC(I)=0::HC=0:GT=0:PAGE=0:E93503<#NN=0:I=800vS<1S>NRVP=:80:7020!:"From: ";R$(S):FR$=R$(S):&"To : ";TOO$:VP=-1:too$=""800a$=too$:863badname=170:7050 œ7200FR$+"HF",TOO$+"HF":œ7170FR$+"IF",TOO$+"IF":œ7180FR$+"RN",TOO$+"RN" R$(S)=TOO$:<1L>2VP=:80:6030P:=5:"Do you want to sort:"::"1 Ascending order":"2 Descending order":"Which ";O$:o$=""6000%O=O$):O<1O>2VP=:80:6050 :100XTT=NR:PD$=DP$b:l"Rename which - ";s$:S=S$):S=0NR=TT:DP$=PD$:f them . . . . ";:320 5000pMF=1::520:5z"Enter # of field for sorting ";S$:s$=""20000&S=S$):S<1S>NHVP=:80:6010J:=5:"Do you want to sort:"::"1 Alphabetically":"2 Numerically":"Which ";L$:l$=""6000%L=L$):L0:"Which ";S$:s$=""20000&s=s$):S<1S>NHVP=:80:5010?:=5:"Please enter the "H$(S);:" you want to find - ";Q$Q$=""5000;:J=1NR:N$(R%(J),0)=J):N$(R%(J),S),Q$)<>0300L+NH>20320J'"Thats all orecords available.":80:4020q:J=SRNR:" "H$(0)": ";J:L=L+1:I=1NH:I" "H$(I);:=20:": "N$(R%(J),I):L=L+1:I::L=L+1:L+NH>20320,J:"Press RETURN for menu...";L$:20000L=0:MF=1:;=1:"You may search by any of the following:"::533002Y:=5:L=0:"Do you want to list ALL or PART (A/P)? ";S$::S$="A"S$="a"SR=1:4040s$=""20000&S$<>"P"S$<>"p"VP=:80:4000*"Starting record? ";SR$:sr$=""4000#sr=sr$):SR<1VP=:80:4020<SR>NR:D1$"Only ";NR;" Y/N)? ";:A$:A$="N"A$="n"A$=""3000( A$<>"Y"A$<>"y"VP=-1:70:3020. RN=R%(DR):J=1NR-1:J>=DRR%(J)=R%(J+1) R%(J)>RNR%(J)=R%(J)-1` J:J=RNNR-1:I=1NH:N$(J,I)=N$(J+1,I):I:J:NR=NR-1::"Record Number "DR" deleted!":: $="R"L$="r"2020/ L$<>"N"L$<>"n"L$<>""VP=:80:2050 20000 :=5Z "Which record would you like to delete - ";DR$:DR=DR$):DR<0DR>NRVP=:80:3000 dr=020000 :J=DR::300:V "Is this the record you want to delete (),i)=td$::2037,c$<>"M"c$<>"m"=hp:70:2032:ۙ=-2!": "N$(R%(J),I);:=22:"";C$C$<>""N$(R%(J),I)=C$=-1:=22:N$(R%(J),I)I1,180,24::300:I"More changes (Y/N) or R to redo this one ";L$:L$="Y"L$="y"2000L7:300::"No change, press RETURN"::1,80,24:.I=1NH:I" "H$(I);:=20:i<>tfield2035 ": ";nvp=:hp=:"Change: M)anual, A)utomatic, or RETURN for no change ";c$:=hp:=vp:31);:c$)=0:20373c$="A"c$="a"15000:n$(r%(j1,180,24:ST=ST+(AT-ML):1000L$="R"L$="r"1011&L$<>"N"L$<>"n"VP=:80:10401,180,24$ST=ST+(AT-ML) .20000:=5:œ20000U"Which record would you like to change - ";J$:J=J$):J<0J>NRVP=:80:2010j=020000_____________"1,680,24:DI=1NH:H$(I);" - ";:TFIELD=I15000:N$(NR,I)=TD$:TD$:1015"";N$(NR,I):ML=<ML<200D1$"You only have "ML" bytes of memory left":c"More (Y/N) or R to redo this one ";L$:L$="Y"L$="y"L$=""E":350:NR=1"BASENAME":310I=SNR-1:R$(I)=R$(I+1)::NR=NR-1:410:800AT=:"There are "NR" records in the "DP$" file":NR=NR+1:R%(NR)=NR::"You are entering record # "NR:"__________________________________________________________________021:RN$(I)=""::NS=NR:F$="RN":œ9120LF#350::I=1NR:RN$(I)=R$(I):::"Select from:"::I=0NR:NR=09060P#I=09060Z#I" "R$(I)Hd#::I" Create a new report format":I+1;" Delete a report format":)n#"Which ";S$:s$=""RP=1:NR=NS:9160's#s=s$):S<1S>I+1VP=:80:9070x#S=I+1610:90201#NN=S:S<>IRN$(S)=R$(S):E=1:9650:520:9624#:520:NR=NS:91605#::=5:"No report formats on disk...":::NN=1N#"Do you want to create one (Y/N)? ";A$:A$="N"A$="n"A$=""RP="@"#1;DP$+" "+RN$(NN);" Report (all records)";:9710>%#1;DP$+" "+RN$(NN)" Report for "H$(S)":"Q$;:X$="@"9710%#1;" and "H$(X)":"X$;1%PAGE=PAGE+1:SPACE=WIDE-RN$(NN))-H$(S))-18+%PF=1=WIDE-25:#1;TD$;:SPACE<1#1-%PF<>1#1;WID0%E=0:20000%%PD$=DP$:DP$="":F$=PFIX$+RN$(NN)+"RF":350:DP$=PD$:RH=(NR-5)/4:I=1NR-RH:K(I)=R$(I))::K(0)=R$(I-2)):I=NR-RH+1NR:K1(I+RH-NR)=R$(I))::NR=NS%:470::RP=1:6%NR=NN:F$="RN":I=1NR:R$(I)=RN$(I)::410:NR=NS:A%:Q$=:I=NS+1NS+RH:R$(I)=K1(I-NS))::NS=NS+RH:9655:520:9624%l$="n"l$="N"e=0:20000 %80:9620V%"_______________________________________________________________________________"%1,nh+780,24::9350(%L$<>"N"L$<>"n"VP=-1:80:962320:9680 b%JNL#1;12):9680l%L=09680v%J:T99830:#1::e9620 %9870%Y%"More reports using the "RN$(NN);:" format (Y/N)? ";L$:VP=:L$<>"y"L$<>"Y"9622%1,180,24::NS=3*RH+5:I=1NS:R$(I)=K(I))::R$(I-2)=K(0))=0:I:GT=0 $%#1,P$C%%(A$="P"A$="p")p6<>0#1;27);"E";"00"+120/p6)),2);1&%9680:J=1NR:N$(R%(J),0)=J):Q$="@"9550#0%N$(R%(J),S),Q$))<>Q$9560:%X$="@"9550#D%N$(R%(J),X),X$))<>X$9560 N%9780X%PF=1L>18:/N)? ";B$:B$="Y"B$="y"P$=".SILENTYPE":9500D%B$="N"B$="n"P$=".PRINTER"::"Pitch - ";p6$:p6=p6$):9500%vp=vx:80:9450Y%A$="P"A$="p":"How many lines per page - ";NL$:NL=NL$):NL<1VP=Vx:80:9450*!%1,180,24::I=1RH:AC(I)):I=1RH:K(3*I)=1T9=1$$TD$<>""9450 $15000L$::"Output to screen or printer (S/P)? ";A$:A$)=0VP=-1:80:9450 $vx=-13$A$="S"A$="s"P$=".CONSOLE":PF=1:nl=22:9500l$A$="P"A$="p"PF=0::"Are you using the silentype (Y70:9350)$S=A$):A$)=0Q$="@":X$="@":9400<$:"What should "H$(S)" be - ";:"";q$:q$=""70:9350;$:"What other header - ";X$:X=X$):X=0X$="@":9400 $vp=-2<$:"What should "h$(x)" be - ";:"";x$:x$=""70:9370+$WIDE=K(RH*3+5=A$):K(I+1)"9"a$<>""Y/N) ? ";a$:a$)=0a$="Y"V$a$="N"a$="n"9215'W$a$<>"Y"a$<>"y"vp=-1:80:9301/Y$1,180,24:=5:=59:K(I):=7:=59:K(I+1)%^$:1,NH+780,24::K(0)<>19340Fh$:"Which tab position for total: ";A$:A$)=0K(0)=0:T9=1:93401r$K(I+1)K(I+2)=1:K(0)=1:9280(6$A$<>"N"A$<>"n"VP=-1:80:9260i@$:"Left or right justified columns (L/R)? ";A$:A$<>"L"A$<>"l"A$<>"R"A$<>"r"VP=-1:80:9280%J$A$="L"A$="l"K1(I1)=0:I1=I1+1%T$A$="R"A$="r"K1(I1)=1:I1=I1+1+U$:"O.K. (01 $K(I)=A$):K(I)<1K(I)>NHVP=-1:80:9220M$:"Which tab position for "H$(K(I))" - ";:"";A$:K(I+1)=A$):I=19250%$K(I+1)=NH+1VP=-1:80:9190#E=0RN$(NN)="Present"#I1=1:I=1RH*33#1,NH+780,24i$:"Which header do you want in position #"(I+2)/3" - ";:"";A$:a$=""a$,1)>"9"VP=-1:80:9221:9160(#A$<>"Y"A$<>"y"VP=-1:70:9130#:520:NR=NS #E9350 #RP20000d#NH<18"______________________________________________________________________________":vp=+29#=45:=5:"Last Header - ":=45:=7:"Last Tab - "4#=1:=vpE-25);TD$;:SPACE<1#12%PF=1=WIDE-6:#1;"PAGE ";PAGE:SPACE>0#14%PF<>1#1;WIDE-6);"PAGE ";PAGE:SPACE>0#1-&600:K(0)=0K(3*(RH+1)-1)=K(3*(RH+2)-1)' &I=1RH:K1(I)=0#1;K(3*I-1));/&K1(I)=1N1=H$(K(3*I-2))):580:#1;N);< H$(K(3*I-2));::K(0)=1N1=5:590:#1;N);"Total";*:600:L=5:'4&I=1RH:K1(I)=0#1;K(3*I-1));5>&K1(I)=1N1=N$(R%(J),K(3*I-2))):580:#1;N);[C&Z=K(3*(I+1)-1)-K(3*I-1):Z<=N$(R%(J),K(3*I-2)))#1;N$(R%(J),K(3*I-2)),Z-1);$:410:DP$=NN$h3DP$+"HF",:DP$+"IF",,m3J=1::=5:"Saving data to ";DP$;" file"r3I=1NH1:I=DH13190|3R$(J)=H$(I):J=J+1F3:F$="HF":NR=NH1-1:FF=2:DP$+F$:420:F$="IF":NR=NR1:NH=NH1:DP$+F$3#1,DP$+F$:#1;NR-3J=1NR:I=1NH:I<>DHS"A$="s"NR1=NR:NH1=NH:131653A$="N"A$="n"131003VP=:80:13060 ,3:=5163"Name for new File Cabinet file - ";NN$:VP=&@3a$=nn$:863:badname=180:13110a^3FF=1:F$="BASENAME":NR1=NR:NH1=NH:DP1$=DP$:DP$="":350:NR=NR+1:R$(NR)=NN$:DP$+FNH:I;" ";H$(I)::2"Which ";A$:a$=""20000*2DH=A$):DH<1DH>NHVP=:80:130302tfield=dhtfield=02tfield>dhtfield=tfield-1G2:"Do you want to save your data of ";DP$;" file to the same file"E3"or a new file (S/N)? ";A$:A$="lag=1:12001.630:12001+.HT=HT$):HT<1HT>NHVP=:80:120017.::"From - ";H$(HT)::"To - ";H$(HT):630:flag=1 .120016/RN=NR:NR=NH:F$="HF":FF=2:DP$+F$:420:NR=RN:20000%2:=3:=32:"Delete a Header":=52.2"Delete From"::I=1.:@."Header title to change ";HT$:ht$=""flag=112050:20000S.ht$)=nh+1::"New Date & Time Field or RETURN for none - ";tfield$:12015..tfield$)=0tfield=0:flag=1:630:12001G.tfield$)>0tfield$)<=nhtfield=tfield$):630:f=nr:NZ=NR:NR=newnh:FF=2:DP$+F$:420:NR=NR1:F$="IF":A$=DP$+F$:A$9+#1,A$:#1;NR:J=1NR:I=1NH:#1;N$(R%(J),I):I+K=1AH:#1;" ":K:J:#1,31.630:flag=0 .=-1'.i;" Current Date & Time Field - ";.tfield=0"none":tfield180:11150+j=1newnh:h$(j)=r$(j):ja+FF=1:F$="BASENAME":NR1=NR:NH1=NH:DP1$=DP$:DP$="":350:NR=NR+1:R$(NR)=NN$:DP$+F$:410:DP$=NN$+j=1newnh:r$(j)=h$(j):j+DP$+"HF",:DP$+"IF",,+J=1::=5:"Saving data to ";DP$;" file"P+F$="HF":nr1nhG\+:"Do you want to save your data of ";DP$;" file to the same file"7f+"or a new file (S/N)? ";A$:A$="S"A$="s"11210p+A$="N"A$="n"11140z+VP=:80:11110 +:=51+"Name for new File Cabinet file - ";NN$:VP=&+a$=nn$:863:badname=te & Time field yet":11030/ +"The current Time & Date field is ";tfieldA+:"Enter new Date & Time field, or RETURN for same ";tfield$+tfield$)=011057<+tfield=tfield$):tfield<1tfield>ivp=-1:80:110301+newnh=nh200002+ah=newnh-100.'F$="IF":DP$+F$:410::sflag=1:ۺ8080t':DP$+F$,:10000F*:=3:=32:"Add New Headers"::=29:"Press RETURN when done":=71*I=nh+120:"Enter header #";i;:" - ";r$(i)*r$(i)=""newnh=i-1:11010*+:1+tfield=0"No Da? ";b$3&b$="Y"b$="y"VP=VPR:80:NR=NS:DP$=PD$:9870&&b$<>"N"b$<>"n"vp=:80:9925&nn=nn-1:9900?&:"Check your reference manual for this error number ":'B'=HP2:=22:"- - - Saving your data to the disk - - -";31); 'œ10K(I))::R$(I-2)=K(0)):I=NR+1NR+RH:R$(I)=K1(I-NR))::NR=NR+RH:PD$=DP$:DP$=""!&F$=PFIX$+RN$(NN)+"RF":œ9910 &F$,&410:DP$=PD$:9660:&:<>339980-&:"You already have a file by this name"2&"Do you want to change this name (Y/N):540:590:#1;N);A$ :1&"Enter the report format name ";q$:q$=""3&Q$,"/")<>0Q$=Q$,Q$,"/")+1,Q$)):9871&Q$)=080:9870)&VP=:A$=Q$:863:BADNAME=180:9870&e=1:rn$(nn)=Q$:VPR=VPw&NS=NR:NR=3*RH+5:I=1NR:R$(I)=:9800GN$(R%(J),K(3*I-2));0N=HC:540:590:#1;N);A$;:GT=GT+HC:HC=0\&L=L+1:#1: f&600:I=1RH:AC(I)=09850"p&N=AC(I):540:580:#1;N);A$;(z&:GT<>0N=GT#1;N$(R%(J),I) 3I:J:#1331P6=22:=HP2:31);:"Do you wish to save your data (Y/N)? ";A$:A$=""200006A$="N"A$="n"31'6A$<>"Y"A$<>"y"VP=:80:140006sflag=1:10000:sflag=0631z7:1,180,24::=10:=19:"To re-start without losing your data, type:":=12:=28:"GOTO 1 and press RETURN":=23:: READ TIME:CLOCK15020,15030,15040=:VP=:HP=:"Enter Date & Time - ";TD$:=VP:=HP:31);::TD$=+" "+::#2,".CLOCK":#2;TD$:#2Y:TD$=TD$,2)+"/"+TD$,3,J$:J=J$):J<1J>NRVP=POS:70:2000):300::"No change, press RETURN":I=1NH:I" "H$(I);:=20": "N$(R%(J),I);:"";C$C$<>""N$(R%(J),I)=C$I=:300::"More changes (Y/N)? ";L$:L$="Y"L$="y"2000& L$<>"N"L$<>"n"VNH:H$(I)":";:"";N$(NR,I)::ML=<ML<200D1$"You only have "ML" bytes of memory left":,"MORE (Y/N)? ";L$:L$="Y"L$="y"1000&L$<>"N"L$<>"n"VP=:80:1030 20000g:=5:"Enter the number of the record you want to change ";"HEADERFILE" œ990DP$+"INDEXFILE"<:DP$="":F$="BASENAME":350:NR=1"BASENAMEFILE":6400I=SNR-1:R$(I)=R$(I+1)::NR=NR-1:410:800:"There are "NR" records in the "DP$" file":NR=NR+1:R%(NR)=NR:"You are entering record # "NR::I=1P=:80:2050 20000_e you sure that you want to delete it (Y/N)? ";S$:S$="Y"S$="y"940S$="N"S$="n"800S$<>"N"S$<>"n"910P:=12:=26::"[ DELETING PROCESSOR FILE ]"::=(80-R$(S)))/2):R$(S):DP$=R$(S):œ970DP$+ current year=8u ( there because the Thunderclock doesn't have it)9uuYEAR$="89"uCLOCK=1: NO CLOCK?@PÈ#1,"fredif" ZÃ#1;a$_a$ dú50010=:300::"More changes (Y/N)? ";L$:L$="Y"L$="y"2000& L$<>"N"L$<>"n"V,12000,130000u INITIALIZE PARAMETERS1u22u CLOCK is the type of clock in the system!3u CLOCK = 1 no clock%4u CLOCK = 2 System Clock%5u CLOCK = 3 Thunderclock6u>7u YEAR is the two low order digits of the3201299N=8S$)<2S$="":20120:S$=S$,S$)-1):20120-N<32=17=18ŝ);:20000:ۺ20120.NS$)>17);:20120:S$=S$+ŝ):20120)N6);:S=S$):S<1S>1280:20000GNS14000,1000,2000,3000,4000,5000,6000,9000,10000,11000NCLOCK<>1VP=:HP=:20122 N:S$=""eN=HP2:"Enter your choice by number and press the RETURN key: ";31);5);S$;:VP=:HP=:20125.NCLOCK=120121:ہI=1200::20122:201213N15000:6);:=31:=12:TD$:=HP:=VP:5);:N:6);:=1";:=HP3:" 9 Save Current File"JfN=HP2:"4 Delete Records from File";:=HP3:"10 Add Headers to File"KpN=HP2:"5 List Records from File";:=HP3:"11 Change Headers in File"IzN=HP2:"6 Search for Records";:=HP3:"12 Delete Headers from File"____________________________________________________________________________";JHN:=HP2:"1 Select File/Exit Program";:=HP3:" 7 Sort Current File"CRN=HP2:"2 Add Records to File";:=HP3:" 8 Generate a Report"F\N=HP2:"3 Change Records in File9>N=HP3:"Room for "B-NR" more record";:b-nr<>1"s"; ?N:20037>@N=HP1::"Number of characters/header you have set is ";AV*BNNR<>0NH<>0VA=(ST/(NR*NH))-3:VA=0CCN=HP1::"Number of characters/header you are averaging is ";VA^EN:::"____*****************************";"*N=HP1::"Current file: ";DP$;?+NNR<>0NH<>0AV=(ST/(NR*NH))-3:VA=AV):VA<=0VA=0:AV=06,N=hp3:"Averaging ";VA;" character";:VA<>1"s";-N"/header"<4N=HP1::"Currently contains "NR" record";:NR<>1"s"; **";X#N"** F I L E C A B I N E T / / / VER. - 1.0 **";X%N"** **";X&N"***************************************************2)+"/"+YEAR$+" "+TD$,6,2)+":"+TD$,8,2)+":"+TD$,10,2):& N1,180,24::HP1=21:HP2=11:HP3=48X!N"********************************************************************************";X"N"** P=:80:2050 20000_ :=5:"Enter Record Number you want to delete ";DR$:DR=DR$):DR<1DR>NRVP=:80:3000. RN=R%(DR):J=1NR-1:J>=DRR%(J)=R%(J+1) R%(J)>RNR%(J)=R%(J)-1^ J:J=RNNR-1:I=1NH:N$(J,I)=N$(J+1,I):I:J:NR=NR-1::"Record Number "DR" deleted!":, "More (Y/N)? ";L$:L$="Y"L$="y"3000& L$<>"N"L$<>"n"VP=:80:3040 20000U:L=0:"Do you want to list ALL or PART (A/P)? ";S$::S$="A"S$="a"SR=1:4040&S$<>"P"S$<>"p"VP=:80:40001"StartSOS DRVR"?? 2 CUSTOMERS Text =HP24N"Which ";S$:VP=:S=S$):S<1S>1680:20190UNS650,1000,2000,3000,4000,5000,6000,7000,8000,9000,10000,11000,12000,13000,14000N50 AAAAAAAAAAHP2:"4 Delete";:=HP3:"11 Save Data"8pN=HP2:"5 List";:=HP3:"12 Add Headers To a File"9zN=HP2:"6 Search";:=HP3:"13 Change Header Titles"=N=HP2:"7 Sort";:=HP3:"14 De`ete Headers From a File"&N=HP2+(HP3-HP2)/2):"15 Quit": NP$:/4N=HP1::"Currently Contains: "NR" Records"+>N=HP1::"Room for "B-NR" more records"7HN:=HP2:"1 Select File";:=HP3:" 8 Rename File"3RN=HP2:"2 Add";:=HP3:" 9 Check Record Size"2\N=HP2:"3 Change";:=HP3:"10 Report Option".fN=100'6A$<>"N"A$<>"n"VP=:80:14030 620000)7::=10:=31:"HAVE A GOOD DAY!!!": N:HP1=21:HP2=11:HP3=413!N=HP1:"******* THE DATA PROCESSOR *******"3%N=HP1:"******* BY DICK STEIN 5-6-81 *******"'*N=HP1::"Current File: ";::D$="INDEX":410:œ10100 ':20000t':DP$+F$+"FILE",:10000G6"Did you want to save your data (Y/N)? ";A$:A$="N"A$="n"14100'6A$<>"Y"A$<>"y"VP=:80:140006F$="INDEX":410@6"Do you want to quit now (Y/N)? ";A$:A$="Y"A$="y"14ing record? ";SR:SR<1VP=:80:4020:SR>NRD1$"Only ";NR;" RECORDS available.":80:4020oJ=SRNR:" "H$(0)": ";J:L=L+1:I=1NH:I" "H$(I);:=20:": "N$(R%(J),I):L=L+1:I::L=L+1:L+NH>20320,J:"Press RETURN for MENU...";L$:20000'F?? SUEv+' 'FORECAST++ACTUAL++XiH 1h `)X0 8~X 1`C X`)X0`C РǠ𠠐ŠŠӠҠȠƠŮƠҢâӠUAQY @?ZY 9ZYY^TU QZoȥɭ }`` ? }``  }`X0i 8~XX0H }h襯` ©Wéĭ }0W`F X0A 00 2250.00 Totals 7000.00 7412.33 7312.79 21725.12 Monthly Expenses Item Jan Feb Mar TOTALS Rent 1250.00 1250.00 1250.00 3750.00 Payroll 5000.00 5412.33 5312.79 15725.12 Insurance 750.00 750.00 750. You did it! You are now looking at a memo that was created by a word processor. Please note: you can "see" the contents of a file by copying the file to the .CONSOLE. You may want to try and copy this memo now to your printer. x},49?HMRV\_dx}'38;HMRUZekqv{ ,-! (`í-ȑí.ȑí/ȑí0ȑí1ȑ``)M#-"ȩȩȭ*ȩ`,(0LH  HL*,0))`Í-ȱÍ.ȱÍ/x0)0)? 00XȱÍ1``(LH*00fg `;?MOQSUWY[]`fjn0'`,(0LHEąĩEŅ,/'+?8fPF 8f* 2*H UhX U'+`0`)0)0 X*4,2*,10M.-- x0 0`0֤F`,(0LH COPYRIGHT 1981 APPLE COMPUTERMICHAEL JOSEPH DHUEY NHMH` (# (B1BBl^`h[,($ ( h ))lfg % (*+,("-#.$/&1)%)?2.TRUCKER AZZFORECASTv+' 'SALES++WAv+' 'CAv+' 'SALESv+' 'CA++WA++OR++ORv+' 'FORECASTv+' 'SALES++BRIANv+' 'FORECAST++ACTUALv+' 'SALESv+' 'JANUARY++ `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ʆSTL8HSITQQSTde0f`   cCȱcD C Ea  UV 1 ELUFVG FUUCVDեYCWZDXWXCUDV[ v`b0WXYZiUcȥVcWX eeYZ ggE` @SATRDžŠƠŚ̮ÎȠ Ӡ̠Ӡ` LL#L/LL'Lgab `abBcd cdBrcadbho:ab.cݰdDcݰd8abҊ v+abcabRcdTefVghXijSdfhj 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^ JANUARYv+' 'b >_-%^%p_^^_ab"08^c_L8^c_L8^c_L8^c_ȑcc\] ab^_ ``aV R0M bba dda0h8蘠fȊf` ab 1abo)abaݰb L9c`` a N0Ioa0H ha`pLopna n`  3ɠ/8 L %iLɠ8逨J Hh $` a public domain data base program which you may find useful. The program is used with the Flip Trak Learning Systems Cassettes as well. For those of you wishing to learn more about how to operate the Apple ///, you can take out a copy of the casse5 Mariann Jackson Columbus OH 87221 3 614 253 0777 Andrew Thomas Salem OR 22342 9 503 099 3322 Aaron Franks Miami FL 79867 2 305 553 8766 Jeff Spang Grand Forks WY 87777 3 307 243 5016 Dan McCarthy Chicago IL 60222 5 312 888 1234 1 Customers 30 2 Name City State Zip Territory Phone 5.8 0 0 WELCOME! WAP /// SIG Public Domain Library Disk Category/Number: Miscellaneous/3MSC-01 Disk Format: Self-booting Basic This disk side contains File Cabinet, /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// SIG, Washington Apple Pi 12022 Parklawn Drive Rockville, MD. 20852 (301)-984-030"d=15:=0:"1 OR 2 ? ";XiX<1X>2:90$nX=1=".D1":".D1/FILECABINET"xX=2".D1/MENU.MAKER"#3,".D1/hello.text2" ž#3185 #3;ERIN$ ERIN$160#3/=23:=25:"PRESS ANY KEY TO CONTINUE.":G$ ::90 :: .... "HELLO" ...#2,".D1/hello.text" ž#265 (#2;ERIN$ 2ERIN$<40A#2/F=23:=25:"PRESS ANY KEY TO CONTINUE.":G$ P::140_Z=9:=0:"TYPE 1 TO RUN FILE CABINET DIRECTLY. TYPE 2 FOR MENU.MAKER AND THE USER MANUAL. PASCODPASTXTTEXT PASDTABINARYFONT FOTO BASIC DATA WPTEXTSYSTEMRESERVRESERVCAT RPSDATRPSIDXAFDISCASMOD AFRPT SCNLIBk;eo $'>ed?eP Q,PQ"PɀQ@PAQ`8`nɀ<)nopoLpp` ttes from the WAP office. On Side Two you'll find a Pascal-based program called Sort Directory, that will sort the files on your disk quickly and easily. Your comments and suggestions are always welcome! ` L``  `L` H , 8 V ТΕLϦI ] +)J* g I V 8fxLL) L8``Lթ`~L8L)  =H 'HH N M))Mhh0 ϭPh0 йPL)`)LL }ީ~` ɠɀ)ӮԮmwӥmxԐ mi` HHGH`  &`LL) @ 0ޤՐڢ,P<0 )ߍL- J,P,QJ,R,SJ,T,U,W`,t0L40 ( dȅɥŐ ĐL  }LO}~~Șݻ~`}}~L< vЭ H ʊJyjhz|ֆ׆ح)JfJf$PIJfש ʈ8 @ש wx LVخ ʊJJJ莟mwwxixÈ``,t0L4 HH`L  d!  `ɖ" ( dÈ  ``,t0L4 d0Cս30. , V  @„ȄL5`ʝ`))ժu/((((PPPP @``` @@@@`xp<@ @ :H9H` (# ( -l..PcJt`,t$ ( t`tL4`,t0L4 HH`! (`ɖ" (EAD PASCAL TEXT FILES."04=10:"78C";"ANY KEY RETURNS TO THE MENU."!>G$:::".D1/MENU.MAKER",320R",220(204::"79A";""; 2D=1:F=1 <#4;a$ FD=D+1 P#5;a$ZD=60#5;12)dD=60D=1nF=F+1::d$;::Y=1100:Y x13402  CATCH PASCAL TEXT FILES 202 :F*=08:"78C";"SORRY BUT MENU.MAKER CAN'T R".D1/MENU.MAKER",220 d$="" A$="PRINTING "+B$(I),16,B)=01:=0::"80C";A$;:#3,B$(I),16,B)Z=1#3;b$:"78A";b$Z=Z+1:Z=18:1290 1260 #4,B$(I),16,B)#5,".PRINTER"+ž#4#5;12):::".D1/MENU.MAKE30C$="N"C$="n"1160;:=23:=0::"79C";"PRESS ANY KEY TO HALT LISTING": $1020.202 8::Z=1B::=23:=0::"79C";"WOULD YOU LIKE A PRINTED COPY?":1C$:C$<>"Y"C$<>"y"C$<>"N"C$<>"n"1170*C$="N"C$="n"h`L)i   HH `TH..TH..TH..THATS ALL, FOLKS!R`RT RT`#RT RRRRR`0R`RR 㵩:RRL㵆  ~ RR`BLOCKS FREE: BLOCKS USED: TOTAL BLOCKS: sj]"]\AjiGa@aI[5x<^sě xCxEx5eҥV{}g}gkj̐kIk~^hT}27uejewsHH st\hh H@ ] I)!) g 80 J8}L y L 0yʽz0 y L7  Lh `*f*&*)` ` m j`Hآ Hӭԭ h h`8٭028ٍڍ0Z$eٍeڍm٥m8٥08ٍڍ`8٥058ٍڍ0ԭeٍeڍ808$(/4:?IXad#ˆ̭U)? VW @ ?ddxtB˩Eʍ@Xx ,P Eʍ(itiBX`,A0Lp HH`! (```,A0Lp HH`L%&S```lBcguwy{} vHuH` (# (jjA`,A$ (BC x) @( A`% (ALpx)`(BC `,A0Lp& (,A0Lp9 æĬSɀ֙TȌS 9S`YX`X-,    $ 3 : = F d  > B H M s `e|&+.QVYcjuy~':{(Z.AUDIO C(C) 1980 by Apple Computer Inc.D  .169DWfy   % * > A H K Z v z }      % , 1 5 : = B K R Z _ b g n s x ~    ) . 6 = J P S X [ \x{~'+.149?CGIKMOQSUWY[]_acegikmoqsuwy{}%(-47=FMUX\_jmz'+9;=?ACEGINR\aejns~  #&).369<ADGJMP^g $*-06=HLORWcfloruz/47=G`JJJJ)`%υߥ`1(ȦJJJ`&&*`JJ` **&*&ߥ`J` ***`` ` Jjjߊ` ߊ`JfJfFߪ߆` `JfJfJfF`ߩ`$011̰JJJJ) ܭL FܪJJJJ)`$PH8 nߩ nh ߍϭ - k, ϥ- kϱϮEϑʩ`P z  HH` k(h`$0#$E$0p Q%Qʑ`pPIE1p$E$0p Q%Q̑`pPIE1pΦ#$01ʐ1 ('Άѽн`8Hٰ hIiHمh8Iif٤Φݰ>Jj8ۅe݅eޅ $  m`!J8݅ eۅ$  m` , V $צ! LP \LD$7߭&ʰ,i8i#Hiihifʦʆi) v`i,ʐi,iPIIʥ)ifʦʆ̐pLj/Fϐ&Ȅ`'@τ`Fϐ@ E҅F8ئȢΆѽϽ`/(L%τ`ϩE҅0Ȅ(fL%)  %)`%  0.)      0  ` ` @ ``8٨JJJ ) u˘ vͽʅ̆`8Hi #iϤҐ мφi`Jf`<,ӅLx  mӥmԐL] h `  )`%)8`)    H   ʥ)Ģ    H Ģ L E% %) L 8`ۅ&ۥeepɀjff&ݥeepɀjffݠ %٥8٥ 8مڅ H , V Εm٭mڭ))njnjnjfjfjfj+mӥmԐ8L( Ӣ ,$0F y :=21:1400 T1400 ^:WW=1:h |: CHANGE THE FONT".D1/download.inv"C$=B$(I),16,B)array$="C%"name$=34)+C$+34)getfont(@name$,@array$)loadfont(@array$)J=1:SAME=0:215#5,".GRAFIX"".D1/BGRAF.INV"D$=50M$="NOVEMBER":1550M$="DECEMBER":1550826);"-";M$;" ";Ѡ,2));", ";"19";Р,2);" ";/П,2))=>13П,2))-12;џ,6);:1580$"П,2))=0"12";џ,6);:ٟ;$,П,2))=>12" PM-":" AM-" 61630@WW=1390J=26,1450,1460,1470,1480,1490,1500,1510,1520,1530,1540M$="JANUARY":1550M$="FEBRUARY":1550M$="MARCH":1550M$="APRIL":1550M$="MAY":1550M$="JUNE":1550M$="JULY":1550M$="AUGUST":1550M$="SEPTEMBER":1550M$="OCTOBER":15=0::"79C";"CONTINUE...?":'(<>89<>121<>78<>11013202=78=11010<9F=23:=0::"79C";"PRESS ANY KEY TO HALT LISTING":P2,280,2 Z1310dn"x ..... "DATE.TIME.LINE" ....M=Ҡ,4,2))BM1430,1440,B$(I),16,B)#5,".PRINTER" $ž#4120 .#4;a$ 8#5;a$ B1070LV:=24:=0::#X=1100: TEXT SLOW-DOWN LOOPX810 Halt Subroutine::=23:=0::"79C";"PRESS ANY KEY TO HALT LISTING.": 1300(=23::=12:=0:120=+B$(I),16,B)1408A$(1000),B$(1000),C%(511),C$(20),name$(20):=10:=0 :120>::=23:=0::"79C";"WOULD YOU LIKE A PRINTED COPY?":1C$:C$<>"Y"C$<>"y"C$<>"N"C$<>"n"1010C$="N"C$="n"120#4C$<>"n"850\C$="N"C$="n"1000;f:=23:=0::"79C";"PRESS ANY KEY TO HALT LISTING": p840z2,280,21K:=23:=0::"79C";"TO PRINT OR RETURN TO MENU, HIT THE SPACE BAR":C$:C$<>" "930:ۺ1000 :=".d1"01:=0::"80C";A$;::12)E=23:=0::"79C";"PRESS ANY KEY TO HALT LISTING"::2,280,21 840#2,B$(I),16,B) ž#2910*#2;A$:A$:12304810 >:120*H:=23:=0::"79C";"CONTINUE...?":0RC$:C$<>"Y"C$<>"y"C$<>"N"IC 0")700B$(I),"TEXT 0")740B$(I),"CAT 0")960B$(I),"FONT 0")1660B$(I),"FOTO 0")1730400A$="RUNNING "+B$(I),16,B)"79C";A$;:=0B$(I),16,B):A$="LISTING "+B$(I),16,B)$=2)I=I+1&I2=-1:I=I-2:NIBOTM<30XTHPOS=44I=IBOTM/2)*2:=+IBOTM/2)-1:0b=+IBOTM/2-.5):I=IBOTM:I/2=I/2)I=I-1lvB=B$(I),16)," ")-1B$(I),"BASA=:A=21A=9oldprefix$=A=31110A=27:=".D1":980A=13630=THPOS:B$(I);A<8A>11400A-7500,520,550,580:=THPOS:B$(I);:380: 500THPOS=4:I/2=I/2)I=I-1I=IBOTM THPOS=44:I/2<>I/,A$="TEXT 0":406A$="CAT 0":40@A$="FONT 0":40JA$="FOTO 0":40TA$(L),"BLOCKS")370*^=27:=19:"FREE MEMORY AVAILABLE: ";h=7:=20:"80C";A$(L);$r:=5:THPOS=4:I=1:IBOTM=J-1:480|Q=:=26:=21:1400 =Q:WW=0PE> sets Prefix to .D1; aborts."12);::"80C";a$;:d$=DISKNAME$$=23:=0::"80C";d$;::12)1,180,22F=3:=14:"This /// SIG Disk is \^ 1991, Washington Apple `, Ltd."=4:B$(1)="":B$(2)="""A$="BASIC 0":40B$(I),16,B)name$=34)+D$+34) GLOAD.D$16);1) GRAFIXONX=12000:X::RELEASE:#5302l ...... WAP /// SIG MENU.MAKER (VERSION 4.54)THE WAP OFFICE LIBRARY HAS A NUMBER OF APPLE /// BOOKS AND MAGAZINES.  EATE A NEW FILE from the main menu. Now, select a file name. It must follow the SOS file naming conventions; that is, the name can be no longer than 14 characters long, the first character must be letter, no spaces are allowed (use periods) and pathnam HOW TO USE FILE CABINET DESIGNING A NEW FILE In order to use your File Cabinet program, highlight the "RUN FILE CABINET" selection from the Menu.Maker menu and press . Once File Cabinet has been loaded and run, choose the option to CRThe menu basically gives you everything you need. To use, simply place the "B" side of /// SIG PD disk 1046 into .D1 and hit and . This disk is self-booting. Thank you for purchasing this disk. Your comments and suggestions are always a public domain utility program which you may find useful. The program will automatically sort files on any disk volume you choose: 5.25/3.5/Hard disk (provided the proper drivers are installed). It is easy to use. There are no "formal" instructions.  0 WELCOME! Public Domain Library Disk # 1046B Category: Utility Programs Disk Format: Self-booting Pascal This disk side contains Sort Directory, /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// SIG, Washington Apple Pi 8227 Woodmont Ave. Bethesda, Md. 20814 (301) 654-806FILE CABINET /// es may be used if you plan to place files in subdirectories. You must now decide on the type of fields to be stored for each record, and enter a "header" for each type. Up to 20 items (headers or fields) can be used for each record. Remember that tisk. NOTE: be prepared to re-enter the header titles after you have performed Options 9, 10, 11 and 12. Make sure you have an exact listing of what each header is, or should be, prior to performing the above options. CREATING AND PRINTING A REPORT or new or "S" for same. If you chose "N" then you must supply a new name, but whether you chose "N" or "S", data will automatically be saved to disk in the newly updated format. If you want to continue, you will now have to reload the file from your dn Menu. Changing headers (wording or spelling) is Option 11 and deleting headers (eliminating information) is Option 12. You may make these changes to your present file on disk or create a new file without affecting the old one. Simply enter "N" for descending order for sort. At your option, you may type "Y" to save the file in its newly sorted order. Otherwise type "N". CHANGING HEADERS IN AN ESTABLISHED FILE To add headers (new information) to a file, select Option 10 from the Maim the Main Menu. Now, enter the field (header) number to be sorted. Specify whether data is numeric (like a zip code) or alphabetic (like a last name). Note that mixed data, such as a street address, is considered alphabetic. You may choose ascending er should search for. (NOTE that fields containing partial matches like JohnSON and ThompSON would appear in response to SON.) Press at then end of your listing to return to the Main Menu. SORTING OR REARRANGING A FILE Use Option 7 frois WAP /// SIG PD DISK (see the "Quick.Note" file on this disk.) VIEWING A PARTICULAR GROUP OF RECORDS Use Option 6 from the Main Menu "SEARCH FOR RECORDS". Enter the field (header) number to be used. Now enter the name or numeric value the comput, choose "P" and type your starting record number. Press to continue or to end the listing. You can get a hard copy listing if you are using Desktop Manager or Power Keys screen dump modules, or with the .ATTACH Driver in force from threference. You can return to the Main Menu by pressing . Be sure to save your file before quitting. LISTING RECORDS ON SCREEN Press 5 from the Main Menu to select this option. To see all files, choose "A". To see only part of a fileter the number of the record to be deleted, then type "Y" to confirm your decision. Once deleted, your data will be permanently lost. Record numbers change when records are deleted, so obtain a listing of all records with their new numbers for future e quitting. DELETING RECORDS FROM A FILE To delete records from a file, move the cursor and highlight Option 4 from the Main Menu. NOTE: You must know the record number in advance. See below to list records with their record numbers. Now ensire (to skip a header, press return). You may use the left or right arrows to correct entrys before hitting . By answering "Y" you can enter more data, "N" to stop, or "R" if you want to redo the current entry. Be sure to save your file before Cabinet's Main Menu will be displayed once the set-up information has been saved to disk. ADDING RECORDS TO YOUR FILE For this operation, you will use Option 2 from the Main Menu, "ADD RECORDS TO FILE." Type the entrys for each header as you dehe number of records stored on disk basically depends on the number of headers you have. Once you are finished designing your data base, press . Press again if you want the "time field" prompt (only if your system has no clock). Fil Begin at the Main Menu and choose Option 8, GENERATE A REPORT. This option allows you to print a columnar report of selected data with the spacing and order of your choice. The report can be printed either to your Apple ///'s screen or to your printer. If printed to screen, total screen width is 80 characters. The report format may be saved to disk for reuse later. Many report formats may be designed for each file. Be sure to indicate the number of headers to be included in each report formaically, file date, etc.) (Self-Booting Pascal)  k Apple /// Learning Cassettes available for loan in the WAP Office. User.Manual: Tutorial on how to use File Cabinet On Side Two: Sort Directory is a Pascal-based utility program that will sort your disk directories by any number of choices (alphabet WAP /// SIG PUBLIC DOMAIN LIBRARY PDS NAME : File Cabinet/Sort Directory DISK ID# : 3MSC-01 BOOTABLE?: Bootable On Side One: File Cabinet is an excellent Basic Public Domain Data Base program. It may be used alone, or in conjunction with the Flip Tra welcome! iginal. Be sure to back-up your data disks as well! e protected. At the Main Menu, choose Option 9: SAVE CURRENT FILE. Press . NOTE that several other menu options also give you the opportunity to save your data. FINALLY As with all program disks, be sure to make a copy and save the orve the report format a name, if you wish to save it. If you do NOT want to save the report format, simply press . Type "N" for no more reports, if you wish to exit the report menu option. SAVING YOUR DATA Make sure your disk is NOT writia may be used, and only records meeting both criteria will be printed. Pressing selects all records.) Enter "S" for screen output, "P" for printer. If printing, enter the number of characters per inch and the number of lines per page. Gi or more for a printer.) For numeric data, enter "Y" if the column is to be totalled, "N" if not. For each column, indicate whether data should be left or right justified. Specify search criteria to select only records for the report. ( Two critert. Enter the number of each header to be used in your report ( First header will be Column 1, etc.) For each column, indicate the number of spaces to be tabbed from the left edge of the paper of the screen (Output width is 80 characters for the monitorrectory, a public domain utility program which you may find useful. The program will automatically sort files on any disk volume you choose: 5.25/3.5/Hard disk (provided the proper drivers are installed). It is easy to use. There are no "formal" instruct$(NN);" Report (all records)";:9710>%#1;DP$+" "+RN$(NN)" Report for "H$(S)":"Q$;:X$="@"9710%#1;" and "H$(X)":"X$;1%PAGE=PAGE+1:SPACE=WIDE-RN$(NN))-H$(S))-18+%PF=1=WIDE-25:#1;TD$;:SPACE<1#1-%PF<>1#1;WIDE-25);TD$;:SPACE<1%PD$=DP$:DP$="":F$=PFIX$+RN$(NN)+"RF":350:DP$=PD$:RH=(NR-5)/4:I=1NR-RH:K(I)=R$(I))::K(0)=R$(I-2)):I=NR-RH+1NR:K1(I+RH-NR)=R$(I))::NR=NS%:470::RP=1:6%NR=NN:F$="RN":I=1NR:R$(I)=RN$(I)::410:NR=NS:A%:Q$="@"#1;DP$+" "+RNI)=K1(I-NS))::NS=NS+RH:9655:520:9624%l$="n"l$="N"e=0:20000 %80:9620V%"_______________________________________________________________________________"%1,nh+780,24::9350(%L$<>"N"L$<>"n"VP=-1:80:9620%E=0:20000%L>NL#1;12):9680l%L=09680v%J:T99830:#1::e9620 %9870%Y%"More reports using the "RN$(NN);:" format (Y/N)? ";L$:VP=:L$<>"y"L$<>"Y"9622%1,180,24::NS=3*RH+5:I=1NS:R$(I)=K(I))::R$(I-2)=K(0)):I=NS+1NS+RH:R$(,P$C%%(A$="P"A$="p")p6<>0#1;27);"E";"00"+120/p6)),2);1&%9680:J=1NR:N$(R%(J),0)=J):Q$="@"9550#0%N$(R%(J),S),Q$))<>Q$9560:%X$="@"9550#D%N$(R%(J),X),X$))<>X$9560 N%9780X%PF=1L>18:320:9680 b%J""9450 $15000L$::"Output to screen or printer (S/P)? ";A$:A$)=0VP=-1:80:9450 $vx=-13$A$="S"A$="s"P$=".CONSOLE":PF=1:nl=22:9500l$A$="P"A$="p"PF=0::"Are you using the silentype (Y/N)? ";B$:B$="Y"):A$)=0Q$="@":X$="@":9400<$:"What should "H$(S)" be - ";:"";q$:q$=""70:9350;$:"What other header - ";X$:X=X$):X=0X$="@":9400 $vp=-2<$:"What should "h$(x)" be - ";:"";x$:x$=""70:9370+$WIDE=K(RH*3+5):I=1RH:K(3*I)=2)VP=-1:80:9320^|$:"What is the output width - ";A$:K(RH*3+5)=A$):K(RH*3+5)"9"a$<>""70:9350)$S=A$0a$="Y"V$a$="N"a$="n"9215'W$a$<>"Y"a$<>"y"vp=-1:80:9301/Y$1,180,24:=5:=59:K(I):=7:=59:K(I+1)%^$:1,NH+780,24::K(0)<>19340Fh$:"Which tab position for total: ";A$:A$)=0K(0)=0:T9=1:93401r$K(I+1)=A$):K(I+1)"N"A$<>"n"VP=-1:80:9260i@$:"Left or right justified columns (L/R)? ";A$:A$<>"L"A$<>"l"A$<>"R"A$<>"r"VP=-1:80:9280%J$A$="L"A$="l"K1(I1)=0:I1=I1+1%T$A$="R"A$="r"K1(I1)=1:I1=I1+1+U$:"O.K. (Y/N) ? ";a$:a$)=come! ions. The menu basically gives you everything you need. To use, simply place side two of this PD DISK into .D1 and press and . This disk is self-booting. Thank you for purchasing this disk. Your comments and suggestions are always wel#12%PF=1=WIDE-6:#1;"PAGE ";PAGE:SPACE>0#14%PF<>1#1;WIDE-6);"PAGE ";PAGE:SPACE>0#1-&600:K(0)=0K(3*(RH+1)-1)=K(3*(RH+2)-1)' &I=1RH:K1(I)=0#1;K(3*I-1));/&K1(I)=1N1=H$(K(3*I-2))):580:#1;N);< H$(K(3*I-2