LBSOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUNDINVALID KERNEL FILExةw,@  4  J  ȱ⩤i8#) ) 8Le /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// /// SIG, Washington Apple Pi 12022 Parklawn Drive Rockville, MD. 20852 (301)-984-030P&MENU.2 :c# -DOMINO.PUZZLE cT-CONCENTRATION 2&cW%SEG.T jŸ/ )HELLO.PIC!@,,$MENU  . !-READ.ME.FIRST4Z*MENU.MAKER }>DISKNAME.DAT, , FLASHNAME.DATGc')BGRAF.INV(c!L+(GUESS.IT  cW"*SIMON.SAYS cT III.BSB.171101Au' *HELLO.TEXT/P%HELLO  c#*SOS.INTERP 4kec! *SOS.KERNEL @,Vc!a*QUICK.NOTElc!**SOS.DRIVER om#im#iЛ#Lȱ  6L憦  Lsmm l y` @8(Je稽 ʈ0 WELCOME! WAP /// SIG Public Domain Library Category/Number: Business Basic/3BSB-17 Disk Format: Self-booting Both Sides Jim Salerno was a great / 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[  !"#$%&'()*+,-./0123456789:;<=>ŭ᭭򭭪𭭠򠭠頭퀠Šӳ頠𠠀𠠠堠젭ӠΠSOS NTRPRHeLZĠР쁭堠堠ՠP򠭠έ魭NY 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.2"* For "Best of Salerno" disk (= 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 Aeally Useful Basic Menu Program you can use with your Profile or other hard disk. If you have Selector of Catalyst, you can set up the program to run the Profile Menu under Business Basic. Both sides are bootable. We hope you enjoy this disk! prog// supporter for many years. This disk is full of some of his excellent programs that you should find to be both fun and useful. On Side One are a number of games that Jim converted over from the Apple // side of the world. On Side Two you'll find a RCSTRING 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  sL͙ɚʚ `pAƚЙϚŚњ˚ ̚8 悅DDF͚ Κ8 DiFEC CD)ӚDmӚDԚCBКLěŚAݚ⚠IȌ 8 ꂍ  8 ꂅJJ` ! ɃɄ b`" lJJJJYe s ˰L8Ls LԫN l@u=ekPe tMe )llNesOet NeOetMeCOeNeȌ=e>e;e ƬƫHH ,hohp` ɩCe0R`ȹR`ee?e@e ue 5e T L=e;e`Lso`n}pm aa`dyopd8isŠt`dyoopd8ip`J uv`&&&8孪孪宐橈`! @ uA?B@B 悅@=g>h>h ]=i>j>k a=g8i>hj>h 悅ki=5j>6k6SOS KRNLb.D1/SOS.INTERPŠ̠Š.D1/SOS.DRIVERР頞 0 ) (lH'&3&'&#e'#%e'%'&"$"$#%'#%h`$eh`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?eehi?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` ׫$`ɥ%e,ȥ,*,- y,,,-,,,ȱ,,- yL+,ȑ,` 2"p-,-L(Ġ %>,i-i8, ȱ,%,W,pp ڠ %p`l  " ) i ?ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghij0 `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` @SATRnpqrstuvwxyz{|}~GA7  3  5  >>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< SOS DRVR"CUSTOM.3 )((8*,;((*,((+)((9/(p((>3  =9 :9 .(~|L|LNqooGoDDDcc0ccpc]]c"QM"|@@pAATT**| 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 keypadkmen to your printer. Use Control-1 to request screen text printout. Control-2 will toggle from normal to condensed size print. (if you have an Apple DMP) A QUICK NOTE: Included with your SOS.Driver file is the Attach.Driver. An explanation of how to use it follows: The "ATTACH" Driver will let you send a copy of what you see on the scre  )* 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>> ""*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>>xrL ==L: ,lCL <=L: <,n)LL8 L8 u:L8 ;)ߍ;j`; ;j`uBL8 uCL8 u)u;) u;L8    x) `(,  LuL-upp<`uqq=L: vuL L L #1:CY` 9C<m><=m@=>@?AL8 >m<>@m=@<=L8 <m>?=m@AL8 C9L8 ; ;k`;);k`,@`<,m p<L<`<p<`,ms<L=q=L: ,lXґȥӑ,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"""""< >>> <Le Le ,g0L HH`! ( 9EKQWbmz`(" ((è%È`2ȭ3`1`d`c`+È`&È` & IMk`4`5`6`7`8`9`<ȭ=` & @jI`:ȭpȭqé,i0L È`,g HH`LL! l      5  Hdcefh&+si  M0   h) `(" (  (È& 8  `)2ȱÍ3`)1`Ɂ" (cefd`Hc HH`! (`ɖ" (èÈ``,t0L4 HH`L  d!  `ɖ" ( dÈ  ``,t0L4 d0Cս30. , V  @„ȄL5/((((PPPP @``` @@@@`xp<@ @ :H9H` (# ( -l..PcJt`,t$ ( t`tL4`,t0L4www """"""""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 } `,`ʝ`))ժ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{}J) ܭL FܪJJJJ)`'+9;=?ACEGINR\aejns~  #&).369<ADGJMP^g $*-06=HLORWcfloruzp 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`  &%(-47=FMUX\_jmz  .169DWfy   % * > A H K Z v z }      % , 1 5 : = B K R Z _ b g n s x ~ r GRAFIXMO hhhh  HH`420.,*)&#"! Rhhhhhh    HH`DB@><:983.+('&$h J)` `!0 nljhfdcbQNMLJFEDCBA<;6hhhhhh  HH`420.,*)&#"! Rhhhhhh    HH`DB@><:983.+('&$hhh-&#  P  `"hhhhhh  HH`420.,*)&#"! Rhhhhhh  B B HH`yyP`GB HH`)r` @A>~|zxvtslgbWTSRPMED=hhhh   HH`420.-&#  Phhhh   HH`420.h   HH`420.-&#  Phhhhhhhhhh  HH`DB@><:86421.+*)'jhhhhhhhh    X XLJFE>987410/-   `+(%" Bhhh h h h hh hhhhhh  HH`ZXVTRPNLJHFDB@<;85431hhh    `OLIHEDCB?<;8541.+*x  `"hhhhhhhh    HH`XVTRPN.GRAFIX jj# \\JHFD=;9210-,+*)!   v Q )``.`5`=`C`E` `BGRAF (C) APPLE 1980j @@@@ @``` kLK``9(89:9g:h:h L89:mm95:6:6hg gh h 99 O S   L `ee m`iɂ`0`hIhJh\h] wh]h^ w\\ ]] ]L ]L\A \A JHIH`i8\i]i\`\]`K`M %b&*L+ 16>:)    kLGA3/1.01/LIN 詏 )x `a^]NMJGF>=<10/.+* )) y xHHHJJiH 詏 鮀 `}wqnkjba_\[ZYXWVURQ$hhhhhh HH H)HHH`20+*)Hhhhhhh HHHH`&$<SWRITERWBUF  RETADDR c _ < 8 INITCHK O ITCHK WBUFLEN Y UFLEN SOSWRITE\ SWRITERWBUF T L H D @ DOTAT DOTAT RWBUF ZRNJFCALCABS BRETADDR SOSDSTATSDSTATGSCB  MOVEREL MOVEREL INITCHK ITCHK WBUFLEN UFLEN SOSWRITEWBUFLEN !UFLEN SOSWRITE$SWRITERWBUF BUF RETADDR ieB>INITCHK UITCHK MOVETO MOVETO  WBUFLEN _UFLEN SOSWRITEbSWRITERETADDR INITCHK ITCHK RANGECHKNGECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  INITCHK ITCHK FILLPORT FILLPORT RETADDR tpINITCHK ITCHK PENCOLOR PENCOLOR RANGECHKNGECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF |x FILLCOLO FILLCOLO TRETADDR  SETCTAB SETCTAB  INITCHK ITCHK RANGECHKHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  'SOSWRITESWRITERWBUF  RETADDR PLINITCHK sITCHK VIEWPORT VIEWPORTWBUFLEN }UFLEN SOSWRITESWRITERWBUF  xplhd`\XUFLEN SOSWRITESWRITERWBUF ~zvrRETADDR $ INITCHK ITCHK XFROPTIO XFROPTIORANGECHKNGECHKWBUFLEN UFLEN #ITCHK WBUFLEN DUFLEN SOSWRITEGSWRITERWBUF ?:72-(SYSFONT SYSFONT RETADDR njDRAWIMAG DRAWIMAGINITCHK ITCHK WBUFLEN RETADDR INITCHK ITCHK RANGECHKECHKWBUFLEN UFLEN SOSWRITESWRITERWBUF  NEWFONT NEWFONT INITCHK =+SOSWRITE@.!RWBUF  83& INITCHK uITCHK GRAFIXON GRAFIXONWBUFLEN UFLEN SOSWRITESWRITERWBUF zBUF GPGSREQDLGRAFIXMO GRAFIXMORBUFLEN 9RANGECHKwWBUFLEN ASOSWRITERWBUF \SOSREAD GBASADR TSOSSMARK$INITCHK ITCHK INITGRAF INITGRAFWBUFLEN RETADDR ISOSDSTATGSCB kSOSOPEN INITCHK READPARM5CREFNUM DWBUFADR ?BMOVCHK RBUFADR 7WRITEPAR=SREFNUM FRREFNUM 6WREFNUM >INITFLG KSOSCLOSEhhhhhh HHHH`&$<D^Z FpHx  )) y xHHHJJiH 詏 鮀CALCABS  ABS RETADDR  SOSDSTAT SDSTATGSCB INITCHK  ITCHK DOTREL DOTREL WBUFLEN  UFLEN SOSWRITE SWRITERWBUF  RETADDR % ! INITCHK  ITCHK LINETO LINETO WBUFLEN  UFLEN SOSWRITE SWRITERWBUF     CALCABS x q ABS RETADDR 40: INVALID INTEGER G=Z,N=N+1: ** VALID GUESS ** A=G3406" ** INCORRECT GUESS ** ,S%=S1%-G-A))/L2)6560@2401J ** CORRECT GUESS ** TS%=20^560: BAR A ** INITIALIZATION FOR NEXT GAME ** A=(MX-MN+1)*8))+MNN=0. ** NEXT TURN ** ("GUESS: ";:"";Z$:=-1:Z$=""520^Z=Z$):Z>MXZ 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 GRAPHh%r=9:"YOU GOT IT IN ";N;" GUESS";|N>1"ES";"!"* ** AGAIN? ** =1:=24"PLAY AGAIN (Y OR N)? ";AN$:AN$="Y"AN$="y"470AN$="N"AN$="n"480420:870:210:"THANKS FOR PLAYING.":"MENU.2": END( ** QUIT ** =TB"MY NUMBER WAS ";A4204& ** RESPONSE TO GUESS ** 0=TB :J=1S%D"*";7);NXblGB-S%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),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 ss any key to continue-"\A$f!p=33::" - GUESS IT - ";::\z=GB:"....5...10...15...20...25...30...35...40...45...50...55...60...65...70...75...80"=GB+1::"80C";" ":0,2279,24D ORIGINAL VERSION BY PEOPLE'S COMPUTER COAT IT IS." 6"79C";"AFTER EACH GUESS, I WILL DISPLAY ONE OR"5 "79C";"MORE STARS (*). THE CLOSER YOU ARE TO"1*"79C";"MY NUMBER, THE MORE STARS YOU GET."4=173>=28:"PRESS ";::"ENTER";::" ALONE TO QUIT"H=21*R"79C";"-preJ=1S% =G:=-1 "*";J0,2279,24- ** INSTRUCTIONS ** :=4"80C";"*** GUESS IT ***"6"79C";"I AM THINKING OF A WHOLE NUMBER BETWEEN"625);MN;" AND ";MX;". TRY TO GUESS WH0=+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,SIMON SAYS-" 1000 INC=18H=INC*30-10:V=60 2000H=INC*30-10:V=55MOVETO(%H,%V)#1;" ";INCINC ,INC=1N6N(INC)=8)*8+1)@INC hINC=1NmPENCOLOR(%7)rH=N(INC)*30-10:V=80 |20003N(INC)2510,2520,2530,0d "SIMON.SAYS" 100-3060 January 1990nBLOCK%(1,4),ANS(10),N(10)sN=3x#1,".GRAFIX""BGRAF.INV"MODE=1:BUFFER=1GRAFIXMODE(%MODE,%BUFFER)PENCOLOR(%15)FILLCOLOR(%0):FILLPORT GRAFIXON)MOVETO(%100,%180):#1;"- # OF STARS FOR GUESS # S1% MAX # OF STARS + 1 ' TB TAB POSITION FOR RESPONSE>$ .. GUESS.IT ..... 100-1060 January 1990MPANY, MENLO PARK, CA A ANSWER" F FLAG FOR VALID INPUT G GUESS GB BOTTOM OF GRAPH GT TOP OF GRAPH L2 LOG(2) MN MINIMUM ANSWER MX MAXIMUM N # OF GUESSES# S% JOIN OTHER WAP /// SIG MEMBERS ON THE TCS! COSTS ONLY $6.00 PER YEAR. THE BEST OF SALERNO! 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":17502540,2550,2560,2570,2580PENCOLOR(%0)H=N(INC)*30-10:V=80 2000INCPENCOLOR(%15)MOVETO(%1,%40)#1;"Enter selections "; INC=1NANS(INC):ANS(INC)>8530#1;ANS(INC);:INC=N550 !#1;"-";5&ANS(INC)2510,252 S$="BY DAVID LEITHAUSER":GOSUB 48100:PRINT 8 S$="AND SANDY JONES":GOSUB 48100:PRINT:PRINT œ100#F$="DOMSAV"A(S$="LOAD PREVIOUS GAME (Y/N)? ":48100:49000:YN=0F$:100 2#3,F$7#3;NX:#3;NY:#3;GT 8X=1NX 9Y=1NY : DOMINO.PUZZLE  BY DAVID LEITHAUSER% APPLE CONVERSION BY SANDY JONESA COPYRIGHT 1989, INCIDER February 1990 'InCider A+' + MODIFIED FOR APPLE /// January 1990 ::M(5,4,4))=5:S$="-DOMINO PUZZLE-":48100:::4"CONCENTRATION""DOMINO.PUZZLE":"MENU.MAKER".... ." 4 PRINT TAB(10);" 6)........... ."#10);" 5)........... QUIT.":+20);"Make Selection (1-5) ";:"";S$ S=S$)S<1S>57):=-2:190S210,220,230,240,250"SIMON.SAYS""GUESS.IT"d "MENU.2",n:=6:"80C";"****** GAME DISK ******")x:10);" 1)........... SIMON SAYS."%10);" 2)........... GUESS IT."*10);" 3)........... CONCENTRATION."*10);" 4)........... DOMINO PUZZLE."5 PRINT TAB(10);" 5)....... VOL%=40:TIME%=10 VOL%=40:TIME%=10 #2,".AUDIO":MODE%=128 #2;MODE%);VOL%);/ #2;CNT%-256*CNT%/256));CNT%/256));2 #2;TIME%-256*TIME%/256));TIME%/256)); #2:! "SIMON.SAYS" 100-3060DWIDTH=21:DHEIGHT=5EDRAWIMAGE(@BLOCK%(0,0),%ROWBYTES,%XSKIP,%YSKIP,%DWIDTH,%DHEIGHT) SOUND CNT%=15564:3000 CNT%=7782:3000 CNT%=3891:3000 CNT%=1946:3000 CNT%=973:3000 CNT%=486:3000 CNT%=243:3000 CNT%=122:300000")/BLOCK%(0,1)="FFFF"):BLOCK%(1,1)="F000")/BLOCK%(0,2)="FFFF"):BLOCK%(1,2)="F000")/BLOCK%(0,3)="FFFF"):BLOCK%(1,3)="F000")/BLOCK%(0,4)="FFFF"):BLOCK%(1,4)="F000")$MOVETO(%H,%V) ROWBYTES=4:XSKIP=00:YSKIP=00"-"; INC:#17#1;"DO YOU WISH ANOTHER TRY? (Y/N) ";:AN$:#1;AN$K AN$="N"AN$="n"::=4:"79C";"PROGRAM COMPLETE":"MENU.2": END6#1;"HOW MANY NOTES DO YOU WISH? (1-9) ";:N:#1;N 160/BLOCK%(0,0)="FFFF"):BLOCK%(1,0)="F00,2530,2540,2550,2560,2570,2580 +INC:#1NE=0 XINC=1NbANS(INC)=N(INC)630lE=1vINC PERFORM MOVETO(%1,%10) %E=0#1;"YOU ARE CORRECT ":770%E=1#1;"YOU ARE WRONG! IT'S "; INC=1N#1;N(INC);:INC=N760 #1;Z=04<#3;M(X,Y,Z)>Z@YBX D#3;MV F#3:F$+H:50000:X=1NX:Y=1NY:51000:Y:XJ=50:=1:"MOVE # ";MV; L1003 d"DIFFICULTY LEVEL (1-3)? ";fnA$:A$<"1"A$>"3"110sA$ xNX=A$)+1:NY=NX:NY>4NY=4+yGT=1:(d ...CONCENTRATION... 100-3180>n ** ONE-TIME INITIALIZATION ** -xPR%(12,1),CD%(24),H%(24),V%(24),CP%(6,1)9MP=12: MAXIMUM # OF PAIRS OF CARDS+MC=6: COLOR PAIRS @CH=2BǙ=9*X-1:=5*Y:M(X,Y,4);" ";M(X,Y,2)LǙ=9*X+2:=5*Y+1:M(X,Y,3);Vǿ A$:A$=""5200*˻A$)<1A$)>NY52000>A$;:YT=A$)HA$:A$=""52040M˻A$>"Z"A$=A$)-32)R˻A$<"A"A$>64+NX)52040\A$;:XT=A$)-64f˿A$|Pî ZÁX=1NX dÁY=1NY nÚ=5*Y-2:=9*X-2:"+-------+"0xÁZ=13:=9*X-2:=Z+5*Y-2:"| | ";:Z Ù=9*X-2:=5*Y+2:"+-------+"ÂYÙ=9*X+2:=1:64+X);ÂX ÁY=1NY:=3:=5*Y:Y);:Yÿ8Ǚ=9*X+2:=5*Y-1:M(X,Y,1);,:=50:=15:"Space bar";A$:A$<>" "6310 1000$S$)<39(40-S$))/2);S$: S$:/任S$)<79(80-S$))/2);S$;:: 39..40 S$:BhA$:A$<>"Y"A$<>"y"A$<>"N"A$<>"n"YN=1)*9+1):49000rYN=0:A$="Y"A$="y"YN=-1w70YX4=50:=10:"No more";:=50:=11:"hints.";:6300 HX=1NX HY=1NYM(HX,HY,0)=HN6120HYHX=50:=11:"Error! ";:6300&=50:=11:"Swap ";HY);64+HX);"=50:=12:"and ";Y);64+X)/=50:=14:"Press";YX=50:=10:"Score= ";SC;1=50:=11:"out of ";(NY*(NX-1))+(NX*(NY-1));A =50:=15:"Play ";:=52:=16:"again";:=50:=17:"(Y/N)? ";49000:YN=-110:"MENU.2": END pX=1NX Y=1NY%HN=X+(Y-1)*NX:M(X,Y,0)<>HN60 Y=1NY Z=04#3;M(X,Y,Z)ZYX #3;MV#3=50:"Saved as DOMSAV" "A$="": A$;:SC=0 Y=1NYX=1NX-1!M(X,Y,2)=M(X+1,Y,4)SC=SC+1XY X=1NXY=1NY-1!M(X,Y,3)=M(X,Y+1,1)SC=SC+1ock? "; 52000:Y=YT:X=XT. =50:=12:"Second";:=50:=13:"block? "; 52000:Y1=YT:X1=XT: Z=04:T=M(X,Y,Z):M(X,Y,Z)=M(X1,Y1,Z):M(X1,Y1,Z)=T:Z 51000:X=X1:Y=Y1:51000 1000 SAVE AS DOMSAV #3,F$#3;NX:#3;NY:#3;GT X=1NX:M(X,Y,1)=M(X,Y,2):M(X,Y,2)=M(X,Y,3) 4M(X,Y,3)=M(X,Y,4):M(X,Y,4)=T >51000CH=50:=15:"Rotate";:=50:=16:"again ";:=50:=17:"(Y/N)? ";RA$:A$="Y"A$="y"2090\A$<>"N"A$<>"n"2130 f1000 A$. =50:=10:"First ";:=50:=11:"blGT<>1A$="R"A$="r"2000!$GT<>2A$="S"A$="s"3000.A$="D"A$="d"40008A$="Q"A$="q"5000*=GT<>2A$="H"A$="h"MV=MV-1:6000 B1040a$;4=50:=10:"Rotate which";:=50:=11:"block? ";52000:X=XT:Y=YT2*T=M(X,Y,1)X=819:=50:=X:" ";:X!GT<>1=50:=2:"(R)otate";$GT<>2=50:=(3-GT):"(S)wap";$GT<>2=50:=(4-GT):"(H)int";!=50:=(5-GT):"(D)isk save":=50:=(6-GT):"(Q)uit" =50:=8:"Do which? ";A$:A$=""1040!3)=M(X,Y,4):M(X,Y,4)=ThZrY|XGT=2500 X=1NX Y=1NY#RX=1)*NX+1):RY=1)*NY+1):Z=04:T=M(X,Y,Z):M(X,Y,Z)=M(RX,RY,Z):M(RX,RY,Z)=T:ZYX"X=1NX:Y=1NY:51000:Y:X#MV=MV+1:=50:=1:"MOVE # ";MV;+XY X=1NXM(X,NY,2)=1)*9+1)XGT=2300Z=1,Y=1NY:X=1NX:M(X,Y,0)=Z:Z=Z+1:X:YGT=1400 ,X=1NX 6Y=1NY@N=1)*3+1) JN=0370 TZ=1NO^T=M(X,Y,1):M(X,Y,1)=M(X,Y,2):M(X,Y,2)=M(X,Y,3):M(X,Y,"SCRAMBLE PIECES (Y/N)? ";:49000zYN=0GT=2:130$|"ROTATE PIECES (Y/N)? ";:49000 ~YNGT=0 50000 Y=1NYM(1,Y,4)=1)*9+1) X=1NX/N=1)*9+1):M(X,Y,1)=N:Y>1M(X,Y-1,3)=N0N=1)*9+1):M(X,Y,2)=N:YLC$1080: LETTER IS NOT IN RANGE J=Z$)-"A")+1<CD%(J)<=0J=P11050: CARD HAS ALREADY BEEN SELECTED*1790: DISPLTRY: QP$ PROMPT + QH HORIZONTAL TAB FOR PROMPT EXIT: J CARD #  0 ESC ? ROUTINE FORCES A NON-MATCHED CARD TO BE SELECTED . DOES NOT ALLOW P1 TO BE PICKED IPENCOLOR(%15):MOVETO(%3,%32):K .RTR=TR+1: ONE MORE TURN 6\MOVETO(%3,%32):#2;BL$,30): BLANK PROMPT LINE7fCD%(P1)<>CD%(P2)1200: CARDS DO NOT MATCH 'p1290: A MATCH /z * COMMON CODE FOR PICKING CARDS *  EN PICK A VALID CARD  J=01380+P1=J: FIRST PICK  QP$="A SECOND: "3*Q=150: POSITIONS RESPONSE /4960: PICK ANOTHER VALID CARD>J=01380+HP2=J: SECOND PICTWO ELEMENTS CD%(Z)=CD%(Z%)CD%(Z%)=Z15 ** SELECT NEW PAIR ** QP$="PICK A CARD: "5Q=120: POSITIONS RESPONSE 5P1=0: ALLOW ANY VALID PICK *960: CE DOWN 7lN=2*NP: # OF CARDS TO BE USED .v660: SCRAMBLE THE CARDS )TR=0: # OF TURNS 740.Z=N2-1: SCRAMBLE CD%(1,...,N) Z%=Z*8)+13Z1=CD%(Z): EXCHANGE %(J,1)=PR%(K,1)Z=1: SET FLAG FOR SAME PAIR0-:Z>0500: SELECT THE PAIR AGAIN 4DCD%(2*J-1)=J: TWO CARDS FOR PAIR J NCD%(2*J)=JXab2600: INITIALIZE THE DISPLAY BEFORE SCRAMBLING THE CARDS; DISPLAY CARDS FA INITIALIZE CARD TYPES AND ARRANGEMENTS 2PR%(J,0)=NT*8)+1: SELECT TYPE FOR PAIR J 4PR%(J,1)=NC*8)+1: SELECT COLORS FOR PAIR J J=1580Z=0?K=1J-1: FORCE PAIR TO BE DIFFERENT FROM PREVIOUS PAIRSH&PR%(J,0)=PR%(K,0)PR if N=6 then CD%(J)=J*2+3 ? .660: SCRAMBLE THE COLORS 5J=1NC: SELECT THE FIRST 2*NC COLORSCP%(J,0)=CD%(2*J-1)CP%(J,1)=CD%(2*J)0N=NP: # OF CARD PAIRS AJ=1N: NT*NCZ=HH+2: TYPE 3 = 5 V-STRIPES HPENCOLOR(%C1)RMOVETO(%Z+2,%V)\LINETO(%Z+2,%V+CV)fMSTRIPES lPENCOLOR(%C1)vMOVETO(%Z,%V)LINETO(%Z,%V+CV)MOVETO(%Z+18,%V)LINETO(%Z+18,%V+CV)PENCOLOR(%C2)MOVETO(%H+09,%V)LINETO(%H+09,%V+CV)/Z=VV+3: TYPE 2 = 3 H-STRIPES PENCOLOR(%C1)MO V-POS (0C1=CP%(PR%(Z%,1),0): COLOR 1 : IF C1<8 THEN C1=2*C1 (DC2=CP%(PR%(Z%,1),1): COLOR 2 N IF C2<8 THEN C2=2*C2 7XPR%(Z%,0)1890,2000,2110,2240: DISPLAY CARD TYPE.bZ=HH+3: TYPE 1 = 3 V- VLIN V,V+CV AT Z ****1Z%=CD%(J)): DISPLAY CARD J FACE UPG MODIFY DRAWING ROUTINES IF CH,CV CHANGED 8 EXIT: Z% PAIR # OF CARD J "H=H%(J): H-POS#&V=V%(J):S ROUTINES * |COLOR=1:PENCOLOR(%7)8 * DISPLAY CARD J FACE DOWN 1710COLOR=0:PENCOLOR(%0). * ERASE CARD J H=H%(J) V=V%(J)Z=HH+CHMOVETO(%Z,%V)LINETO(%Z,%V+CV)y"16406AN$="N"AN$="n"1610<@MOVETO(%3,%10):#2;" ":15607JMOVETO(%3,%10):#2;"THANKS FOR PLAYING. ";TINC=1500:INC^::"MENU.2": ENDhFILLPORT:370:r * DISPLAY CARD$1690: ERASE CARD 4CD%(J)=-CD%(J): FLAG CARD AS MATCHED + ** AGAIN? ** PENCOLOR(%15)DMOVETO(%3,%10):#2;"PLAY AGAIN (Y OR N)? ";"AN$:#2;AN$,AN$="Y"AN$="ATCHED ALL THE PAIRS IN ";TR;" TURNS."J=12*NP/1660: DISPLAY CARD FACE DOWN 3J=12*NP: DISPLAY THE CARDS FACE UP 1790$1550: AGAIN? &2720: REMOVE CARD J #2;" ";1490/PN=N-2: TWO LESS CARDS )ZN>0740: CARDS REMAINING 8d DISPLAY THE ORIGINAL BOARD "nMOVETO(%3,%10):PENCOLOR(%15)5xN>0#2;"HERE ARE THE CARDS... ":N=0#2;"YOU M PICK ANOTHER PAIR , * CARDS MATCH * Q$="** YOU FOUND A PAIR **0P=50:7):INC=1150:INC:7): was 150 1150,(J=P1: REMOVE CARD 1 21490+<J=P2: REMOVE CARD 2 FHERE IS NO GUESS LIMIT."- 32);"PRESS ";::"ESC";::" TO QUIT." * "79C";"-press any key to continue-"  2870 ( J=12*NP/2 1660: DISPLAY CARD FACE DOWN < GF PENCOLOR(%15):MOVETO(%3,%50):#2;"EACH LETTER REPRESENTS A CARD."$P #2;" TRY TO MATCH THE PAIRS.":Z LETTER TEMPLATE d J=12*NP n 2720x #2;"A")-1+J);  MOVETO(%3,%35) C Z%=(J-.9)/6): LOCATE CARD J IN LETTER TEMPLATE  VP=80-pOpp ?@lM3&lMI@ Nx|p~x@?pp?~|7q~|@2fLY2I?|sO~0B@ app7~_2fLY2|I~|_>=C@ `Np7@2fLY26~~@p >~c` 10C|C`|7@@>`|7@@>fpqx`a$,1)="/"5060:s=s-1 5030=a$240 MENU.MAKER 6.2 * Thanks to C.M.Davidson for his help!ONCENTRATION... 100-3180 SECOND0 GRAPHICS PROCEDURE  #2,".GRAFIX"& "BGRAF.INV"0 MODE=1:BUFFER=1: GRAFIXMODE(%MODE,%BUFFER)D FILLCOLOR(%0):FILLPORTN PENCOLOR(%15)X Db Modeled after 1981 program by Howard Franklin, Palo AltoORIGINAL # OF PAIRS& LC$ LETTER OF LAST CARD , N # OF CARDS STILL UNMATCHED, CH HORIZONTAL WIDTH OF A CARD+ CV VERTICAL HEIGHT OF A CARD TR # OF TURNS P1 FIRST PICK P2 %(J) PAIR # OF J-TH CARD IF UNMATCHED- - PAIR # IF ALREADY MATCHED/ H%(J) HORIZONTAL POSITION OF CARD J V%(J) VERTICAL( NT # OF CARD TYPES ACTIVE) NC # OF COLOR PAIRS ACTIVE% NP , INC=1YP*10:INC:6 AN$@ AN$=27):J !T ** VARIABLE CONVENTIONS **%^ PR%(J,0) CARD TYPE OF PAIR J&h PR%(J,1) COLOR PAIR OF CARD J)r CP%(K,0) COLOR 1 OF COLOR PAIR K)| CP%(K,1) COLOR 2 OF COLOR PAIR K2 CD9*Z% HP=3+(J-1)*12-72*Z% MOVETO(%HP,%VP) 0 SELECT CARDS Z$ Z$=13): RETURN % Z$<>27)2840: IF NOT ESC #2;"ESC";- Z%=-1: ESC FLAG   #2;Z$;" |7@2fLY2@p|IG@lM3&lM`o `opsp8|I`@@@N@|7@@?|`|Opp @@lM3&lMI` &Nx|p~x@?p`?||7@2fLY23yyL!yAp7`2fLY2|I~w~g}C@ xNpOpp0@ @lM3&lM6@~ >~`~pO~scypa?|7|@@?>l>@<`p|I~@xxC@ N?|7p@2fLY2@|78@@2fLY2`o@Ccpsx|7pp8`!@2fLY26` >>~x`a `0@ `0@||I@lM3&lM7fL6fL2fL2fLY2fLY2~`~p@~@pOxlM3&lM|7~?>{}C@ >?p70xp,@2fLY2I@~ N`~pcy|`?|I`p@@Np|7~C@ >?|I@@lM3&lM|I@@@lM3&lM`o@cp0x|Opp 1@lM3&lMI@ Nxgxa}f0~L`?|~|7@2fLY2I3flI3flM3flM3&lM3&lMpp72fLY2|I~?o>}C@ N?pO0xp,@lM3&lM6@~ >~`||7`p?p@@>p|I~C@| O~?|I@lM3&lM|7@@2fLY2`l`cpspp7pp 1@2fLY26@ `>~xgxa~p~Lp?|~|I@lM3&lM6fL6fL2fL2fLY2fLY2~~x`?|p`|ppOlM3&lM|7~_x}C@ `>pOpq~|#@lM3&lMI~@| N|`~p@|`|`|I@lM3&lM||I@@lM3&lM`l`a`ops3|I|@@3&N|~pqO`p|7~~q?C@ >?y8p@x`gLY2fLypyg`Yp`x`~p|pp~~~xaxx3&lM3fpfYp c` 100 0?pf3&lM3fpykw|@lM3&lM6?~~7~B~sLaXsp|I@lM3&lM|a~p@~@pO@lM3&lMI~@ `Nxc yl1?~|rC|Cp7pp1@2fLY2I@ Nxp~|I`@@NaI`<`ppO3flI3flM3flM3&lM3&lM|7~?>?MC@ `>|I8@@lM3&lMp|7p`@@s3ppx8|7pp  @2fLY2I| O~x`?|p``|||7@2fLY20` ! Ap7@2fLY26~`@x`a@ >~xc|q?~|rCCpOpp1@lM3&lM6@p >~`~x@?|`~p~|7|8@@3?l>a s`pp7fL6fL2fL2fLY2fLY2|I~~?eC@ N?|7@2fLY2|I@@lM3&lM`l``@Op3s|7pp  @2fLY26x >>~~`||I@lM3&lM3oyL!yApO`lM3&lMI~{~~}C@ xN|`~p@|``p7pp @!@2fLY2I@| N`0@c `pa ~3&lM3fppp@|pypgLY2fLYph oyp7xygYp`ypp~fpxxpy80@ `gLY2fLypygYp`x`~p|pp~3&lM3fpp@xaL|~Cp~3&lM3fpysy_w~_|~O|gyYp`?|py80@ `gLY2fLyp?~`&p`xCyLa?|fC|rCp~82 fpx@pxppy{}@??cgYp~p~3&lM3fpppp~3&lM3fp`jC yp8s~80@ `3&lM3fp?~&p0C` a ` a pygLY2fLYpflI3flI3flM3flM3&lM3fp@|pp?`?pygLY2fLyp~y0w|#s}fp~p~80@` 0`3&lM3fpyg`YpcxC|a?|fC?|rCpy`g|p3Ypxypp~fp~pygLY2fLYppppygLY2fLYp`jyp?8sy80@`gLY2fLypygYpp3~C~yLasLap~3&lM3fp6fL6fL2fL2fLY2fLYp@p~@3&lM3fpy|Ow|;usgYp~py80@` 0`gLY2fLyp?~`&p?@p~@0fp`yppyg@Yp~pygLY2fLYpppp~3&lM3fp`h yps~80@`3&lM3fp?~&pp?~xCyLasLapygLY2fLYp?flI3flI3flM3flM3&lM3&pp|`~p@p?pygLY2fLyp~wws~80@ `3&lM3fp?~&p?pygLY2fLYpp@xaL|~|CpygLY2fLypyK~?w~_|~gYpx`?|p~~xpp~80@ `3&lM3fpyg`Yp`C` a 0BCprams to our PD library!    ) . 6 = J P S X [    $ 3 : = F d  > B H M s `e|&+.QVYcjuy~':{-------- #=(((J-1)/COL)+TOP))%#=((J-1)-(J-1)/COL)*COL)*NCOL+1#COL>49190#LENGTH=NCOL-7$#B$(J),2,7)B$(J),16,LENGTH); #9199#B$(J),2,(NCOL)/COL);#=B$+A$:970-LVAL>0A=8A$+31);:B$=B$,B$)-1)LVAL=0B$="":A$+31);970 =B$:A=0:same=(=oldprefix$)$(same)29)+6);.8=2:=1:"PREFIX$ = ";;:B:=THPOS:B$(I);:L:=24:=0::%V --------- "MENU" -):a=2431);La$="Use <-- ; to accept ; to skip ; to erase"=1:=1::"80C";a$;:1080:31)+5);:B$=A$:A=A$):A=27900A=31100A=131050a=24="":940-LVAL=-12:A>31A$+31);:B$;">>> PRESS ANY KEY TO CONTINUE <<<"a$ #2,B$(J),16,B) ž#2830 820*#2;A$:A$:8104<>27800 >:#2H R=".d1"\".D1/HELLO"fp=+B$(J),16,B)z240 N=ơ) N=N-1ҡ,N,1)<>"/"910!N>1=С,N"CAT 0")880390A$="RUNNING "+B$(J),16,B)"79C";A$;:=0B$(J),16,B) =24:=1A$="LISTING "+B$(J),16,B)Cc$="Press CONTROL and 7 on numeric pad simultaneously to pause""79C";A$:"79C";c$4::"79C"A-7490,510,540,570 :9160 :390J>1J=J-1I=IBOTMJ0J=J-COLNlB=B$(J),16)," ")-1vB$(J),"BASIC 0")670B$(J),"TEXT 0")710B$(J),$="TEXT 0":1300hA$="CAT 0":130:A$(L),"BLOCKS")380r=0:=+3:"83C";A$(L);|IBOTM=J-1:J=1::470A$:A=A$):A=21A=9 9160A=31100-A=27TVPOS=:1090:940:same310:240A=13620 9160A<8A>11390I=I+1:#1;A$(I):270#1 "L=I-1-'COL=(L+(LINES-1))/LINES):NCOL=78/COL),j=1:same=0:I6a$="Use arrow keys to move; to select; to abort"@12);::"80C";a$;:J=TOP:B$(1)="":B$(2)=""TA$="BASIC 0":130^An190: PREFIX$="/P/BASIC":GOTO 190:REM Coldstart x300: Warmstart (GOTO 30) I=1L(A$(I),A$))180B$(J)=A$(I),1,31) 9160 J=J+1:A$(1000),B$(1000)':::"79c";"Catalog of Profile" #1, ž#1280I=0': LINES RESERVED AT THE TOP PAGE "MENU"$d --------- "MENU" ---------eJ=0:COL=0:N78=78i:+jTOP=3: LINES RESERVED AT THE TOP PAGE -kBOT=0: LINES RESERVED AT BOTTOM OF PAGE 4lLINES=24-TOP-BOT: LINES FOR THEACTUAL CATALOG 6 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::" :What day is it ... was it ... or will it be? RENUMBER :Renumber your Basic programs. PRT.CODES.PROG :Reveals the printer codes for C.Itoh/IBM/NEC Printers. .CHECK :A Basic program that checks the drivers you have on line. PRINTER.MENU :Prints a list of fonts for a C.Itoh printer. FILE.READER :Text file reader. TIMESET :Set your system's time and date IF you have a clock chip. CALENDAR . DOMINO.PUZZLE :Try to match up the numbers in four blocks. Hints provided. CONCENTRATION :A card game played against the computer. Try to find the mixed pairs of cards. On Side Two (Self-Booting)(Includes a Menu program): DRIVERide One DISK ID#: 3BSB-17 BOOTABLE?: Bootable Many thanks to Jim Salerno for this excellent disk! On Side One (All Games): GUESS.IT :Try to guess a number picked at random by your computer. SIMON.SAYS :The original Simon Says game in Basic /// SIG, Washington Apple Pi 12022 Parklawn Drive Rockville, MD. 20852 (301)-984-0300 WAP /// SIG PUBLIC DOMAIN LIBRARY PDS NAME: Best of Salerno: SEAD 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