LBSOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUNDINVALID KERNEL FILExةw,@  4  J  ȱ⩤i8#) ) 8LeSOS KRNLb.D1/SOS.INTERPŠ̠Š.D1/SOS.DRIVERР頞 0 ) (lH'&3&'&#e'#%e'%'&"$"$#%'#%h`$e@*SOS.DRIVER 46J!J*SOS.INTERP D4ke52! *SOS.KERNEL ,V˴!a%SEG.T j\ Ÿ/ !@C !C *HELLO.TEXTi5,D,HNDYCPR.NOTEC,!C-*MENU.MAKER p \;(PEG.LEAP I!IQUICK.NOTEORK.Xm5-\ +REQUEST.INV 54!+III.GAM.04u' )BGRAF.INV(54!L+DISKNAME.DATx5.!IFLASHNAME.DATlK\D5 +HANDICAPPER +8S54!"HELLOELLO z5/!/)HELLO.PIC|m#im#iЛ#Lȱ  6L憦  Lsmm l y` @8(Je稽 ʈ%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` @SATR ((((PPPPBTVSPLH   5"ʘ HH` (# (=  0`)aI!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:;<=>?@AB  7  3  5  >>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< SOS DRVR"CHARSET )((8*,;((*,((+)((9/(p((>3  =9 :9 .(+( 8#8# %3(8 ((,+)(%.4$)?((,(103  )* i LiHh`PQPQ>P Q,PQ"PɀQ@PAQ`8`nɀ<)nopoLpp` 0h8蘠fȊf` ab 1abo)abaݰb L9c`` a N0Ioa0H ha`pLopna n`  3ɠ/8 L %iLɠ8逨J Hh $`b >_-%^%p_^^_ab"08^c_L8^c_L8^c_L8^c_ȑcc\] ab^_ ``aV R0M bba dda `Q8STRQ ST`c\ȱc]a  b 5DU e\^e]_ ^_ ^_LH8\^]_?Je\^e]_,78\^]_ ^ݰ_ ^_LH^_ $bL@A^_aoQ*@A RQL@A `T8`RLSJTKQHIQiHiIKNJ)M8逅OPOPHMIN'a MHNILHOIPaOHPI8JHFKIGFGaHMINNMʆSTL8HSITQQST`8 iIi`9A)I@`a{ ~I)_ bJ) b) )ab)a a,h0& &+%a0 +hcefd(c,@cfabdf`cnx  (,4h`dd,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(ĥŐBGLQgjox',/25:BGKORY\aelpu !$(+.147<?BFILORUX]`finsw| > `ʝ"`t  !#%')+;CNU\eh "*-036<BLORX_fj &+38;?DGLTot <?J}΅н(I I $0;P̑бʑΈ,:JՐ̑ʈ0 Ցʭr̈A萠L> ֦ڱΑ0Б֤ l L p,:0 JfiΥiώJe΅Хiю@ F $p̑бʑΈ0 Б̱ΑʈeمΐeمАA萿հ0`ՑʭrpȐ`=m@< F l AL> 8p,:Jf׮@$PA F $P@/A'ʤ˅΄ϥ̤ͅЄ F $̑бʑΈ0Ƞ l L> $)טɀIim>ٮ@8pذ `$0"8,:Jک@ׅפ؈۩MjL,:08*Ȅ F ,:A@@8A@q==C)CB)B Crx 00 )ߍ:) J,P,QJ,R,S,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<<AA 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~`9`<ȭ=` * @jI`:ȭpȭqé,i0LÈ`,g HH`LL! l      5  Hdcefh&+si M0  h) `(" ( (È& 8 `)2ȱL1upp<`uqq=L> vuL L L <Li Li ,g0L HH`! ( 9EKQWbmz`(" ((è%È`2ȭ3`1`d`c`+È`&È` * IMk`4`5`6`7`8<L<`<p<`,ms<L=q=L> ,lXL ==L> ,lCL <=L> <,n)LL8 L8 u:L8 ;)ߍ;j`; ;j`uBL8 uCL8 u)u;) u;L8   x) `(, Lu%CYgu #1:CY` 9C<m><=m@=>@?AL8 >m<>@m=@<=L8 <m>?=m@AL8 C9L8 ; ;k`;);k`,@`<,m pHe҅Ґ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   !%*/369<?BEJMRUX]`h  2;AGMS[fot|              . 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 |  CONV&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$LENVALASCTENAACONVOERRLIERKBEOTIMEDATEPREFIXEXFNEXFN%OUTREINDENAAAAAAAPOHOMA SUB$OFTRACNOTRACNORMAINVERSSCALERESUMALEGOTIRESTORSWAGOSURETURRESTOOALOASAVDELETRURENAMLOCUNLOCCREATEXECHAIAAACATALOAADATIMAGCADEAPRIssssssssss\3!z~IssssssssssssIG%ӓ,ssևwn7}|tttUUZ{fzxxˆU膅[L<^ENFONEXINPUOUTPUDIREAWRITOPECLOSATEXABYAAAAAWINDOINVOKPERFORAAFRHPOVP̠Ώ h:gpOn[n٧s]ds3issssssss0b>&dsjs|T}|s[CEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgŭ᭭򭭪𭭠򠭠頭퀠Šӳ頠𠠀𠠠堠젭ӠΠSOS NTRPRHeLZĠР쁭堠堠ՠP򠭠έ魭 '058FV[fjsuw9Copyright (C) 1983 Apple Computer, Inc. Graphics Driver..GRAFIX b """"""""33333333DDDDDDDDUUUUUUUUffffffffw$0) `/0) `,.0L tHsH`! (xy```,.0L HH`Ln,/023x #) "# (```'+"'*CFMRZ_ ('( `,.0L& (,.0L7 Đ`ʥ逅8n134nʐ3x1eʍ1,/p/H h(eʅ8ʅİLa )`Y)D00L:1?24n21  % &Copyright (C) 1983 by Apple Computer Inc. HH` (# (KXT .")"#)  #`,.$ ()-'( / .`% (.L,/0x߼    + / @ C H K R Y j o t | ,/DIMV_x}  RUBSerial Printer Driver -- Copyright (C) 1983 by Apple Computer Inc..PRINTER A")CSTRING 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 DISCONNECTERESOURCE UNAVAILABLDIRECTORY FULDUPLICATE VOLUM ERROR Please Press SPACE BAR IN PROGRAM INTERRUPTED%&'(%+.@C$DE FG!H"I'MN#PQRTW(X潭`: 808`:dd@՚H Z#IJJ 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ֺh$PLh wlȱȱ%$LWH mh x~  m#W", mȱ28eLeji`Lwl mȱ"Ɂɂ ȱ :, iTjj ȱiVjj8逪XW0 Vf0WHW$ 0X: h ,@dd )e dʙdH &eh(dL ddک,ddLd:e``eLeHELLO ue 5eLse6e:7ee8ee:e`EAd j @a(% -, bLs j {ghhL<^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 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Ȣ 9:: Ga.ghh 悅` A` \\ɾ,L<^hhZkKhLhhhe9e:: mLg jei `Ls j:,"hhhhLgɜEɝDɞLb Hɾɺдmhɾ Qp aj pi `p j` jLi j,656 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 feLH>H= x\L|F )XHABB8 __^hHI8e^ @1 @+?%GHHHIJJih BABGHh`$  ě u Дs IJJ^__Lveȱeȱe `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,lkj |yjJkjlkmlmi in`emeymlexlkewkjevjLkyi&m&l&k&j8iIiii9fjfkflfmf`nIngjIjgIm lkj`L<^}i0vvvvvj`Ly^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 t $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 hLbe55f5f6e}Lme6u5u }`6ʈ`v`jip` ? #  ue }~ %u $ چ 0 u}` L uu  ) }Li <i@L{i$i0 p $ 1`ui` LL Lbb `}i~ei^~0] e e^`}`566i5`_cf_cfi^eub` ?^qbep`L<^ ?8b^e` rp`I` ? ㄩp^|be #^b ebbu|beiee^^iL56^f" ऩ थ (! ( ऩ थ (" ( द!LGb8Lऩ@iu +-ELj) e | ^ .' "5 1 p) iIii i)Lm` ?i $0 ׄ $0 $0 ^`Hhth`^Qb ^^ 8` `H Jh(L悈`H逨h` Hh8 Hɀjhji` HihJi(`  ~q$L ɺ b$P i pi$ȱLdjɻƟ dj 柰ީ Lihh sLg  s ! b   s "!!!+|] {n LU{HLʁIڢIڢ-(h#5ᆥ](IڢʥnH BiHɁy U{y рhɁ xhLB` vy{| g|S}dpL}Qz}c0~~D:~L̑56gh6hegehh `iɇoȘ戅 aziȅ xdo`Abi$nFn) i  j g g ^ ܇.Laz͠Lć ^ ׄ& ć ׄ ć ͠L- x |z K{ | T}{ x xnH yxn0 I B xh B Lр |  ZuL.y +|z% T}uH }h{ ~|H !z az ~hJ inIn`L~8;)q4X>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 y56}5}} ,kk} , kklm Lٓ[ 80@ 6 2`  dkH) ojhJJJJ ojL 0:i`L<^ jHHHHHH s jhLyqhhh6h6h555_ȱ5VHHHH %L/5H6H6HH ?5^6_6_hhXhXhWLk ? % ?Џ`5566` xe5566ɂ66` s p `  zLseff z.!'$ iߪ$ 0 H8eAi\h$ P8 (Lt$ 0V` 痠U` hh R LsL  z (L[ Rީ  @Y%(&:$LU s և ^|iHn %jHkHlHK s n ZlHmH5 s iH jHH楩e ) ,LsLR eՅ7V8U #   785U6VLΔU7e778ҥU^V_bcF_hcCgDhebbc \^__`U8傅UV` |UȱU` L<^ |UUƜ0ƛ ӗWqeWȱWqei W` |8UUWȥVUX`UeUUVUO / +'L U)łiV VL LI 8U 7ȱ7 UU ЯUVULU7V8 p L LZ U qUU qUH85h688V77U U 5qUWȥ6qUX7qWWȥ8qWW ٥IiV) V LVU?e8V je?e>e8U>e5V?e665e=e@eee8 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@ @@h57Ri88 pi UŦLUUU HHHHL 2hh LW iL 2hlhkhn jhimhHɗ8 Ls`LIŚ1CUDVDVU Lŧ 0 7U L`L:^֩ ŚEĚ L| Qp QeeRee8 1  /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// SIG, Washington Apple Pi 12022 Parklawn Drive Rockville, MD. 20852 (301)-984/ WAP /// SIG MENU.MAKER PROGRAM (v. 6.1) =".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 V numbers, this program will permit a screen text printout whenever a keyboard input is allowed. Use the KEYPAD NUMBERS for this command. You will see a letter at the upper right screen position indicating your selection. Except for programs which have redefined the use of the keypadgrams to our PD library. THE WAP /// SIG APPRECIATES YOUR SUPPORT. JOIN US AT A QUARTERLY MEETING! you who really know your horse racing. The program will take you by the hand and ask you a number of questions about the race, the horse, the distance and even the jockey and other issues that may have an impact on a horse race. You can print out the re HANDICAPPER PROGRAM NOTES Handicapper is a program that will help Apple /// handicappers figure out if a horse is worth betting on or not. Frankly, this program is pretty involved and is probably of use only to those of See the "Read.Me.First" file on Side Two from more information. If you're a budding programmer yourself, they may also provide some insight on how to make Business Basic work for you. We hope you enjoy this disk and encourage your submission of pro /// games we think you'll really enjoy. Long-time /// programmer Robert Boston is the author of many of them. Most include instructions when booted, or you can type to get into Basic and then the program you're interested in.hjm-0300 WELCOME! Public Domain Library Disk Category/Number: Games/3GAM-04 Disk Format: Self-booting This is another disk full of AppleOLUME 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$(oqrstuvwNOT FOUND.)"X=11000:X:::210Z a$="{,|,~,}; selects; back 1 level; G$:::320H: Error Routine 202:U=11:"79C";"BAD PATH ERROR (NO DISK IN DISK DRIVE OR DESIRED FILE ,2))=0"12";џ,6);:ٟ;$П,2))=>12" PM-":" AM-" 1830WW=1530 =26:=21 1600 &:WW=1:0 :SEG=1;".D1/S EG.F" SEG=1".D1/SEG.G"diskname$=3802  CATCH PASCAL TEXT FILES "JUNE":1750M$="JULY":1750M$="AUGUST":1750M$="SEPTEMBER":1750M$="OCTOBER":1750M$="NOVEMBER":1750M$="DECEMBER":1750826);"-";M$;" ";Ѡ,2));", ";"19";Р,2);" ";/П,2))=>13П,2))-12;џ,6);:1780$~240:=24:=0:"@ ..... "DATE.TIME.LINE" ....JM=Ҡ,4,2))BTM1630,1640,1650,1660,1670,1680,1690,1700,1710,1720,1730,1740^M$="JANUARY":1750hM$="FEBRUARY":1750rM$="MARCH":1750|M$="APRIL":1750M$="MAY":1750M$=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+1I=1:I=2I>2=-1:I=I-2:IBOTM<30THPOS=44I=IBOTM/2)*2:=+IBOTM/2)-1: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 81+LCA):::: RebootN=THPOS:B$(I);XA<8A>11540bA-7640,660,690,720l:=THPOS:B$(I);v:520: 500THPOS=4:I/2=I/2)I=I-1I=IBOTM THPOS=44:I/2<>I/2)I=I+1I13000Zha$="{,|,~,}; 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),112405l=ơ):: Routine to back up one directory level.a$=С,l-1) s=a$)a$=a$,s-1)a$,1)="/"5060:s=s-1 5030=a$240( MENU.MAKER 6.10 * Thanks to C.M.Davidson for his help!APPLE /// GAMES DISK #2 K |8`p@0?LfY3L@?|@3f?|~ax?x?sG?s@pGr~O3f&L3f@?LfM3LfM3LfI3LfI3LfY3L~`@|@x@|?xsO3f&L3f| f3?||sLO3f&L3f@s`Lg OLg~p~p~p~~`s  @#Ogpy?|@f3f3?|0p|G ?LfY3Lx|xs8A@O3f&L3f@y?s 0@@0O3f&L3f@s@LcO g|`|`|`?`|@@8c`?LfY3L@3L~g0 `0 `0 `0|a@x{}~L3LfY3LssLO|g@|2?LfY3L@?|`3B? ~ C C C C0|  @`??px?`||f3@f3?|r?|pNY KEY TO CONTINUE.":G$U-Z#2,".D1/FLASHNAME.DAT":#2;FLASH$:#2%dFLASH=110: FLASHER SUBROUTINEnSLOW=110xFLASH/2=FLASH/2):۴ =11:=07 FLASH$ SLOW FLASH:".d1/Menu.Maker"= WAP /// SIG HELLO PROGRAM. SPECIAL UPDATE 11/17/89 DGO#1,".GRAFIX"".d1/bgraf.inv"gload."HELLO.PIC" grafixon G$::RELEASE:#1:#1,".D1/hello.text" ž#145 #1;ERIN$ #ERIN$(30-#1/2=23:=25:"PRESS AJOIN OTHER WAP /// SIG MEMBERS ON THE TCS! COSTS ONLY $6.00 PER YEAR. s~ O3f&L3fx|8A@p0?LfY3Lpy?|"F1``@f?py?sL OOOg0~|0a@?LfY3L@?|Lc?O~~s!O3f&L3f@`~a Ofa|p?`sO3f&L3f@s 3O?g~p~p~p~~`|@=@`p0?LfY3L@sLcO gA0B0F0F0! @sXf3f3O|`&LLg|s?|gp?||@,@?s8x<@y|O3f&L3f`s@$H8CyO3f&L3fpy?s0`0O3f&L3f@s3fOLg|`|`|`?`~|?LfY3L@`~a O~a||?`| ?LfY3LsxsL O?g@sHO3f&L3f@?|Lc? ~A3?xC3?yG?yG?f!|8@p@ dLg ?|`y'O3|psf3x1Og|{ ?LfY3Lx|xC !?LfY3Lpy?|0`0 ?LfY3L@?|Lc?O~`00@F0~sO3f&L3f@LfM3LfM3LfI3LfI3LfY3L`x?x|?|`s@O3f&L3f|xsLp?|0?LfY3L@s|3vO gA?xC?xG?yG?f!s8@p l3XfOpLg|y?|f3<<?s9O3f&L3fxs8H O3f&L3fpy?s ```PO3f&L3f@sLcOg`?x??s?sG?|?LfY3L@3f2L3f2L3f6L3f6L3f&L3f`|x|@?LfY3Ls fsxOgs4O3f&L3f@?||Lc p? ~|0Bc0 ?LfY3L@`s@$H8C< O3f&L3fpy?|` Af3f3?|`y&O3|2CC`yp~LfM3LfM3LfI3LfI3LfY3Ls|f3<`OgxgkPffY3LfYsxf f3~@@3x|?x?x??LayGx~c @&L3f&L?xfL3LfM3LfM3LfI3LfY3LfY3x|@|@x@`xx&L3f&|x~g|3 p~@@s?xxx&L3f&|xxpLy`@@Lx@p~p~p~px~xx~Bb @pp;y@L?x~x`x~g @3 f6~s?xp~x~g `fY3LfYs?x`xx?x~ 0P&L3f&L?x~xxB`f&L3f&|xpLy@@Lx|`|`|`p`~`Ax~g1A` fY3LfYs?xy?Lx0 `0 `0axxg|fY3LfYsx~`Lsy@@L?xxxg*fY3LfYsxfx f3~@@@3x@ C C C CxC0xx~gBb  X~@s?xxx~g3 f3~@s?x|0O~x|0A?LfY3L@sa` AxCOgpx?`s@0A <O3f&L3f@?L3~xp g~0 g~v0~?|a|xs@pO3f&L3f`x?x?p`s@3O3f&L3f@stLA!O|g|C}LCqLCyyXC?|  `@@?LfY3L@sLcO gsLcLOpg|2C3xp~3f2L3f2L3f6L3f6L3f&L3f| f3?|s0Bc0 O3f&L3f@|$0A!?py?|@0A <?LfY3L@s@Og`@|@x@?~|?LfY3L@`a @a@p `|?LfY3L@?|rL?~|C|CqLCyyXC?s00@ 0O3f&L3f@?|3f? ~~`~`~`x@?~ W<&L3f&L?xxx~g 0` fY3LfYs?x~x~gf a3`( 8\~@s?x~xxx~LspAy@`L?xx~g! @fY3LfYs?xfp|x~@`a@3x??x~@ &L3f&L?xxO~y?|Las?xx`&L3f&|x@`3 py@f@Lx@p~p~p~p~~xxxgOxO ffY3LfYsx~pLy`@@Lxp@B0B0F0`@axx~( > f3yL3faAL?xppO~xxx~gLs~@@s?xx~`p|pB&L3f&L?x~?xx~ ?&L3f&L?x~x~g@xf&L3f&|?x f3`y@`g@Lx|?`|`|`p?~`x~g@fY3LfYs?xxO~y?|Las?xxg`fY3LfYsx~Ls9`y@~@L?x@~xxY&L3f&|xf~pL~x?@@3xpOxB?yB?yG?y`~fax~g  `sLc~ssfFs?x<~xxx~3 v@fy@@L?xx~gwafY3LfYs?x`xx~g p@fY3LfYs?x~x~gg@xffY3LfYs?xfpL`~@`g@3x|?000 ?x~&L3f&L?xgL3LfM3LfM3LfI3LfY3LfYsx?x`?p|`xxx&L3f&|x~gLs~@@s?xxxg&fY3LfYsx f3yx?@@LxpOxC?xC?yG?yx~fax~  3y?YL?x~xxx~g3 f@&~@@s?xx~xw0&L3f&L?xxx~ 0 &L3f&L?x~x~kH&L3f&|?xpLy@@Lx|??x33s?L?yGx~g@fY3LfYs?x3L3f2L3f2L3f6L3f&L3f&Lxxxg?>fY3LfYsx~p3 ppy@@L?xxx&L3f&|xfpL~x?@@3xpx`x~g`DAfY3LfYs?xxx~ @ C&L3f&L?x~xx~g2 f3~?L3~@s?x| s~xxgL3LfM3LfM3LfI3LfY3LfYsx~3 gy@@L?xxvvyLj L ʟ,-uukv kv@vvyL5Lj ʟA80멀uukeqqtt$uA)*t L; $uЫkЦuuj ysLq,kl$uhuuj XkkNuuj k 4%v. #  1$u tAvʘtDթ q(~th`pvquts~y fp$pp8j/;XAx=|8ez{{ ghh "o `L x  wwghhoؠKkqvj L`$uZuukvN kGv@  pJ LUL-LG -$p0`pog $mkڥrok8o,koLdjAaCcoJ mko 5 $mkk mLw L L HG56H6LExh  (`|||}z,A[ :808Ш`,ޞ@`y Gy`LHq,;' L Pu  pLLwl`|H}HzH{HHH ɶ# xhH s  ~q s,; Ls  ~q$ hxrL iLpnH ~hɀ8(*iR.-:/ RRhhh{hzh}h| Pu p 0|8cJcm J_mm嚍J_AgBhBh \^A_B_B` ^"( zM jF566 x}z{6{LҜ #z{{"} GLsL<^ jHHH i dj ٥z{{ j}hhh ;в| |膆  RRRRH uhA?B@7B@87F8f7877878L:^7 8*JA5gB6B68 悅h圍h?H@H@HI?J@J@ "]h@h@h?gAhBhBJJ8 悅J圍J7ߚ8BܚLs`䚌B L:^`Ib^J sL͙ɚʚ `pAƚЙϚŚњ˚ ̚8 悅DDF͚ Κ8 DiFEC CD)ӚDmӚDԚCBКLěŚAݚ⚠IȌ 8 ꂍ  8 ꂅJJ` !~g  `fY3LfYs?x~x|x~BF ? $yL?xx~1`@f&L3f&L?xf~3x~p~r0~v0|ax~&L3f&L?x~?x?xx?p|`xxs&L3f&|x<`pLy@@Lx@|C|C}LCyLCxC?yxxxgR@0fY3LfYsx~pLy@@Lx|`@xx~ MsLcy@L?x| <~xx3L3f2L3f2L3f6L3f&L3f&|x~g`3 fpd~@@s?xx~`&L3f&L?xxxx~gb"fs?x~x~gs~ @@ffY3LfYs?x?y@`Lx?|@|@x@`?x~g@fY3LfYs?xx@y? a xxgfY3LfYsxf<`|pE.@p~@@3x@|C|C|CyLC~@?yxxxb0pf&L3f&|xf~ f3~@@@3xp|?~`~`~`~`?x@x`u vphh` Ljk ,hh`Sj9-k L9j ekekk|z)ekk |j[ ٢  L`j 9kkj"j"kеAX"+-&$.ECR/#Z*! DBA0 k$JJJJ) ݙRթR`yiɀjjn*8miɝ d L .q$uL$)JJ8偅8傪 u Tf$i0Ł!y0GLqL~䁰< 0$H ,GhGթ $u$n 0GЫ-Gv)' $G uJ-$n0+G $G0)R?eR>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;eehi?e ueL5e qrL,op ɩ`et?ek;e`hZ L<^hZL<^L=ee>e ?e`opqrst !;: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 `L5GA3/1.01:7SY CONTROL 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 PASCODPASTXTTEXT PASDTABINARYFONT FOTO BASIC DATA WPTEXTSYSTEMRESERVRESERVCAT RPSDATRPSIDXAFDISCASMOD AFRPT SCNLIBk;eo $'>ed?e<: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/LINr GRAFIXMO 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  GETPARMSF HH`)r` @A>~|zxvtslgbWTSRPMED=hhhh   HH`420.-&#  Phhhh   HH`420.-&#  P  `"hhhhhh  HH`420.,*)&#"! Rhhhhhh  B B HH`yyP`GBRETADDR 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 詏 鮀 `}wqnkjba_\[ZYXWVURQ$hhhhhh HH H)HHH`20+*)Hhhhhhh HHHH`&$< 詏 )x `a^]NMJGF>=<10/.+* )) y xHHHJJiH 詏 鮀hhhh  HH`420.,*)&#"! Rhhhhhh    HH`DB@><:983.+('&$h J)` `!0 nljhfdcbQNMLJFEDCBA<;6hhhhhh  HH`420.,*)&#"! Rhhhhhh    HH`DB@><:983.+('&$hhhRETADDR INITCHK ITCHK RANGECHKNGECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  INITCHK ITCHK FILLPORT FILLPORT WBUFLEN !UFLEN SOSWRITE$SWRITERWBUF BUF RETADDR ieB>INITCHK UITCHK MOVETO MOVETO  WBUFLEN _UFLEN SOSWRITEbSWRITE="/handicapper",Printer$=".Printer"r"Request.Inv"|:Ctrlnum=174ascii=95: --- Load 1st character into ASCII #958Ctrlist$=1)+ascii): --- One character at a time: I=18Bit$: --- Get next Bit@Ctrlist$=Ctrlist$+YLOC  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  RETADDR % ! INITCHK  ITCHK LINETO LINETO WBUFLEN  UFLEN SOSWRITE SWRITERWBUF     CALCABS x q ABS RETADDR CALCABS  ABS RETADDR  SOSDSTAT SDSTATGSCB INITCHK  ITCHK DOTREL DOTREL WBUFLEN  UFLEN SOSWRITE SWRITERWBUF 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 SOSWRITE"00"+Bit$)): --- Add next bit to listI:?Control(%Ctrlnum,@Ctrlist$)".Console": --- Activate char.4ascii=95ascii=2:410: --- Get 2nd character: 00,00,00,7F,00,00,00,00 7F,7F,7F,7F,7F,7F,7F,7F:"Bgraf.Inv"&:n>47):=21:2050 *:?4Selection=1X=14:Ar(X,10)=Ar(X,10)+((N.horses/2)-X):X0>Selection=2X=58:Ar(X,10)=Ar(X,10)+2:XQHSelection=3N.horses>=9X=9N.horses:Ar(X,10)=Ar(X,10)+(N.horses*.25):X*RSelection<0Selection>32ack Bias ***"l v 35x,11a=51910;"0 - None"1910;"1 - Inside"1910;"2 - Middle"1910;"3 - Outside" œ2150: VPS=20  5X,22a$2030;"Enter your selection: "=6 Selection"Selectio=20:29)#=20:" Is this correct (y/n)" Option$EOption$="N"Option$="n"750:ۻOption$<>"Y"Option$<>"y"1810 182007):=18:1780:& --- Compute track bias0::Switch.4<>12200D:NX!b"80c";"*** TrSwitch.2Switch.3Switch.4Switch.51690:1760::"80c";"Using:"  79c(Switch.2=11700;"Class ratings")Switch.3=11700;"Track variants"*Switch.4=11700;"Subjective data"(Switch.5=11700;"Workout times":.num",:6=6@ 17x ,25a, 15".",##0J1600;"Number of horses in race ",N.horsesT 17x,30a,10".",1x,7a3^1620;"The distance for this race is ",Dist.$h 17x,31a,09".",1x,##4r1640;"Track record for this distance ",Tr.rec|:7=20" Use workout times:" " ? " Option$LOption$="Y"Option$="y"Switch.5=1:ۻOption$<>"N"Option$<>"n"1480 152007):=21:1450: --- Verify data:=20:29): =3:=34"Race number ";RaceOption$<>"n"1300 131007):=21:1270=20:29)(:2=20<" Use subjective data:" F" ? " POption$LZOption$="Y"Option$="y"Switch.4=1:ۻOption$<>"N"Option$<>"n"1390 d1400n07):=21:1360x=20:29):" ? " Option$LOption$="Y"Option$="y"Switch.2=1:ۻOption$<>"N"Option$<>"n"1220 123007):=21:1190=20:29):!=20:" Use track variants:" " ? " Option$LOption$="Y"Option$="y"Switch.3=1:ۻOption$<>"N"8" ? ";Tr.rec-BTr.rec<15Tr.rec>40007):=21:1080LVRS=00`Tr.rec>99RS=RS+60:Tr.rec=Tr.rec-100:1110jRS=RS+Tr.rec:tSwitch.1=0:Switch.2=0:Switch.3=0:Switch.4=0:Switch.5=0~=20:29): =20:" Use class ratings:" 29):=20œ07):=21::1000," What is the distance for this race:"" ? ";Dist.$:73810:Distance=Dist.:Distance=007):=21:1000=20:29):=20 $œ10904." What is the track record for this distance:"=20:" Which race do you want to handicap:"\" ? ";Race.numf:.p=20:29): --- Clear to end of viewportz:=20 œ940*" How many horses are in this race:"" ? ";N.horses.N.horses<5N.horses>2007):=21:930=20:=20  40"_" 690;wait=12000: ::: --- Get race information:&Ar(20,11),WC(20),Win(20),Odd$(20) :3 =1:"80c";"*** Thoroughbred Handicapper ***" * 80"_"4=19:810;>:Hœ07):8501R0 --- Put title on screen::8D:16);"D": --- Set screen to 40x24 Black & WhiteN=9(X"40c";"Thoroughbred Handicapper"b=13l"40c";"BY"v=16"40c";"Randy Manchester" 20a, 20r$660;"Version 1.0","25-Apr-84"150:ۺ2160\:f7):=21:2050pz: --- Main control routine:Cr.horse=1N.horses(TT=0:RC=0:TP=0:RR=0:CT=0:WO=0:BT=9994490:2380Switch.5=15050Switch.2=14250Switch.4=15390 Cr.horse:6300:5950:7060: :16);"D": --- 40x24 B/W : =12 "39c";"Next Race"*$ x=120:Y=111:Ar(X,Y)=0:Y:x:720. :#8 --- Get past-performance dataB :L Cr.race=110V :` 38a,##,27x,7a,##,4rVj 2400;"*** Past Performance f"Dist.$,Dist.$),1)="F".Dist.$,1)="y"Dist.$,Dist.$),1)="Y"( Dist.$,2,1)="m"Dist.$,2,1)="M": --- Convert distance(:d2Dist.$,1)="F"Dist.$=Dist.$,Dist.$)-1):Dist.=Dist.$):Dist.<2Dist.>7.9Dist.=0::ۿ*<g)/5):AT=UT+(RS-Tr.rec).Distance<>RDAT=((AT/RD)*Distance):4140TT=TT+AT:RC=RC+1AT99TS=TS+60:Fin.time=Fin.time-100:3720::TS=TS+Fin.timeaUT=TS+(Length.behind/5):Distance<>RDAT=UT:Tr.rec=UT-((100-Sp.ratin;"Required race information is missing for horse number ",Cr.horse,"."P" Select option number 2 on next page to re-enter data for this horse."$=20)."79c";"Press any key to continue."8a$B:LCr.horse=Cr.horse-1:TVAr(Cr.horse,2)0Ar(Cr.horse,1)=TT/(RC+WO):Ar(Cr.horse,1)=Ar(Cr.horse,1)-((Ar(Cr.horse,1)-BT)*.25):Ar(Cr.horse,2)=TP/RC:Ar(Cr.horse,9)=R : 07) ( "79c";"*** Error Has Occured ***"  =5 5x,54a,##,1aQ3590.race=11:3470:ۻOption$="2"3440$\ Option$="1"3470:07):3380f :p Cr.race=Cr.race-1:RC=RC-1Bz RR=RR-(Sp.rating+Tr.var):CT=CT-Cr.class:TP=TP-Fin.pos:TT=TT-AT3 Option$<>"1"Option$<>"2"Option$<>"3"3380 Cr.race : --- Check f90;"1. Enter another past performance for horse # ",Cr.horse 20x,40a4 3320;"2. Re-enter previous race information"  3320;"3. Next horse" : * œ33804 =20*> "79c";"Enter Selection: ";:Option$H 7R Option$="3"Cr5X 3140;"Race Distance ............. ",Horse.dis$b =12l 20x,28a,###3v 3180;"Winner's Finish Time ...... ",Win.time 07) =20) "79c";"Press any key to continue." a$  : --- Menu : =4 20x,47a,##F 32& UT/RD<10UT/RD>13.53060:ۺ3240 :  . "79c";"*** Input Error Has Occured ***"  =5 & 5x,68aQ0 3110;"A possible input error has occured. Please check the following data": " for verification."D 20x,28a,8aN =102940;"Speed rating "; " ";Sp.rating G Sp.rating<20Sp.rating>120RR=RR-(Sp.rating+Tr.var):07):2800F Switch.3=1(Tr.var<0Tr.var>75)RR=RR-(ST+Tr.var):07):2800 : --- Check for error : TS=0:Win.time=Fin.time:3720 Switch.3=12830:2920 : œ07):2840 =22" 20x,31a,4".";, Switch.3=12850;"Speed Rating and Track Variant ";6 " ";Sp.rating,Tr.var@ J : T RR=RR+Sp.rating+Tr.var:2980^ :h œ07):2930r =22| 20x,13a,22"." s>2507):2610 TP=TP+Fin.pos : Length.behind=-1 œ07):2730 =20 20x,23a,12"."& 2740;"Length's Behind Winner "; " ";Length.behind 4 Length.behind<0Length.behind>5007):2730 : Sp.rating=-1:Tr.var=-1x,21a,14"."$ 2560;"Winner's Finish Time "; " ";Fin.time- Fin.time<=15Fin.time>40007):2520( :2 Fin.pos=-1< œ07):2630F =18P 20x,24a,11"."'Z 2640;"Horses' Finish Position ";d " ";Fin.posn (x Fin.pos<0Fin.poor Horse Number ",Cr.horse,"Race # ",Cr.race," ***"t ~ : 9190 : œ07):2470 =14 20x,14a,21"." 2480;"Race Distance "; " ";Dist.$& 3810:RD=Dist.:RD=007):2470 Fin.time=-1 : œ07):2550 =16 20Dist.$,1)<>"M"Dist.$,1)<>"Y"FDist.$="1M"Dist.=8 PDist.$="1 1/16M"Dist.=8.5ZDist.$="1 1/8M"Dist.=9 dDist.$="1 3/16M"Dist.=9.5nDist.$="1 1/4M"Dist.=10!xDist.$="1 5/16M"Dist.=10.5Dist.$="1 3/8M"Dist.=11!Dist.$="1 7/16M"Dist.=11.5Dist.$="1 1/2M"Dist.=12!Dist.$="1 9/16M"Dist.=12.5Dist.$="1 5/8M"Dist.=13"Dist.$="1 11/16M"Dist.=13.5Dist.$="1 3/4M"Dist.=14"Dist.$="1 13/16M"Dist.=14.5Dist.$="1 7/8M"Dist.=15"Dist.$=Ar(Cr.horse,10)=Ar(Cr.horse,10)+(N.horses*.2):Option$="" =8:=5-"Is the Trainer in the top 5 ratings ?"; Option$" ";Option$#Option$="y"Option$="Y"5630-Option$<>"n"Option$<>"N"07):5560 56501Ar(Cr.horse,100;"*** Subjective Data for Horse Number ",Cr.horse," ***"6@:JOption$="" T=6:=5,^"Is the Jockey in the top 5 ratings ?"; hOption$r" ";Option$#|Option$="y"Option$="Y"5530-Option$<>"n"Option$<>"N"07):5460 55501Dist.D=04490WS=0>H.time>99WS=WS+60:H.time=H.time-100:5320:WS=WS+H.time=Distance<>DWS=((WS/D)*Distance):RD=D:AT=WS:4140:WS=ATTT=TT+WS:WO=WO+1: --- Get Subjective Data: 18x,37a,##,4a,18x"C,54tion$<>"Y"5090:H.time=0:Dist.$="" (=7:=5!2"What was the horses time ";<œ07):5190 FH.timeP(ZH.time<15H.time>40007):4490d: n:=5x"What was the distance ";œ07):5260 Dist.$ 3810 D=r.horse,7)>16007):4940: --- Get Workouts: =3:=5D"Do you want to enter a recent workout time for horse number ";Cr.horse;" ?"œ07):5100 Option$ Option$="n"Option$="N"% Option$<>"y"Op(N.horses*.15)W8Ar(Cr.horse,5)>=50Num.of.races<3Ar(Cr.horse,10)=Ar(Cr.horse,10)-(N.horses*.15)B:Lœ07):4950V=13` 15x,33a,10"."0j4960;"How much weight is to be carried ";t" ";Ar(Cr.horse,7)~8Ar(Cr.horse,7)<80Ar(Cs/Num.of.races:Ar(Cr.horse,5)=((Ar(Cr.horse,3)+Ar(Cr.horse,4))/Num.of.races)*100g$Ar(Cr.horse,5)>55Num.of.races>5Ar(Cr.horse,3)=0Ar(Cr.horse,10)=Ar(Cr.horse,10)-(N.horses*.4)W.Ar(Cr.horse,5)>=60Num.of.races<6Ar(Cr.horse,10)=Ar(Cr.horse,10)-50Ar(Cr.horse,4)>Num.of.races07):4730:œ07):4820=11 15x,28a,15"."+4830;"Total earnings for the year ";" ";Earnings/Earnings<0Earnings>200000007):4810:{Num.of.races>0Ar(Cr.horse,6)=Earning" ";Ar(Cr.horse,3)\@fAr(Cr.horse,3)<0Ar(Cr.horse,3)>Num.of.races07):4650p:zœ07):4740=9 15x,37a,6"."44750;"Number of times 2nd or 3rd this year ";" ";Ar(Cr.horse,4)SAr(Cr.horse,4)<0Ar(Cr.horse,4)>=5 15x,32a,11"."04590;"Number of times raced this year ",;" ";Num.of.races 2Num.of.races<0Num.of.races>6007):4570 :*œ07):46604=7> 15x,39a,4"."6H4670;"Number of times finished 1st this year ";RCr.horse,10)-(Cr.class+1)>XCr.class<0Ar(Cr.horse,10)=Ar(Cr.horse,10)+Cr.class-1)bl:v --- Get first data items:=28)"*** Horse Number ";Cr.horse;" ***";:=0Earnings=0:Num.of.races=0œ07):4580ble above, select the horse's class rating as compared to "$"the other horses in the race.":œ07):4380 =22:=32&"Enter Selection:";0" ";Cr.class:*DCr.class<-3Cr.class>307):4370=NCr.class>0Ar(Cr.horse,10)=Ar(x3>0x1=x1+((x2*x3)+(x3/2)) T4200 ^x1=1.1*x3 hAT=AT+x1r|: --- Get class: 8960=1 20x,34a,##,4a,19x@4290;"*** Class Rating for Horse Number ",Cr.horse," ***"=15Cr.class=0M"Using the ta"1 15/16M"Dist.=15.5Dist.$="2M"Dist.=16"Dist.$="1M 40Y"Dist.=8.1818"Dist.$="1M 70Y"Dist.=8.3182:  --- Error checking routine":,x1=0:x2=1.3:x3=Distance-RD6x3<04190-@x3>=1x1=x1+x2:x2=x2*1.35:x3=x3-1:4160!J0)=Ar(Cr.horse,10)+(N.horses*.3):Option$="" =10:=55&"Is the horse showing consistent improvement ?"; 0Option$:" ";Option$#DOption$="y"Option$="Y"5730-NOption$<>"n"Option$<>"N"07):5660 X57501bAr(Cr.horse,10)=Ar(Cr.horse,10)+(N.horses*.2)l:vOption$="" =12:=5;"Does the horse close consistently in stretch runs ?"; Option$" ";Option$#Option$="y"Option$="Y"5820-Option$<>"n"Option$<>"N"07):57601Ar(Cr.horse,10)=Ar(Cr.horse,,TI=TI+Ar(X,1):Ar(X,1)=TI6X@:J --- Convert OddsT:^X=1N.horses h".";.rN.horses>9Odd=Ar(X,11)*.9:Odd=Ar(X,11)|N.horses>14Odd=Odd*.9Odd<=3.5Odd$(X)="3-2"%Odd>3.5Odd<=4.5Odd$(X)="2-1"%Odd>4.5Odd<=5.5O6620H1=WC(X):H2=Win(X)!WC(X)=WC(X+1):Win(X)=Win(X+1)WC(X+1)=H1:Win(X+1)=H2SS=1X:SS=165505R1=Win(1):R2=Win(2):R3=Win(3):R4=Win(4):R5=Win(5):X=1N.horsesTI=03"Ar(X,1)>60TI=TI+100:Ar(X,1)=Ar(X,1)-60:6690Y(X2:<X=1N.horsesFAr(X,10)<=0Ar(X,10)=1PXZ:dTP=0$nX=1N.horses:TP=TP+Ar(X,10):X*xX=1N.horses:Ar(X,11)=TP/Ar(X,10):X-X=1N.horses:WC(X)=Ar(X,11):Win(X)=X:X:SS=0X=1N.horses-1WC(X)<=WC(X+1)>1Ar(X,10)=Ar(X,10)+2.18(Ar(X,9)>=Ar(Y,9))Switch.3=1Ar(X,10)=Ar(X,10)+1+Ar(X,2)<=Ar(Y,2)Ar(X,10)=Ar(X,10)+.6+Ar(X,5)>=Ar(Y,5)Ar(X,10)=Ar(X,10)+.6+ Ar(X,6)>=Ar(Y,6)Ar(X,10)=Ar(X,10)+.6,Ar(X,7)>Ar(Y,7)+3Ar(X,10)=Ar(X,10)-.3:tC$(4)="-- None --":~:2 --- Determine speed rating and track variant: =20:=5"Working ";X=1N.horsesY=1N.horses ".";:(Ar(X,1)<=Ar(Y,1))Switch.3=1Ar(X,10)=Ar(X,10)+1.1;(Ar(X,1)<=Ar(Y,1))Switch.3<" -"+}VAr(R1,11)Ar(R2,10)+(N.horses*.4)Ar(R2,10)>Ar(R3,10)+(N.horses*.3)Ar(R3,10)>Ar(R4,10)+(N.hory`Ar(R1,11)Ar(R2,10)+(N.horses*.6)Ar(R2,10)<=Ar(R3,10)+(N.horses*.3)C$(4)=R1)+" -"+STR$jox Number "+R1)+" -"+R2)+"vBAr(R1,11)+Ar(R2,11)Ar(R3,10)+(N.horses*.75)C$(4)=R1)+" -"+R2)+" "+R2)+" -"+STRsLAr(R1,11)+Ar(R2,11)Ar(R3,10)+(N.horses*.5)C$(4)=R1)+" -"+R2)+" "+R2)+R3)+Bet.6$: --- Assign exactas$:s.Ar(R1,11)Ar(R2,10)+(N.horses*.9)C$(4)=R1)+" -"+R2)+" "+R1)+" -"+R3)+" "+STy8Ar(R1,11)+Ar(R2,11)+Ar(R3,11)Ar(R4,10)+(N.horses*.75)C$(4)="B)+(N.horses*.25)Ar(R2,10)>=Ar(R3,10)+(N.horses*.5)C$(2)=Bet.9$+R2)+Bet.4$:`Ar(R2,10)>Ar(R3,10)+(N.horses*.4)C$(2)=Bet.9$+R2)+Bet.5$::C$(2)=Bet.9$+R2)+Bet.6$:ZAr(R3,10)>Ar(R4,10)+(N.horses*.3)Ar(R3,11)<=N.horses*.71C$(3)=Bet.9$+(R2,10)+(N.horses*.25)C$(1)=Bet.9$+R1)+Bet.3$[Ar(R1,11)<=N.horses*.7Ar(R1,10)>Ar(R2,10)+(N.horses*.2)C$(1)=Bet.9$+R1)+Bet.4$:]Ar(R1,10)>Ar(R2,10)+(N.horses*.4)C$=Bet.9$+R1)+Bet.2$::C$(1)=Bet.9$+R1)+Bet.4$:hAr(R1,10)>Ar(R2,10.8$+R1)+Bet.2$:hAr(R1,11)<=N.horses*.63Ar(R1,10)>Ar(R2,10)+(N.horses*.5)Ar(R1,3)>0C$(1)=Bet.9$+R1)+Bet.1$:\Ar(R1,11)<=N.horses*.66Ar(R1,10)>Ar(R2,10)+(N.horses*.4)C$(1)=Bet.9$+R1)+Bet.1$:[Ar(R1,11)<=N.horses*.68Ar(R1,10)>Ar "p6050:6120:6140:6190z: --- Calculate bets:gAr(R1,11)<=N.horses*.6Ar(R1,10)>Ar(R2,10)+(N.horses*.9)Ar(R1,3)>1C$(1)=Bet.7$+R1)+Bet.3$:gAr(R1,11)<=N.horses*.6Ar(R1,10)>Ar(R2,10)+(N.horses*.7)Ar(R1,3)>0C$(1)=Bet(N.horses*.3)*4:> --- Assign betsH:wRBet.1$=" Win Place & Show":Bet.2$=" Win & Place":Bet.3$=" Win":Bet.4$="Place & Show":Bet.5$=" Place":Bet.6$=" Show"\X=14:C$(X)="":XCfBet.7$="$10.00 On # ":Bet.8$="$5.00 On # ":Bet.9$="$2.00 On #10)+(N.horses*.3)Option$="": =14:=57"Has the horse been idle for more than 30 days ?"; Option$" ";Option$#Option$="y"Option$="Y"5920- Option$<>"n"Option$<>"N"07):5850 59301 Ar(Cr.horse,10)=Ar(Cr.horse,10)+dd$(X)="5-2"%Odd>5.5Odd<=6.5Odd$(X)="3-1"%Odd>6.5Odd<=7.5Odd$(X)="7-2"%Odd>7.5Odd<=8.5Odd$(X)="4-1"%Odd>8.5Odd<=9.5Odd$(X)="9-2"&Odd>9.5Odd<=11.5Odd$(X)="5-1"'Odd>11.5Odd<=13.5Odd$(X)="6-1"'Odd>13.5Odd<=15.5Odd$(X)="7-1"'Odd>15.5Odd<=17.5Odd$(X)="8-1"'Odd>17.5Odd<=19.5Odd$(X)="9-1"(Odd>19.5Odd<=21.5Odd$(X)="10-1"(Odd>21.5Odd<=23.5Odd$(X)="11-1"(Odd>23.5Odd<=25.5Odd$(X)="12-1"(Odd>25.5Odd<=27.5Odd$(X)="13-x,##.#,4x,###.#,4x,6a!:!x=1N.horsesQ!#28610;X,Ar(X,1),Ar(X,2),Ar(X,5),Ar(X,6),Ar(X,9),Ar(X,11),Ar(X,10),Odd$(X)!x!:!Linefeed=12 !#2;10) !Linefeed!:!"#2"79c";"*** Wagering ***" "#2;10)"#2"79c";C$(1)$"a,5x,5a,6x,4a,5x,5a,3x,6a,3x,4a\!:,f!#28520;"Comp.","Ave.","Earn/","SR/TV"Sp!#28530;"Horse #","Time","Fin.","%Wps","Start","Ave.","Comp.","Points","Odds"z!: ! 79"_"!#28580;!:O! 2x,##,4x,###.#,5x,##.#,3x,###.#,6x,######,3x,###.#,5,20a,## :- #28400;"Analysis for race # ",N.horses 40"=" #28430;!:: !#2;15): ------------ Deselect Elongated characters!: !Linefeed=12 *!#2;10) 4!Linefeed>!: H! 10x,5a,4x,4a,13x,5a,5x,5a8R! 7a,3x,4a,5x,3a,4x,4b l =8:=24(v "Insert paper and turn on printer." =154 "79c";"-- Press any key to begin printing --" a$ #2,Printer$ :+ #2;27)+33): --- Select bold print6 #2;14): ------------ and Elongated characters. : 08x:x=0x1=17:y1=16Position=x127028x=09Position=Position-3MoveTo(%Position,%y1)  x=x+1  #1;x/ x=10x1=00:y1=06:PenColor(%L.Blue):8170& x=208250 0 Position: a$::7240D :!N --- Send results to printerX :the labelJ:&TMoveTo(%0,%180):LineTo(%76,%180))^MoveTo(%197,%180):LineTo(%280,%180)h:r --- Label the Graph|:MoveTo(%81,%187)PenColor(%Grey2)#1;"Comparison Chart": --- Number the Graph:PenColor(%Grey1) --- Set position for 2nd row:SetRow=X-11X=11FillColor(%L.Blue)Left=(SetRow*28)+5:PenColor(%Grey1): --- Draw markers:y=291755MoveTo(%0,%y)"LineTo(%280,%y),y6:!@ --- Make room for H.points=80X=>117860:7730(Left=(X*28)-92Right=left+3 <Bottom=25FTop=(H.points*1.9)+25PN.horses=117860(ZViewPort(%Left,%Right,%Bottom,%Top) dFillPortnXxViewPort(%0,%280,%0,%193)FillColor(%Black) 7910:"illPort~PenColor(%Grey2) GrafixOn: --- Draw the walls: y=2023MoveTo(%0,%y)LineTo(%280,%y)y: --- Draw the bars routine:FillColor(%Grey1): X=1N.horses1Ar(X,10)<=80H.points=Ar(X,10):ENTER";a$:  --- Draw thE Graph routine:: Black=0 Grey1=5 L.Blue=7 Grey2=10 Green=12 $Aqua=14 .White=158:B#1,".Grafix" LReleaseV:::Mode=1:Buffer=1`GrafixMode(%Mode,%Buffer)jFillColor(%Black) tFering 2-Graph 3- Print 4- Next race";:N.horses>12" 5-Relist"; HO=0:ORO=17310\O=27380fO=38290 pO=4 z7060:::" ** WAGERING **":C$(1):C$(2):C$(3):" EXACTAS" C$(4)::"PRESS .horses<13PL=N.horses:PL=12I=1Label.1$:Label.2$  79"_" 7130;: X=1PLG7090;X,Ar(X,1),Ar(X,2),Ar(X,5),Ar(X,6),Ar(X,11),Ar(X,10),Odd$(X) X:- PL>127230:a$:I=13:PL=N.horses::7120*: 4=24:=15Y>"1-Wag on screen:HLabel.1$=" Comp. Ave. Earn/ "YLabel.2$="Horse# Time Fin. %Wps Start Comp. Points Odds"E 2x,##,7x,###.#,7x,##.#,5x,###.#,5x,######,6x,##.#,4x,##.#,3x,7a$N1"(&Odd>27.5Odd<=29.5Odd$(X)="14-1"(0Odd>29.5Odd<=31.5Odd$(X)="15-1":Odd>31.5Odd$(X)="20-1"%DX=Win(1)Odd$(X)=Odd$(X)+" ***"$NX=Win(2)Odd$(X)=Odd$(X)+" **"#XX=Win(3)Odd$(X)=Odd$(X)+" *"bXlv: --- Put results#2"79c";C$(2)."#2"79c";C$(3)8": B"#2;10)L": V" 31x,15a`":j"#28790;"*** Exactas ***" t"#2;10)~"#2"79c";C$(4)":"Linefeed=18 "#2;10) "Linefeed":2"#2;27)+34): --- De-select bold printing.":"#2"":" --- Class Table": #=4:=15& #" 3 A Lot ";130)#=15D#" 2 Moderate ";130);130);"______>> Up In Class"(#=15&2#" 1 Slight ";130)<#F#=15P#" 0 Equal Class"Z#d#=1keyxscreen%=:yscreen%=: *** Up arrow key <5230<11(<34>46)230first%2106cursor$=space$:table%(xpos%,ypos%)=5cursor$=oh$ cursor$;X=-3:ypos%=(+1)/3+1:cursor$=space.flash$:table%(xpos%,ypos%)=5cursor$=od "PEG.LEAP"n::"REQUEST.INV"Ox=10:=29:"I N I T I A L I Z I N G"::=35:"Please Wait":2000:1300:480 *** Get Instructions$a$:a%=control$,a$):a%=0130/a%150,160,240,320,400,1250:a%<>1130:ۿ *** Return or Enter /// SIG Co-Chairman Basic prompt type Run ".D1/Menu.Maker" and hit RETURN. You'll be back into the Menu in no time. If you have any additional comments or hints about using this program, please pass them along and we'll update the disk accordingly. Dave Ottalini WAPt gave an inkling as to where this program went when everything was finished (no END command) so it may simply take you back to the beginning once its provided the information you're looking for. To end, press CONTROL and "C" again, and at the ")" nd will beep at you if it does not get it. You might want to get into Basic (from Menu.Maker press CONTROL and "C") and then LOAD the program. List it to see exactly what you've gotten yourself in for. I could NOT find a line of code thasults or look at them on screen if you desire. But again, this program is not for the novice unless you care to arm yourself with a newspaper or two that would probably include the information this program is looking for. It is very unforgiving ak 1 1/4M 2M" J$ 79"_" T$9290;^$stance Chart **" #=7:=15:$"3F 5F 7F 1M 40Y 1 3/8M"$=15:$"3.5F 5.5F 7.5F 1M 70Y 1 1/2M""$=15:,$"4F 6F 7.5F 1 1/8M 1 3/4M"6$=156@$"4.5F 6.5F 1M5&n#"-1 Slight ";130)x#=15F#"-2 Moderate ";130);130);"______>> Down In Class"#=15&#"-3 A Lot ";130) # 79"_"#=14 #9120;##:# --- Distance chart#: #=4:=29#"** Dih.flash$cursor$;:first%=0 *** Left arrow key<28130(<8>14)<40310first%2906cursor$=space$:table%(xpos%,ypos%)=5cursor$=oh$ cursor$;X"=-6:xpos%=(-10)/6:cursor$=space.flash$:tablet%(xpos%,ypos%)=5cuYet."LVcount%>4count%<8=17:=1:"NOT BAD.":=+1:"Give It Another Shot."`count%<81160jcount%>241150]t=17:=1:"OUCH!":"You Had ";count%;" Pieces Remaining.":"Today Is Not Your Day!":1160Q~=17:=1:"WRONG OBJECTIVE!"::"When A."count%<>110800$=17:=1:"BRAVO!":=+1:"A Perfect Score!"6.table%(5,5)=5"In the center! You're A Genius!"8count%<>21100.B=17:=1:"EXCELLENT!":=+1:"Try Again."GLcount%=3count%=4=17:=1:"GREAT!":=+1:"Don't Give Up temp%+table%(x%,row%):x%temp%=10480>temp%=0:y%=row%-1row%+1:temp%=temp%+table%(col%,y%):y%temp%=10480 col% row%3 *** No more moves. Print appropriate message.B=22:=1:29);:=18:=1:"Only ";count%;" Pieces Remainingxoffset%<0xoffset%=-1Lcursor$=space$:=yscreen%+(yoffset%*3):=xscreen%+(xoffset%*6):cursor$;" *** Any moves left on board?"count%=0:row%=28:col%=28table%(col%,row%)<>51020count%=count%+1>temp%=0:x%=col%-1col%+1:temp%=rom%:=xscrn.from%:cursor$;6>cursor$=space$:table%(xpos%,ypos%)=5cursor$=oh$"H=yscreen%:=xscreen%:cursor$7Ryoffset%=ypos.from%-ypos%:xoffset%=xpos.from%-xpos%\yoffset%>0yoffset%=1fxoffset%>0xoffset%=1pyoffset%<0yoffset%=-1zble%(x%,y%-1)=05407 table%(x%,y%-2)=5:table%(x%,y%-1)=0:pos%(from%-9)=0pos%(from%)=0:pos%(move%)=1 table%(x%,y%)=06) *** Got one so blank from and jumped location @*cursor$=space$:table%(xpos.from%,ypos.from%)=5cursor$=oh$)4=yscrn.f(from%+18)<>move%730table%(x%,y%+1)=0540<table%(x%,y%+2)=5:table%(x%,y%+1)=0:pos%(from%+9)=0:790(from%-2)<>move%760table%(x%-1,y%)=0540<table%(x%-2,y%)=5:table%(x%-1,y%)=0:pos%(from%-1)=0:790(from%-18)<>move%540ta/((from%+move%)/2)<>(from%+move%)/2)5403(from%-move%)-2)*(from%-move%)-18)<>0540)y%=from%/9)+1:x%=from%-from%/9)*9(from%+2)<>move%700table%(x%+1,y%)=0540<table%(x%+2,y%)=5:table%(x%+1,y%)=0:pos%(from%+1)=0:790l Move. Try Again..."$Na%=11500::=-1:28);:480AX=22:=31:" Move Peg to Where? ";:=yscreen%:=xscreen%>bypos%=(yscreen%+1)/3+1:xpos%=(xscreen%-10)/6:first%=1:1300lmove%=(ypos%-1)*9)+xpos%:pos%(move%)540vfrom%=move%580os%(from%)600 *** Illegal move@cursor$=space$:table%(xpos.from%,ypos.from%)=5cursor$=oh$)&=yscrn.from%:=xscrn.from%:cursor$;60cursor$=space$:table%(xpos%,ypos%)=5cursor$=oh$":=yscreen%:=xscreen%:cursor$1D=20:=1:7);"Illegash$:table%(xpos%,ypos%)=5cursor$=oh.flash$ *** Get from locationHcursor$;:ypos%=(yscreen%+1)/3+1:xpos%=(xscreen%-10)/6:first%=0:130jyscrn.from%=yscreen%:xscrn.from%=xscreen%:ypos.from%=ypos%:xpos.from%=xpos%:from%=(ypos%-1)*9)+xpos%pos%,ypos%)=5cursor$=oh.flash$cursor$;:first%=0 *** Main program[yscreen%=11:xscreen%=40:=23:=25:"Position Cursor And Strike ENTER.";:ypos%=5:xpos%=5*=22:=31:" Move Which Piece? ";X=yscreen%:=xscreen%:cursor$=space.fla)=5cursor$=oh.flash$|cursor$;:first%=0 *** Down arrow key>19470>11(<34>46)470first%4506cursor$=space$:table%(xpos%,ypos%)=5cursor$=oh$ cursor$;Y=+3:ypos%=(+1)/3+1:cursor$=space.flash$:tablet%(xprsor$=oh.flash$,cursor$;:first%=06? *** Right arrow key@>52390J(<8>14)>40390Tfirst%3706^cursor$=space$:table%(xpos%,ypos%)=5cursor$=oh$ hcursor$;Wr=+6:xpos%=(-10)/6:cursor$=space.flash$:table%(xpos%,ypos%ll Else Fails, Read The Instructions!" *** Play again or exit5=24:=22:"Would You Like To Play Again? (Y/N)";&a$:=89=1212040:1300:480<>78<>1101170::".d1/menu.maker" *** ESCAPE key pressedsavev%=:saveh%=7=24:=22:"Do You Wish To Leave This Game? (Y/N)";a$:=89=121:1190<>78<>1101270 1300:=savev%:=saveh%:O=24:=1:30);:=23:18);"Press ESCAPE key To Leave This Game";17);: *** Initialize routineb%:a$=L4 HH`! (`ɖ" (èÈ``,t0L4 HH`L  d!  `ɖ" ( dÈ  ``,t0L4 d0Cս30. , V  @„ȄL5ter/((((PPPP @``` @@@@`xp<@ @ :H9H` (# ( -l..PcJt`,t$ ( t`tL4`,t0wwwwwww """"""""33333333DDDDDDDDUUUUUUUUffffffffwwwwwwww(C) 1980 Apple Compu,24,24d 126,0,0,0,0,127,0,0,0f 93,0,0,0,0,31,24,24,24h 123,24,24,24,24,120,0,0,0!j 124,24,24,24,24,24,24,24,24l 125,24,24,24,24,31,0,0,0)n 128,128,128,156,162,162,162,156,128)p 129,128,128,128,128,128,128,128,128 32);"[---] [---] [---]"$ 32);"| o | | o | | o |". 32);"{---} {---} {---}"8 32);"[---] [---] [---]"B 32);"| o | | o | | o |"%L 32);"{---} {---} {---}":6);V %_ *** Character redefinition data` 8b 91,0,0,0,0,120,24 | o | | o | | o | | o | | o | | o |"620);"{---} {---} {---} {---} {---} {---} {---}"620);"[---] [---] [---] [---] [---] [---] [---]"6 20);"| o | | o | | o | | o | | o | | o | | o |"6 20);"{---} {---} {---} {---} {---} {---} {---}"32);"{---} {---} {---}"620);"[---] [---] [---] [---] [---] [---] [---]"620);"| o | | o | | o | | o | | o | | o | | o |"620);"{---} {---} {---} {---} {---} {---} {---}"620);"[---] [---] [---] [---] [---] [---] [---]"620);"| o |6:=28:18);"Press RETURN to continue";17);pa$:<>132160y *** Print the boardz:32);"[---] [---] [---]"32);"| o | | o | | o |"32);"{---} {---} {---}"32);"[---] [---] [---]"32);"| o | | o | | o |"rom the game board."bR5);"automatically."::5);"First, position the cursor under the jumping 'peg' and strike"\5);"the ENTER key. Then move the cursor to the empty hole that you":5);"are jumping to and again strike the ENTER key."6f=1 a simple little game that is played a lot like checkers.":5);"The object of the game is to remove as many 'pegs' as possible by"H5);"jumping each 'peg' with another. You may not jump diagonally.":5);"The 'peg' that you jump will be removed fos%((row%-1)*9+col%)=1:: pos%(41)=0:table%(5,5)=0u*1,180,20::::2,279,19::=2:=32:6);"P E G L E A P":=7:=22:"Would You Like Instructions? (Y/N)"44a$:=78=1102170:ۻ<>89<>121a$2100>=4:=1:29);5);" This is9:col%=19:table%(col%,row%)=-5:pos%((row%-1)*9+col%)=0::Irow%=23:col%=46:table%(col%,row%)=5:pos%((row%-1)*9+col%)=1::I row%=46:col%=28:table%(col%,row%)=5:pos%((row%-1)*9+col%)=1::Irow%=78:col%=46:table%(col%,row%)=5:pb%)!a%=19*b%:c%:a$=a$+c%):CONTROL(%17,@a$)".CONSOLE"oh$=128)+8):oh.flash$=18)+128)+17)+8):space$=129)+8):space.flash$=18)+129)+17)+8):control$=13)+11)+8)+21)+10)+27)table%(9,9),pos%(81)Jrow%=1`ʝ`))ժuvЭ H ʊJyjhz|ֆ׆ح)JfJf$PIJfש ʈ8 @ש wx LVخ ʊJJJ莟mwwxix 0ޤՐڢ,P<0 )ߍL- J,P,QJ,R,SJ,T,U,W`,t0L40 ( dȅɥŐ ĐL /47=G\x{~'+.149?CGIKMOQSUWY[]_acegikmoqsuwy{}JJJJ) ܭL FܪJJJJ)`'+9;=?ACEGINR\aejns~  #&).369<ADGJMP^g $*-06=HLORWcfloruz$0p Q%Q̑`pPIE1pΦ#$01ʐ1`JJJJ)`%υߥ`1(ȦJJJ`&&*`JJ` **&*&ߥ`J` ***`` ` Jjjߊ` ߊ`JfJfFߪ߆` `JfJfJfF`ߩ`$011̰! LP \LD$7߭$PH8 nߩ nh ߍϭ - k, ϥ- kϱϮEϑʩ`P z  HH` k(h`$0#$E$0p Q%Qʑ`pPIE1p$E/(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*&*)` h0 ϭPh0 йPL)`)L` L``  `L` H , 8 V ТΕLϦI ] +)J* g I`LL) @L) L8``Lթ`~L8L)  =H 'HH N M))Mh }LO}~~Șݻ~`}}~L< L }ީ~` ɠɀ)ӮԮmwӥmxԐ mi` HHGH`  &%(-47=FMUX\_jmz  .169DWfy   % * > A H K Z v z }      % , 1 5 : = B K R Z _ b g n s x ~    ) . 6 = J P S X [    $ 3 : = F d  > B H M s `e|&+.QVYcjuy~':{(Z.AUDIO CK Z v z }      % , 1 5 : = B K R Z _ b g n s x ~    ) . 6 = J P S X [    $ 3 : = F d  > B H M s `e|&+.]_acegikmoqsuwy{}%(-47=FMUX\_jmz  .169DWfy   % * > A H  #&).369<ADGJMP^g $*-06=HLORWcfloruz/47=G\x{~'+.149?CGIKMOQSUWY[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"79C";"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::"S```lBcguwy{}$(/4:?IXad#֙TȌS 9S`YX`X-,ˆ̭U)? VW @ ?ddxtB˩Eʍ@Xx ,P Eʍ(itiBX`,A0Lp HH`! (```,A0Lp HH`L%&(C) 1980 by Apple Computer Inc.D vHuH` (# (jjA`,A$ (BC x) @( A`% (ALpx)`(BC `,A0Lp& (,A0Lp9 æĬSɀQVYcjuy~':{(Z.AUDIO C(C) 1980 by Apple Computer Inc.D vHuH` (# (jjA`,A$ (BC x) @