8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL Lx L``abbb bbRbXbbbiblbub}bbbbbbbbbȘ,b2b7b=bFbIbObUbfbobbbbbbbbbbb``````b"bbctc c``  X`c c c @aX` *DAEMON.INS k#kSOFTKBb!#` CLOCKf#`CAT.FILER+!*/G.CLEFMOUSE.ORG00STARUP.PW0 # SOFTCLOCK!#` CREATE.DON!#) COMMANDS #2 CREATE.DOFF!#+ CREATE.DREM!#, CREATE.INSTALL!#- BLANKP' )DAEMON2.1$!#` ,BASIC.SYSTEM[(/ 0&PRODOSq#B/ STARTUP 4 # READ.ME  7 IIPLUS.UNSHRINK=$$|td$$$<@Aڈ8uʸNF@/COMMANDS/INSTALL""SAVE TEMP INSTALL.BIN INSTALL.BAS NFؖ@/COMMANDS/INSTALL.BAS"2"( +)T0a $L5):CALL (A*256+3) NFج@/ COMMANDS/DREMA=PEEK(49025):CALL (A*256+6) NF^@/`COMMANDS/INSTALL.BIN`` L ALL (A*256)"((4)"CLOSE"NNF;@/ COMMANDS/DONA=PEEK(49025):CALL (A*256) NF؋Z@/ COMMANDS/DOFFA=PEEK(490213456789:;VWXY`NF@/ CREATE.DONDON UTILTITY FOR SHELL1COPYRIGHT 1989HBY MICHAEL PENDERd (4)"OPENCOMMANDS/DON"(4)"WRITECOMMANDS/DON""A=PEEK(49025):CNFl(NF2@/` SOFTCLOCKح;@` 14`;`aaaaaatE`` `AaAa<5AaBaBa<&Ba<ĸưıƶƵ°IJöijĴ¹øİƷƸŶĹƲŲòĹƲIJŲòùŸŹİƶŠβˬ̤ŰǍl]J)$ Kx`4)A \Ma /a ghB,NF[@/ CREATE.DOFFDOFF UTILTITY FOR SHELL 3COPYRIGHT 1989JBY MICHAEL PENDERg (4)"OPENCOMMANDS/DOFF"(4)"WRITECOMMANDS/DOFF""A=PEEK(49025):CALL (A*256+3)"((4)"CLOSE"NNFI@/ CREATE.DREMDREM UTILTITY FOR SHELL2COPYRIGHT 1989IBY MICHAEL PENDERf % $% %%%L#N%% " % =) U$L9$ a$H`$H`.  $$$$$$$$### m( ϠŠ =)%L9$ )` $ & /% ) `%ʊL9$ %%%%L3$%͠L9$ %%%%L3$12)# #$` =) &#L # 1#H0#H`  YyNnC#J#T#T#T#T#t#t#}#}# )` )# `# ##Li## " #L ## #Lg## #Lb#H#$ #ڹ#۩ S)hL""##ӠϠ "8 )$ hhhhh%h%HH "$ S) " &%% z%$L!""H% y!$h(""`" y!(*)+ y!!(* (*%#ܦ# y!!( (`# y!(*)+ y!!(* (*%"ܦ" y!!( (`$%Ly!?2`2` L!((((PPPP"8 )' m(CHOOSE: # # "<>?@ABCDEFGHIJKLMNOPQRSTU խ L !L;-L2 "'!#L* "2&'!#" y!!( (# $"%&H "(")J&%h`!HH!) + +> 2 $20 )@`%2 "$$! $%%#% "hh!`$ $!$%"%r IY oW @!p Ǧ.#ʽ/a8  .  @! / "'!# * m( ꣣ʿ  먤˩˪ˮ˥ & "$ -! .) m( ѭ2[b4omܧBoKQ30NB@j9(R"P OS$)H P`cE'ī}lr43SLE4(H)k2 [j/5)#|(,sSXBaR+NFr1J#1xc vֈ+ k1-X,FC°#yc`œY 9𺴆wd+i-C5pÌM#@*J {Õ"|Q;rH^z~HDNc қY2̈-(\u/ Ѡ9% sm8aܤ)0.枳;MmR TՔ;Bc,HC@@0r/hC9pC2J! Ri2*##74 3 9J Hbb *hP!I0{㎱03:8(l 2t#! *$l10KO,&|΄<8|I21j!c7) 0P8ê!R. S$ΘN.7:Ld#CMҌA s@)v@pD C#'4t@ȁ#1y@X (eܐ)#A*h$# :cB12wuD3 Μ2 ҄|cNL1ɀhČtހMt`Sp‚ӑ3psM&͚90u U*U2O,|8+ Τqk9o:j05Zt*fa\dt(CӞfߓo[7e0_N>fqMBY MICHAEL PENDERm (4)"OPENCOMMANDS/INSTALL"(4)"WRITECOMMANDS/INSTALL""SAVE TEMP"("INSTALL.BIN"2"INSTALL.BAS"<(4)"CLOSE"NNFؿ@/Y Y  DAEMON.INS 7(4)"OPENCOMMANDS/DREM"(4)"WRITECOMMANDS/DREM""A=PEEK(49025):CALL (A*256+6)"((4)"CLOSE"NNFp@/CREATE.INSTALL"INSTALL UTILTITY FOR SHELL 6COPYRIGHT 1989%2)NW%C)JJJJ,%i C%D%BFG &@"ȍ%%`#%%`%`%`% Q)%`%i y!$ z%%Q) Q !$ !$ !%QJJJJ) ! ! !Q !L% !L"Q%P& O&) 8`Ȍ `L. H$ y!)?h a'&S@').(/ ?'!a)[A:L&. ȑHh-' "$Li& &H&H` &&&')'/'/' A'hh?'?'@'='q7 . 7L -6 ʽ0 -... . u2 $;L3r7x7y7) -0 8N20 L47 [/s7L4L N 38 [/s7s7L66 ʽ0 +ʽ0 %A!-... . 0n7o7 u2 c1 >7" ' -s2t2 - }30 0r2z7 p2L3 5G.L'  }3z70 ʈL3 .7L/H2`8` Cp7q7x7y7r7ة ٭S&v7T&w7S&T&L v7x7w7y7 . 7L p7 ȱ)q7Mp7q7p7 L*2 p2 A-... . u2w2r2x2s2y2t2`NFlNFq22 )/ ﭶ2`Hʎ 2hL2G ]+ H7HH JL S& .@ ' ' . -! "  ii`8 `%# %)p`%# %)p`,0 `b1# e)b1$ !`L02w2r2x2s2y2t2: E2; F2G2E2.F2.G2r2mE2r2s2mF2s2t2mG2t2C2D2 -7 mr2r2 ms2s2mt2t2C2D2C2: ȭD2; I I! `+0E] +0` --K0S2m2L>0 J0`L]+ J0`L]+ ` -` )-` ]+ m(Ϡ`) 0 ! ! !jjJJJJʊ 0 !J 0 ! !`έ­ҭҭ٭έ̭ǭЭԭ֭í/ɰ-/,-/0*/ !` d' " m( ( ! #U/HT/H`W/ L-HH " m(ԡhhڅ۩ S) #/H/H`//``HH8 )%  m( ALERT!hhڅ۩ S) m(Ӡ =) )L ]  > .8-. ..6 8L./. +.`LM ]+ )1 B.`L]+ 0... .Ls......e.e )1 ˗.`L]+ Ʀ.`A@`@A@` .`+/,/ -/+//,/ /,/+//+' @ . @! eG-Tَ,ʈH !hL!), !` {-` -` ȹ--C.-q2v2,.`P ]+ .L @ -L]+-.[2c2h2o2`H-...hL.0-. .. ) =) ) )Lx '+GHLNW&,0,@,S,_,q,},ɯϠŠŠŠĠƠŠƩŠŠӱӕ!$ !! !"Ȅ% $ "!$ "%%# # " !$ !! " !"# "LW!H)h, )1 "8 )#  m( ERROR:,, ,ڽ,۩ S)L+, m(̠Ҡ, !)L+ m(ӠҠ, !),a,b m(hh !) ! hhۢ۱ڕ HH" y!H H(h!h#٭  * )`8`ʊ )ፃ)e !"#" y!H H(h!h#ح)ୃ) % y! )` " " " w( )Lw((((((((((()H)JJJJ .)h) 0:iL!),a R)` y! !LY)` y!!$%2 "$ %2L")))(*Ls*)`hh۩eڐۅڥHH )8` L)ʊ )ፃ)!h$ !L" ! !L" !L"b1 "%!# *LW!hh׊HHנ M ) !Lw( )H )H`hhHH`ױօ$ױօ%Lw(ױօ$Lw(ױօ%Lw( "Lw( "Lw( "Lw(0%Lw($Lw(ױ֍ )L>'='>'H='H`Ԙ?'?'@' ` A'Li& !Li& $-' "`-'L"' ",' Y')`0 ⮜'Ң' Y'?V&V&QV& '8``ܩQݩV&` '`)?ܙ8`i'ܐ`"$H 77: E2; F2< G2E2.F2.G2r2mE2r2s2mF2s2t2mG2t2 - ~7 777 7 7 u7777~7mr2r27ms2s27mt2t27: К7; ВL6 p2t7]r7r7H7HH JL -C.-u7)..u7 -. .L6-. . 8L6 @L6K  8707L<61747HH7HH #^K  %Ȱ n %# I8 [/97..u7 -. .L6-. . %:H )1hr7L s7n7o7 $;4 5 )7 [/L p7q7p7 q7 . 7L LŠō 0"ܩQ -N20 LPDHHL H H L"E6 ʽ0 -... . u2 c1 E!E - E!E E: !E; ܭܠ 8 ȭF ȭJ ȭK ܠ$> ȭ HHHHC "sCsCsC 7CLBsC 7C "sCsCsC 7CLBQC$ TCڹUC۩ S)L"ZCcCjCŠР̠ )-,-) Í,- )- - )C CHCH`29@ )`HHS&T&) W!# " " '0 m(Ӻ . m(EBMB /B O0 n2 i0` n2 -` n2 -` @B HB`q@q@C8 )#  m( FILE EXISTS: 7C 7C 7C "sC 7C " e)H " (h =))BLB BHBH`.  BBBCCBB )L sC BHBH`sCCBsC 7( m(QЩ ѩҩ- f8F -J -K - z2 t-G@ ]+LPB --K0IBL0 M0 N0B ,-F --J .-K /-YЩ ѩ3ҩ- f8L0BDBLB@EBMBɛ`hd H1BB>B /BLAhhL= &eeiQ` `Hh8e `C.AB R( m(ӠǺv78x7w7y7 . " e) m( Ġź  7L?78$7΀7F.$G.D.E. 3. h` Y?8HHL? H >h``u7)  8@ȥȥ 驂 O@t7 ȱ ȱ Iȥ && L}> ȥ9>>e)JJJe  ɶ!` H7.7~7I~787$~7F.7G.~7E. 3. < Y? Y?u7)))`6) c? G> ʥ 8@ȱȱL=Ѣ~<_2 Z2T` b2_2}<]2]2}<`]2]2e2f2e2f2}<~< b2 b2L5< Z2H . -h ]+<i< <L]+<<<<<ͳ . ;# ; ;R( m(ӠǺv78x7w7y7 . " e) m( Ǡź  ( m(QЩ ѩҩ- f8F -J -K - z2 t-G@ ]+LPB --K0L0 M0 N0B ,-F --J .-K /-YЩ ѩ3ҩ- f81? < OĮſԠĠȠԮпĠŮпĠ̠ԠԮп҈РȡБѠ ѡЪ芢ѡЪ芢 *ґҡЪ芢 ҁ`88 00`88 06 ` 3)8 )  m(  :1 :1 :1 =) )L `@ )@ )@ /a8 `UNSHRINK FROMUNSHRINK TO (800K) DISK:DESTINATION FOLDERԠؠŮҠҠĮſҠHH H  $;LDz7w2x2y2 u2ܩQݩHH " G "0HHH H ( H GHHH H 00ة 0HHGܩQݭ   =) )ELE EHEH`. Pp EEEEGGGFFFFL T&S& S&  " GܩQݩک ۩HH)&H۱)@ H L\FHHHH H  HL4F`H H LEHH " G H00 "0 " GGLEHH/ " G0  V"LF0HΛHΚH H " GGLJj!KC䐒0سirIyTlx9#DrXYDT p0yųY8jRiYiLcWd(kXHŅ]"ט0D#NlʐU8Hᝒ&Z"ztbLgNx4z,Ubljuޖ4f%=B~K  h{IL6 bЖxx  ;[:z݀0r E3q,pUʴMSx!Pl_hLEYhrEHٰs*ifC-qmZWWDmeؔ&d( kfpʮL2+іʆ_^QNt RHANSC\4KJļtkJU"ב1Xk&m`A;<3hOqQKT}QrDg5,Vp~!tfd PU)(7!'  W&LN LHLH`.   / UuMMMNMiMiMMMMvNGO M-!hhhhh$HH " S)K m(ź W!S& KL}K " e) m( !' " kLPK LH -!h` -hhLMQK ' - ---+---KK - ]+ K PLKQQ -8`KKK -`hԆթJ GJ GJJ GJEMJ GJiԥiJJ`HJ h `JJ8J3IiJ.JNJ.JJJJ JJ JIΰJ뭴JJ` JV `%C)JJJJ,%i JJBDEFG `L]+KKK xI J ,I`ϥ% J UJL IJ`gԆՠ2J801݌LUIIL^IHhɀꝍ݌콎`+L]+gԆՠI IJI I󢫩I I II IΰJ`I I``ժުժު N- ! !3 m(L`H m(ˠL`H m(ˠL`H$ɩ ! !) !)$0`)> "L"* "L"i&ܐ`8&ܰ`8 )   m( Ǯ% x H(` J`%H)pJh轊J#JJ UJJE0 " "))ܩ !S&T&S&GЖLFS&T&R)Pp ܩ> "LhG ܩ* "S&T&GLFLF0 ")H !H ! m(LG m(ŠLG m(ˠ$ m(L Hȱ 6#fs2tf( { -S?2UJ):(%(A $DPeh uSpNJO`c0W|Cr 3ޏWRvߜD8c IB7qz ! N8M9zr4؟֫png섆(uQLfR j)d ^b󣌍z b 异;F}G `"@-Ab`;|Z|YjԵ)u|L0 Gqy[7J&h*x!&kD a怀" 7s8捛1e)C E(F`־ؾپھ׾` fɄ KDEF zLp z pL[ fKɍKL?`  zL$݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ͱc־JjjjZ[ (`O>0O z PODEF޾ p  ޾ p($ذ z (0 k( L?ԦʚLeةީe s  pL f,FLk,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ kB94 l% fʽ  ՚,S` H H06172839h` z97L75v^e ?/( ze?L[LLɍ$?`?e ɍɥAH93827160hH46576879h`,C fL ɍ f ,S0 @ pLޭBYL 8!9 詍` "  4"/pŠϠŠà͠ӠàԠŠZ\]^_`abcdefghijklmnoJJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IջLLG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"(0`6708" = ***)< `I(;ˆ^8:$8c9r!MAhcR)~5 TbM&2f [㥕 c S7/?| "1D{8^C\[ qI _R:+ ȼ:بK3VҫJhc9Sf()J+!tO'B$B9$?zLXӡ6B1 S$|*(l3@JiAc d\F47 㤈l8Ð'r6qVixh *lr"2‰"*C3̣mBXhܡUǿPnNڥ/Fwۚ笙p(5䚘B0' Ь r,6A' @0̪0ƀhܳh=NȌH!B#&2`9j;2"c a!@ha" )ܘ:EHA@Q Yl!.<% [I390nj3Lm8n933LҞAAJL ةޘг uv $ 8LʞeЌ>?@`>?@`Ba8` K  LK ֟ ֟  KK`JJJJ8`轶K)` #hhLJپھ pHJh` H!h߻g޻tػٻpứ `޻ٻtػp߻8nٻniػtpiٻٻtụs໅o8ễpڻiۻniݻi>j?kܻڻ߻>ٻ׻pڻ׻Ii׻׻߻߻ڻ l 1ڻۻ `>i/XYjV) e :8` B ?`l׾ XYW0V)HW׾ؾ,WpHh_`)0%I0)3]8X^YȰ8` 8` p Ⱦɾʾ8`پھW)@%ZȾ pSԩ p`S$ @8gȾhɾʾg׾hؾ  p hgͺ칾`LCV)jC mMjà Lp `VJJ°LGLp :)< LQ : LQW)8VJưϥ3   `F`4W)ɐ3 zLG # e $L? b 4 kimljn`  pg׾mȾXhؾmɾYtѮȾɾ YX`8gS ST$I2 U)VJ :T)`l8`a HbIJhjǾȾɾ p٭b=a<I/q)im@^ʈ0 L/S 51-m@ʈ0 L٨/` E չ5L/A2ʩJ -V HrTJ6LGSL )AJ E @V n k38`J" Hʩ V HЧ H HЖabT)!J B8`@U)9VJ T)h*I/W)󩭙L=id =`H) +hJJJJ ɺi` [  ` . 8  `O`S  )AI-LG B C VW>m⻑>` !im8i仍nj廍ki滥lj绥oi>?Ek?>Q>> L>ܻ `/ e>>?ܻ?ޱ>Kpn͵ @p;=po:?Ek?!>Q>>>ڻۻ `` `>ڻ ۻ `e>>?ܻ?ܻ>?Emn(>e>ܻȱ>e?>Q>ؠ> ie>>?`׻;ػ=:<ٻ:<=;`׻׻mػ;>:8o>oȑ>ppȑ>> :oݻp` H,WpW)0پȾھɾʾ p p,Wp CL8`jÍ eN I 9 1黍׾껍ؾ컮  p p C H h(`׾ؾ`  ߭黍׾t8mؾŰ黪t껨 L8` ˌھپLp k V)@W0!XY \X6Y7` \ YX`X:Y;τ<:: <`:8` b ke eվ e'OV)Jj :f a ( z   A&ji Ҥ LLLLL[^)o `\o8` ԠŬLL,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~Tһ   LiLMTRӱüϠž(+@ABCDEFGHIKLMNPSV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0PENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND Hѫ5 FڬB :hQ|Q@@ -!S    !C- !ABELSDFRV@@ !$(19@E ۭ (8 mȾȾmɾɾʾiʾ` Lpl8l:/0sНsƬƀ#(ZZV4G_0=( A P FjL\5p-e9ABSAVERIFYBLOADELETEBYECATALOGOZ}ȾȾ󰹩 p` ־ǾҾ,G 8`׾ؾ ж p ධۥs׾tؾE` ( о(־Ǿ,G 8`_`W)H־JjjjhZ[ p̭ зLKǾ  . .8  ȾɾʾNfne }ȾȾI > Ie f`8` P־ǾҾ,G0C ж=W)_`ZV"׾پӾؾھ pD`Y׾ؾOW)Ⱦɾʾ pD`8`W)CB) 5W) )W)@! p:`V)R ޾,N0MHhHh p' P,N HCNh`M`M N `޾Lp h־Ҿ,G0^W)TP) ecfdپھ׾ؾӾ p$c d pccddީ 8` jЭW)`_ 㻍Ͼ pH Ph8`jGM㻝ﻭоM  GY):_Z`[蹀[:`V)8`MN; Ҵ;`;C Ҵ N8` YG)̀#:Z[蹀[Ǿ ph㻍Ͼ pH Ph8`Ͼо־ǾҾ_` [Ӿ pW) LC`C N `9V) ` V) ޾ p` (8` 8`8`(W)`_V)Ij!؍Í`_ eʾ`HV)jh츾$-#㻍Ͼ p о־޾Ǿ` 8` 8`ɾ)ɾ ɾɾ0miȾ p pY)`lP *,N!ǾȾɾʾ pǾ~H kh8`8`,C k  8` Ⱦ㻍ɾM$ mHɃ B ,  W ` z])Y 񩢍`Ⱦɾ0Ǿ p) : z6 E= =& =8Hh =` 6Y׾ؾ+پھ p|پɾL| Ly Lv Ӡֲ㮬f"f"C# "&i01h+# )#M8 % ) L"g# )L"@, )7(P0 ( @A p "M,Z(") \i ᘏi᫫8(`hhh8k-<ʆ>Q=?BC8 é&'112``+ H++ d+` w+ H+ d+`hh8`8`+++`}+`e`H)hJJ+0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <x0HH1HH rȱȱȱ0\aȱeek+ȱ+ȱ++ȱ++ȱ+ *+ + *`L@+ + * L) *Ș8e` ,$`ee` `&  LdDž )Pi)) () ))&-&),&͉&) ))&0)У` )ɥ`HZJ)  )zh %J)֭)n)}11J  2 (8`ɿ` (Xp< @ ( )m ( (. (( M (i  ``) '(j21 & &!` (&&(i)&)( CdBdDdFdGE ) ) ))) ))&$ >(,&& … >(ŅL 'JJJJ`Ϡ(8223 ')Д )18&"m11 2H22h2舌&&12H)M0 h1020I20h2 (`L%12 `\(#L  98" :ȱ)ɀ  ) ( 8 0 8  `0 / X   / &; Pb 8 )0`ddd1&… (n&Dž (\%T&Ln()8= (J 8(&(& >((ʎ1΋&΋&&3ʈ0 o 0堠خ YYZLYLY@뿭`d 8#@8` %MNЩUMߩ  L 5     m# m# J LB Qר)ɨ] оȱ ̀𩠙 i ȴ O Ѻ G \ ɟU ʿ V@$ A ɛL e '8 Jm ĠŠŠҠ`#{% F%Z]``e-.!0SB}/BiBB}/ gF/0k) y! ʿ  L##)4,- U JNT) )#L# ) f"` #K)D/ #3 &#'#(# ## iL X"0#"0prstuvwxyz{|}~8 )# f" +#$#0 &$#0 %# )ȍX#f"P# )ɂH#*# ) %)0I0hx H( , %Щ ߜ)#j )f 8'  )ɀآ <B*IBGF08Lé'+8H <,``h(`@ڍL3HEVhEhH)IWHPHHHAHHHLaVEWLӿ``LKL`BLL ޥޥޥޥޥޥޥޥޥޥޥޥޥޥޥ(C)APPLE xLLM Mh@8nЍLޭ 0J @,,L=#ٽJJJJ`Hͮhk)&NjNjNjN. 1Eͮ d8٭ u'Nۙ۰ڙک `Z8` 1# ` . . .8۰*J۩ ܝ`)َ 8ʈ` 0ٝ)i `8`O 鍮 dMمFمG ; ή0FG뮣0 ٭٭ٽ8`H8`  , 8`  ` < 0̩ 谾 }谹`12)1`0`Ȏi i ٞU`)8`` U _G *A)H ܝʈh٭0٭)ܝ٭*ܝ٥F٥G٭'ܝ٭(eHI dSBX0k }ٙiٙgFleʈ L`8m0`,0H hi MȽٍ0dGF8yאFG  }$0 *01 E8`100`n܍op L8D`F` EgH)HFȍlHGm %܍&܍ܢ8* J8` }L ܝ\)I 'ܝX`d8ipFnGo`d܅IH3H ( )ȱH`ά8c T)Ia)܍p*܍c'ܮ( 4 䭐 $H %HFFHGHG 됬`R8` )` cHq` _9܅IHHqqЍq  @`8 ` ͫ% ΫQ8`܅I lmq)5qI0ܢܽ n'c* 7FG (ef Ld܅Ip mcIH`  k0no cqHlFmG 밳lm 밨e%܈b"@ 0 $ LK8`X YI8`FHGH GF܌ עFܽܕF芝ܝ 밸XY Z܅I m[IHHyHȘI L`ܞ @@ @Ю׍q)mיqʈ@ȱ@ȱ@i 뎣`ةC8` @)0 e/N0 *ڽ0 ti` <; 뮣ٝ٘ 0 W,0 .H hȑNWȮّNW8`ٍّN0NN` G8`F뎰ڮЕ` } L ` r@>q)I38 kם`K8`@Nȱ@O@ eIiNȽבN)/ȩ/N`@Z VH:JjjjhA "'KI؍0JHl8` Q)T 22D) ɺi )?  }   ސ `@Hȱ@IױHXATȱH ɯȩ׍̰5H)/@a)_ .0 :A[8@`,@~@}J@` ߩ%S @ ~`E hhhߺ0 h߈ ߐ( ߐ ߐ   ޕ0 HϭߍLпlllhh@ihAiH(ؠȱ@JJJJq@)@ݔoȱ@Hȱ@Ah@@\e J) ހL JiB ހJ) @xNHHژHL(  ްʠx@BEOD  ް(`( C)CJJJlBJ,~P׽8H  ): e: y8鰕:Jjjj<)yאi8i;i(*=>hPם8`;Zx3Q`_^]ba`0h)ύh0HHHH " ׍hhhhhddhh .hh8`JIMJAYKERRY&MIKEٰ:`JJJJ9 d묣͸ dٍ0 u  `H8` `ٍyٍiB0H0FGy h0`FG `ϩBxEdD0C ް(`(8`ؑ@`M8`8@ؐʈI묤)8 La LةC8`؍)@ fi)8wJ ] ؅F LW) y+%J(^ FإGؐ,` JHIH I%FHGI   ܮ `J HH hh` 0@ tL)lL S_Xܝ ݝ0ȩFG  0` ܅F݅G ` \ Sͬ @ȅH@IL,0` rD }ﭩ: SH-)N 0 $q)@kP8` 2  dHqefe h`yٙ٭yٙ٩`H 1BFG 3%&N   i` ם0 B )( ȹ`8m8m@8` G8`F } r }P⭏)@N8`q)@J טyרםqq)׍q 밑 LȹL h(8H  h(8Hh(`ؑ@`@ȱ@ ` r@@8Wq ^鮣ٍٍٍHٍ8hqJJJJq2)q@` r%I -) 20@q)N8` @LL =@ ȹP8`ݼ@ʈL KIJHȢݼ ^魼)Jn 8  ؍ ؍ 2H8 ع)JJJJ Ȣ؝I؈)p )@ f ) yʩ ؝j0lm 밫 }nolmFG w嬤؍؍؝ ؝ q) q )حk͸ d`H@h`h``N8`  ) ⬤Ȣ؝@عiعi` )؍0CGHFHdBdFdGx ް(8hFhG`@4͔ L @Ai ׭2` . 0#ع؍0 <讣)`.@+ i 8` L )0 NLMO MІMEKݸP$MEK O,u PeNNO (` C  7 2JHIHI؊ aL-  ` ? H ع H ؙ؊IhHIhH a iع `  轘ؐ` Gؽ؝ G  G؝؈` ` H 1h)N@ ; L  $ )dJ S ) iH h8` ) )حJjIHIH؊ PLJʮ`QʱLN0MOMEKP.MEKӱL-M O,up莿eNNO(`JNKOL / P L8 a ?ؑJ`L@ȱ@ `@Nȱ@O`؝}ILL L e L  pJ )@NJOK iKK IJ v JФ̭JjHFIH HIGxKE ް((H vhH h8`8@ȭ@L쬤8NNO 8 ؍JLG.F $ ᭔ع+ؠ H  0h8` 䮣ٽ ٬ؠ@` ( j )8`)i п` H h)N$% FإG`,H hHB؅F  ؅GxDE؍00C ް(`(8` d뀧J  ! dH   9ؙ` r@ }P8`K8`B8` j؈qJJJJح) ) )Ю ЪJjHIH@=IؙJJ ?9 -4HIHI`JKJK`FHIG ( Ȣ؝؈JL)eKM`)` J Jͽ $0 άJFȱJL8`GBJ 6 FإG`BH 6 밽܅F݅G ` \) S$ L`LHH hFhG܍ݍ 8 `FHGH  hGhF`ݹܙ݊`@Bɼ>K@J5 V9X(K VXXK تKo`V8`no` "on VI9XX`)&HJJJh`OeNeO࿰ V9XГO`@ȭ@` ON <NJKO`?>х=d<<>=?Fby LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ  ɈL :Lɍ)ې)ɮ۰ɺH h 'L  ġLL ̹L)'L ȳL O'F ʻ ̹(((L $ʩ $$ $L `ީ % K@D E  / XʩXύX X %   % ɍRH hɛɘɉɈ $ Ld :Ldې)ɮ۰ɺ' Ld  : X ( % ɛ$ɘɉ 8V%֌&8V֌֠)HV)hH)hHIhդD?DRIDQD)҅; ?JDQD]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8``8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌1֍ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` *L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| ֽ ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+><>=?<>CAB@?A` 1 L  <>`ڢF]PL8i m L   6< L  BLRAM' hLDLHB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`eLJCAB@=?IJK,-NOPQRSu' @   !"#$ Ԡͭ ILBJ DքEdFCJJJJ֍nH}IC J֭֬։/)DI@+8`@Ae C!$|1OIح o âXoύX`1e0e21ʆe dk)i/ k Lkdha+ # nrdcddpqt$q0c)crorcc0enib ` r )pqn  Эht X l)lhЏL2  9 X [ J  dgdshUj" !# wgjdg. wg'g%s wghg%s w h ɍ1Ɋɋɉɛ kʽ/`L2LY g X` DAEMON2.1$ ځT@ip`ŊH L#bȈ れ2JɈ%i2X'c2&()㧌2ZȘ!1aj"72h$cO2Vh&㛌22*2ˈ,#2x+"".b2 @.b2wHȠ+E>_80&I L+'Ƀ#ɑɓ0aa`abaa`؆ `aaa`a`ab  `   0`NF؂@/F& Lr12Lbфdޤqs aAa#H hȌ(aDataa-" `}žp3$Cv//?s+jldr E?aM \4J$v8Ī/s+q: xDOd6<۳I8W!1xHCH1~-9F/93(( qM9e@iG;eڔqCg1o!bAI& 2.4H2@ < Ф3fD͛mM1GqiS A9;)z4"2Xc0:lLݡ%xb Z" 4iH4 {Blt+R’C&Zeðz Iɒ*nq_C;1,Ⱦ9T v[$n-&z;ݳT>l'Lho K\CpE n8k.ۼx!Q{Z$9Z9<8諃܈ft~xx3|oƪB|fͱL6]yOa9o%|ݝCȨ@LP$l3GRMV: 1ȁ \^ǏIzw",XDĬ%VmXU0 X@ Z4-( `%5\VghG'BB)o,uC)ErfThmjqSHbg 7T<dPÒu msCX) .n۔ kզ@)cIP|u4ߵN`CL}(Z' EmKTW2FqR"֓[+$FPGZ(pIA`@%)dn `ٺ11:KZc]t W ڑR7GVaʊSɰoGDYnBAB-؃>ݡ i Hs>I3꽁+M"b!;,Iӣ#If#+"$9gXH1rF} `f#<5iNQ*ㅤ-!gؐh @eP7ímAH xCYaD|'w@l6!KũҜS-*)W /"{ h:,`'=C' \)" $A_xXc)pq Kl< >&c0$]Uҧ #bjmbX $`X o\??G2Y0r0Q@^. $~ ThA <9#Z; T1dCDG ϒhE* #T1F@G0 $Z/@$6C1ܙLlP4: c HTLE6+ hA `PC =TDNF @/`YYCLOCKffح*` ,`9`E`4 t` ` R`#$ R`:%&'` 08 0 0``` L A=PEEK(49025):CALL (A*256+6) A=PEEK(49025):CALL (A*256+3) A=PEEK(49025):CALL (A*256) !#1 TEMP 2 #2 COMMANDSu#'  #'  'DON!# DOFF!# DREM!# INSTALL.BIN!#` INSTALL"!# +INSTALL.BASDON UTILTITY FOR SHELL7 COPYRIGHT 1989-2003NBY MICHAEL PENDERj (4)"OPENCOMMANDS/DON"(4)"WRITECOMMANDS/DON""A=PEEK(49025):CALL (A*256)"((4)"CLOSE"Nح;@` 14`;`aaaaaatE`` `AaAa<5AaBaBa<&Ba<`SAVE TEMP INSTALL.BIN INSTALL.BAS ) _! - - ( bytes to 5"h h h LȹF F ( @ $` (Creating ȹF F ` +́+ ͂++6 (Bad CRC! This file has been corrupted. R( 7(Ln#` ++- )+- )+-L) + ?#$ n# (Press a key... 7(+/ ++ ) b+ʭ+ ) b+ʭ+ ) b+ _! $л---- +--- + m" #L ?#$0 ) q+0`4--- +)8@F [+)F [+ , " " - " --H-H-H ++- )譂+- )譃+- ) " m" û-L'L 0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDE0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEX '-- V'H hCL#UL QX X e- + , + L')-%" " q! + "@--- PRODOS"# PD$"BRUN PROTYPE.COM"G d20:"CHOOSE A PROGRAM:";:A$:d nA(A$)48:A$"9"AA7x pA$"a"AA32 sA$(13)150:A$(27)160:A1100:AZ100 x2A::6:" "N$(A)" ": 20:868:10:"-= ONE MOMENT PLEASE =-" D$"PREFI: D$(4):D$"PR#3":::" "::N$(20),SD$(20),PN$(20)C200L40qZZ1:N$(Z):SD$(Z):PN$(Z):30{(ZZ12XX1Z:XX$(XX):XX9XX$(55XX)<" "XX$") "N$(XX):A216,0 F17:"[ESC] QUITS TO APPLESOFT":"[RETURN] QUITS TO LOAD TEMP" 535)200 LA(A)D P:"Frequency (0-255, 0 being fastest) ";F[ U(F0)(F255)200f VF(F)y ZA0AA65536 _XR24584:YR24586:AR24588 dAR,(A256):XR,A256(A256):Y,F n24577:200 "ERROR - NO COMMAND LIBRARY SET" (4)"" INSTALL UTILITY FOR SHELL < COPYRIGHT 1989-2003TBY MICHAEL PENDER (:"ARE YOU SURE YOU WANT TO INSTALL A NEW"2"TASK DRIVER? (Y/N) ";:A$:<(A$"Y")(A$"y")200F:"Address? (in decimal please) ";A K(A65535)(A65"L )9- _!@--- +)K- [+@L_!--L+-i<-i=<<==ɷ` t#L#- -- #`--- ̧-`L') + + & , ƽ#L')-%" % &-0--- --H-H-H -8h-h- h-L$hh N" , " $- -L$ "$ L#/+ ) [+ʱ+ ) [+ʱ+ ) [+ * T+ $ ++++ * T+ + #$0L# t# (Press a key... 7("L 8--Hihi0`8----0` +9- b+ TX"SD$(A):D$"-"PN$(A)& D$"BYE":0 ::H START OF FUNSTUFF :" The Utilities Disk Vol I ";::36:"a fine assortment of mostly useful programs!": +  Copy ][ Plus 8.3,COPY.II.PLUS,UTIL.SYSTEM  DSR utilities,DSR.STUFF,STARTUPEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDE-- ĩ- -`L') 6--- --`-FiLeStArTfIlEsTaRtABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789() F 0F  F  F 0123456789ABCD (Enter )$ (pathname of file to convert:L`, (prefix to store conversion: -- (-> ȱ  7( ɠɍ7ɛ$Ɉ (L,@ L, f( L,L,L -G:) ȑ-,---` ȋ--`)}+ [+)~+ [+)+ [+)+ [+}+ q+Fn+n+n+`Lb+`--`?K-`ABCD ˟-L')-F---` ʗ-L-͛--͜- L')---0-`-)@ii me Directory Full!L*N (File Locked!L*R (Non-ProDOS Volume!L*W6 (More than one volume online with the same name!L*H (Internal Error! ProDOS Code = h 7( n#L +.+.+&)?K-)}+}+ b+~+ b++ b++ b+H'X)` X (BinSCII v1.0.3 Copyright (C) 1989by David Whitney.Select function:C)onvert a ProDOS file to TXTU)nconvert a TXT file back to ProDOSQ)uitWhich -> L7(H< =i@F  F b+L &`+F )i0:iF ʥ)jjjji0:iF ` (There are too many files!Break the source file up intopieces smaller than 3 meg. R(L (Which Newline mode?1) CR (for Apples)2) LF (for UNIX)Which -> 7(H h1+K- b+@ T+ + %-- - % - %-+ )转-+ )转-+ ) * +-+ )-+ )+ ) *+++ * T+L+-+ )-+ )-+ )L*  ɯȽ F   ȩ.F ȌF ` b+  ɯȽ )F b+ +  ..Diversi-Copy 5.25,DSR.STUFF,DCOPYT  ..Diversi-Copy 3.5,DSR.STUFF,UCOPY}  ProTERM 2.1,PROTERM,PROTERM.SYSTEM  ACT,ACT,ACT.SYSTEM $ PBH Packer 3.3,PACKERS,PBH.3.3 . DigiPack GS,PACKERS,DIGIPACK.GS 8 UniSplit,PACKERS,UNISPLIT B BLU 2.28,PACKERS,BLU2.28E L ShrinkIt 0.95,PACKERS,SHRINKITh V BinSCII 1.01,PACKERS,BINSCIIwhich will run in the background, transparent to the user, in effect multitasking. What actually happens: Sixty times a second the mouse card generates an interrupt. In response to the interrupt Prodos calls the Daemon driver to process the interrupt. BES a mouse card, but not a mouse. Future versions of Daemon (3.0) will be designed to access clock cards, should a mouse card not be available. Daemon is basically a programming tool to allow people unfamiliar with interrupt processing to write routines ltitasking applications on the IIe, IIc, and Laser series of computers. At this time Daemon does not appear to like the mouse cards of the apple IIgs, hence amusingly enough, Daemon only provides multitasking on computers older than the gs. Daemon REQUIR this to bulletin boards, user nets, among friends, etc. I ask that companies that would distribute my products clear it with me first (read that permission required in writing.) Daemon is an addition designed for the BASIC.SYSTEM environment to allow muMichael's Daemon v 2.0 - Copyright 1989 by Michael Pender This product is shareware. If you use it often send me $30 to cover the time I spend writing things like this. If you don't like it, give it to someone else. People should feel free to distribute"INSTALL UTILTITY FOR SHELL < COPYRIGHT 1989-2003SBY MICHAEL PENDERs (4)"OPENCOMMANDS/INSTALL"(4)"WRITECOMMANDS/INSTALL""SAVE TEMP"("INSTALL.BIN"2"INSTALL.BAS"<(4)"CLOSE"NDREM UTILTITY FOR SHELL8 COPYRIGHT 1989-2003OBY MICHAEL PENDERl (4)"OPENCOMMANDS/DREM"(4)"WRITECOMMANDS/DREM""A=PEEK(49025):CALL (A*256+6)"((4)"CLOSE"NDOFF UTILTITY FOR SHELL 9 COPYRIGHT 1989-2003PBY MICHAEL PENDERm (4)"OPENCOMMANDS/DOFF"(4)"WRITECOMMANDS/DOFF""A=PEEK(49025):CALL (A*256+3)"((4)"CLOSE"Neing an interrupt generated by the mouse card, it is not necessary to clear it, it will clear itself. The installer for the individual tasks sets a calling frequency of 0-255, where the frequency is the number of interrupts to SKIP between each call to the driver. Daemon in turn issues a JSR instruction to the entry point for each installed task in turn, and WAITS (read that: DOES NOT INTERRUPT AGAIN) for each task in turn to issue an RTS command, at which point Daemon calls the next routine in its list FTER CALLING RMMTVEC!!! You must reload Daemon. $4009 ADDVEC - JSR here to add a new task, Daemon takes care of this for you. On calling the X register should contain the lsb of the task's address, the A register should conatin the msb of the task's ects" it by using the SEI instruction to ignore interrupts. A CLI instruction would clear it, or a person can call the CONNVEC routine. $4006 RMMTVEC - PERMANENTLY remove Daemon. This also removes the prodos interrupt vector, so DO NOT CALL CONNVEC A- vector to reconnect Daemon if it has been disconnected, or to start in the first place. Daemon does not active itself on loading, just in case it would conflict with other commands. $4003 DISCVEC - vector to TEMPORARILY disconnect Daemon, it "disconnand relocates the important code to protect it. Q. How then does one find daemon to install their own tasks? A. Get the MSB of interrupt vector #1, it will be the msb of Daemon. The access to Daemon's functions is handled using vectors: $4000 CONNVEC as Prodos is concerned DAEMON is no longer present, and as soon as 255 interrupts go unprepared for, the system will crash with System Error 01, unclaimed interrupt. The included files: Daemon is the task driver, as stated earlier, it loads in at $6000, does not activate until called through the CONNVEC vector. However, it is not the CONNVEC routine that allocates the Prodos Interrupt driver. This means if the permanent disconnect routine is called (RMMTVEC) and then the CONNVEC vector is called as far its buffers). If no error occurs it relocates and protects itself. IT DOES NOT ACTIVATE INTERRUPTS ON LOADING. This was to prevent the program loading it into memory from suddenly being subjected to an interrupt request it was not prepared for. Daemon into the interrupt table after another routine had been established the first task would no longer receive interrupts, Daemon would intercept them and declare them as it's own. If it is not present it requests 2 pages of memory (512 bytes for itself and g interrupt routine at $BF80 (the Prodos interrupt driver table). If a routine already exists, Daemon will not load. This program is called a "Daemon" because it is a spurious interrupt driver, it accepts all interrupts. If it were to be forced to load ing features not otherwise possible, and to BASIC it all just appears as a card in the computer. But I digress... This version is loads into memory at $6000, and determines whether or not it is already present by checking for the existance of an existin actually existing as a physical device in the computer. This is a side-effect of multitasking, but is an important effect in and of itself. Routines can be written (and are being written) to allow generic modem, printer, screen and keyboard drivers, addal slot in the machine. In a similar fashion, the SHORT routine under SHELL performs a hardware function, without actually existing as a physical device in the computer. Similarly, a routine called SOFTKB installs some advanced keyboard features without (maybe even the gs and the c+, I don't know yet) can act like it has a clock card, even if it doesn't. This is the effect of a feature I call a softcard, a non-physical device which performs the function of a physical device, but does not take up a physicuntil no more drivers remain to be called. As of version 2.0 Daemon supports up to eight parallel tasks, in addition to the foreground job. To the user this means they can have a little clock in the corner of the screen, or that their IIe or IIc or Laseraddress and the Y register should contain the frequency at which the routine should be called. Y = 0 signifies call every 1/60th second, Y = 1 signifies call every 1/30th second, etc, up to 255 which is call every 4.25 seconds. On exit, if the Carry is clear, the routine was added, if carry returns set the table already contains the maximum number of eight tasks. The manipulation of the vector table is not the best, but it works. The y register will contain the task number assigned 0-7, this woح*` ,`9`E`4 t` ` R`#$ R`:%&'` 08 0 0`'Ƀ#ɑɓ0aa`abaa`؆ `aaa`a`ab  `   0`ح"-PK9` AO`a"a+a6a9a>aAa#H hȌ(aDataa-" ` to where improvements could/should be made. I never really hit it off with modems, anybody want to write a modem driver for the SSC card and save me doing it? modem driver. Please remember, this version of the program is submitted for testing only, I will write a version that relocates and protects itself and upload that soon, this is merely to show what I've done so far in the hopes of obtaining suggestions asupt processing. The clock routines presented here are merely an amusement, if I didn't have a lab to do for tomorrow I'd write a keyboard buffer routine with or without keyclick for those that want it, and maybe take a crack at writing a print spooler or f this program lies not in its ability to do trivial tasks, like placing a clock in the corner of the screen, but as an addition to the BASIC programming environment that allows one to write simple programs and not have to worry about the details of interrll, you must BLOAD INSTALL.BIN, then run INSTALL.BAS. SOFTCLOCK - Install a prodos compatible clock in your computer, based on the interrupts generated by your mouse card. It keeps good time, even with disk accesses. The power os, and calling frequency. For example, from the monitor: *2000: EE 0 4 60 Then from install just choose address 8192, frequency 0 and the upper left corner will cycle incessantly. **** If using SHELL just type INSTALL, if not using sheProdos compatible clock cards, and does not require Softclock if you have a clock card installed. INSTALL - If you have a routine you want to try as a background task use this install command, it will prompt for the addres - SHELL command to remove Daemon from memory, do not use DON after using DREM, it must be reloaded. CLOCK - Reads the Prodos time and puts a little clock in the upper right corner of the screen, this will work with to force it to a value between 0-7. It will then be removed from active service. The other files: DON - SHELL command to enable multitasking. DOFF - SHELL command to temporarily disable multitasking using the DISCVEC routine. DREMuld be necessary should you decide to terminate the task (it is not necessary to terminate DAEMON to remove a task). $400C REMVEC - Load the accumulator with the value of the task routine to remove and call here. The value passed will be anded with 7 $"F"R$(JD)RR$:JDJD1D(, CA$"S"TY$"DIR"R$(JD)RR$:JDJD1(. JDLI1ė:(7);(7);"FILE LIMIT OF "(LI)" HAS BEEN REACHED":"HIT ANY KEY TO CONTINUE AND WAIT":Q$:Q$:3395(4 TY$"DIR"3280(> D$"CLOSE ":3240(C BK$(H D$"CLOSE")R2547066"-"::6@6850'6JT$16T6830;6^6820T6hT$:PSLOT3ĺ:5500^6r6860l6|J055606D1JA:DD$"":F0A1:GDF:IF G > J THEN 55306E$(((R$(G),17)(BL$,15)),B)(32)(32):DD$DD$E$:F7I1(DD$):((DD$,I,1))3(A4)18(A5)21(A6):5390'5A155610O5 3.50-INCH DISKS - LP=1Z5A25y5ILJA:IL(IL)(IL(IL))5IL21B197(A3)10(A4)12(A5):53905A556105PSLOT3ĺ(4)"PR#3":54805(4)"PR#";PSLOT5"68106,LPP***** PRINT LABEL FOR ONE SIDE *****14Z:h4d:"PRESS RETURN TO BEGIN... ESC TO EXIT";:Q$:Q$|4nQ$(13)ī52504xQ$(27)ı4LP5330,52604 5.25-INCH DISKS - LP=24A264ILJA:IL(IL)(IL(IL)) 5IL13B309(A3)153!3***** ADD NAMES *****F322:868:"ADD NAME: ";:"";QR$Y3QR$""5140:c3 51803QR$(QR$" ",20)3QS$"":I120:QS$QS$(((QR$,I,1))128):I3(IJDL1:R$(I1)R$(I):I32R$(DL)QS$:JJ13<)4LP141İ5000:2V478062*** DELETE NAMES ***>2I12(R$(I),2)" "R$(I)R$(I1):22:3940(COL80):I:KI1J:R$(K)R$(K1)::JJ1:50202J0J0:50702DLJDLJ2II1:IJ50202(R$(J),2)" "JJ1(J0):50603%(JN%))N%.05):DLJDLKLN%(DLKL1)1:4600:4790d1P149DLJİ4500:DLDL1:4600:47901$P149DLJİ4500:DL1:4600:47901.P193İ5110:360018P196R$(DL)" ":46101BP197İ4400:36001GP210İ5000:47702,0P136DL0İ4500:DLDL1:4600:4790^0P138(DLN%)J1İ4500:DLDLN%:4600:47900P138(DLN%)Jİ4500:KL((DLN%(DLN%))N%.05):DLKL1:4600:47900P139(DLN%)0İ4500:DLDLN%:4600:4790:1P139(DLN%)0İ4500:KL((JN EWRITE; TO MENU")/34,35/DLDL1E/3600:4600b/22::J;" FILES LISTED"r/21::868/R$(DL);" ?";(8);/P(16384):P1284810/16368,0:P218PP32/P136DL1J0ī47900P136DL1İ4500:DLJ:4600:4790)4!. 1403,HC1:36,HC1:VCa.*(R$(DL),112(N%5)6(N%4)13(N%3)13(COL40))" ";g.4m.>.\*** EDIT/ADD/DELETE NAMES ***.f.pCOL80ĺ(4)"PR#3".zCOL40ĺ(27)(17)/:"USE KEY: TO MOVE; ELETE; DIT; DD;l#-***** NORMAL PRINT *****)-E-VC:1403,HC1:36,HC1-(R$(DL),112(N%5)6(N%4)13(N%3)13(COL40))" ";--***** INVERSE PRINT *****-- HCA(DL1)(132(N%5)6(N%4)13(N%3)13(COL40))1.VC((DL1)N%M)R$(M1):R$(M1)TM$5,MB(L)1:LL1:L03830;,W,0***** EDIT NAMES *****},:22:868:"CHANGE TO: ";:"";QR$,DQR$""4440,N4460,XQR$(QR$" ",20),bR$(DL)"":I120:R$(DL)R$(DL)(((QR$,I,1))128):I-I)R$(M1)3870%+2NN1:IN3920=+<R$(N)R$(M1)3890g+FTM$R$(I):R$(I)R$(N):R$(N)TM$:3870x+PIM1II1+ZNM13950+dTM$R$(I):R$(I)R$(M1):R$(M1)TM$+nLL1:B(L)I+x3830+NM24000+R$(M)R$(M1)4000,TM$R$(M):R$(*jF*t*~DM*Q$"D"Ģ23:5:"HIT ANY KEY TO CONTINUE ";:Q$:Q$S*t****** SORTING ROUTINE ******:10:11:"SORTING ";J;" ITEMS"*L1:B(L)J1:M1*NB(L)*IM1* NM33970*M1((IN)2)*II1:IN3920+(R$( JDJD1:JJD%)\ CT$"FRONT"İ630:)f CT$"BACK"İ760@)p a)***** DISPLAY CATALOG *****g)u)$J03730).D0J1N%)8F1N%)BDFJDFFI%ĺ:3720)LDFDLĞ)V(R$(DF),112(N%5)6(N%4)13(N%3)13(COL40))" ";*`1ĺ(DD$,I,1);07I:: IF G > = J THEN 556077Dn7PSLOT3Ģ23:"HIT ANY KEY TO CONTINUE: ";:Q$:Q$~7(12);:A$7RESET$7PSLOT3ĺ(4);"PR#0"7:7:10:"SIZE OF CATALOG MUST BE LESS THAN "(5(LP2))(218(LP2))"8D"ENTRIES TO FIT ON LABEL":N15000::J8N***** PRINT COMBINED CATALOG *****Y8XLP257508b22:"ONLY FRONT SIDE OPERATIONAL FOR 3.5-INCHDISK DRIVES. HIT ANY KEY TO CONTINUE:";:Q$:Q$8l8v:9:"PRESS RETURN TO BEGIN... ESC TO EXIT";:Q$:Q$JA:IL(IL)(IL(IL))1F0/IL50BA:12100?F:/A:12610_FD/PSLOT3ĺ(4)"PR#3":12480tFN/(4)"PR#";PSLOTF0I13::F06830:6880F0" "((N$" ",6)T$,TL)::PSLOT312500F0LD$"(5.25-INCH DISK)":LP1LD$"(3.5-INCH DISK)"#GORKS/MISC"+E,'" Select :";:Q$9E.'Q$"1"ıKE0'Q$(27)ġ:`E2'Q$"1"ġ:12010uE4'Q$"9"ġ:12010E6':13000E. *** LIST CATALOG TO 8.5X11PAPER ***E.::D$"FRE"E.10000E/:"INPUT DESCRIPTIVE TITLE: ":DP$E/A13F&/IL/HAWKE/APPLEWORKS/DEVELOP"ND"'"5) Print to File /HAWKE/APPLEWORKS/PRODUCT"~D$'"6) Print to File /HAWKE/APPLEWORKS/GAMES"D&'"7) Print to File /HAWKE/APPLEWORKS/EDUC"D('"8) Print to File /HAWKE/APPLEWORKS/FONTS" E*'"9) Print to File /HAWKE/APPLEW"Q": COMPRESSED PRINT - 17 CPIB0 DS$(14)(27)"Q": 8.5CHARS / INCHB: CL$(15)(27)"E"(27)"z"(27)"A":CLEAR SPECIAL PRINTINGBD LS$(27)"T""12":SET LINE SPACING AT 12/144 OF AN INCHBN SS$(27)"Q"(27)"x":CONDENSED SUPERSCRIPT"CX SI$(27)ȲSUPERSCRIPT:ASI$(15): COMPRESSED PRINT - 16.5 CPIZAHL$(14): 5 CPI HEADLINE`AA *** SET PRINT PARAMETERS FOR IMAGEWRITER II ***A PR$"IMAGEWRITER II":PR2A RESET$(27)(99):RESET TO POWER UP STATEB& FL$ = CHR$ (27) + "H" + ISET FORM LENGTHP@hDS$(14)(15)(27)"G": 8.25 CPI IN DOUBLE STRIKE MODE@rCL$(18)(20)(27)"F"(27)"T"(27)"H"(27)"2":RESET TO STANDARD SETTINGS@|LS$(27)"A"(6):SET LINE SPACING AT 6/72 OF AN INCHASS$(15)(27)"S"(0):8010,8210,8410,8610,8810 ?lL?L "EPSON W/ GRAFTRAX+","IMAGEWRITER II"X?~ "END"?@*** SET PRINT PARAMETERS FOR EPSON W/ GRAFTRAX ***?JPR$"EPSON W/ GRAFTRAX+":PR1?TRESET$(27)(64):RESET TO POWER UP STATE @^FL$(27)"C":49296,EP: $;:#>*** LABEL SELECTION ***5>CT$"BACK"ıJ>LPLP1(LP2)2\>LP6930,6940>LABEL$"2.75-IN SQ LABELS":IW$"0408":EP17:TL22:7000>LABEL$"4 X 1.5-INCH LABELS":IW$"0192":EP8:TL31:7000>X*** SET PRINTER PARAMETERS ***?bPRATALOG MUST BE LESS THAN 66 ENTRIES TO FIT ON LABEL.":N15000::b=*** PRINTER SETUP ***=RESET$;FL$;:49296,EP::- POKE FOR EPSON ONLY =RESET$;:=DS$;:=CL$;:=LS$;:=SS$;:=CL$;LS$;SS$;:=CL$;SI$;:>HLL$,15)),B)(32)(32):DD$DD$E$:FU ";O$:O$""O$I$".TXT":16B (O$)214w ::"Please hold -- Constructing Text File":: OP$"DELETE.ME":CL$:D$"delete DELETE.ME":OP$"DELETE.ME":WR$"DELETE.ME"B"NOMON":"LOAD "I$:"63998 POKE-16368,0:?"QT$OP$O$QT$" text copy of your program"::7)"o Allows you to write a sub-routine that you can EXEC into new programs." ::"Input the pathname of the file to convert into text:":"> ";I$:(I$)1132 :"Input the pathname of the Text file to save to: ( e, and convert it into a text file."::"This offers many uses:"::7)"o Allows for easy editing of file, which can then be EXEC'ed to restore":9)"the file.":n 7)"o Allows for you to print out copies of your program."::7)"o Allows you to save aP$D$"open ":WR$D$"write ":CL$D$"close":QT$(34):D$"pr#3" 29)"Basic To Text File Program"::34)"By Jeff Tarr, Jr."::19)"[AppleSauce BBS 212/721-4122 3/12/24 baud]"::I140:"=-";:::34,8 :"This program will take a BASic filPREFIX":P$8 15::958:"WRITE FILE TO ";P$;"? ";@ A$a A$(27)Ģ15:1:958:1210| A$"Y"A$(121)1350 (15::"PLACE VOLUME TO WRITE TO IN S";SW;", D";DW1:"AND PRESS A KEY..."; 2A$:A$ <1270F15::"OUTPUT FILE NAME: DISK.FILE";:18:" ";F$>PF$""F$"DISK.FILE":16:19:F$UZ(F$,1)"/"1390jdF$(F$,(F$)1)wnF$P$F$sFGė:" READY TO READ A DISK."::" INSERT DISK AND PRESS ANY KEY. ";:A$x READ A PRODOS DIR. I1$"T"TP1TP$"I"+TP2TP$"A"=TP4TP$"B"OTP8TP$"S"bTP16TP$"R"uTP16TP$" "{ POKE MACHINE LANGUAGE 768,32:769,0:770,191:771,128:772,11:773,3774,141:775,10:776,3:777,96 779,3:78130,4440,4450,4460,4470,4470,4470,&Q:I<0D$;"CLOSE"b:1:1:"DOS 3.3/";::"PRODOS";:h?uDA$(0):NNUM$:X(A$(I),(A$(I))1):b(A$(I),1):lOS$:v" ": ASSIGN FILE TYPE TP128TPTP128TP0TPA$(27)4255*A$""A$(0)" "7A$(0)A$nLĺ" NO FILES FOUND! RECORD ABORTED!":4410 WRITE DOS FILES 3:1:868:"WRITING..."216,128D$;"APPEND";F$I1LFL0ILQ1W1"(797Q)4420,443:1:868B:6:"ADD A NAME TO FILE NAME FIELD:":8:2500A$(27)ė:"RECORD ABORTED. NO DATA WRITTEN TO DISK":I12500::4410A$""4295LL1A$(L)"*"A$FA04320:6:"ENTER A VOLUME NAME FOR DISK TITLE:":8:2500OO29@A$A$((I))!JST(A$,2)(160)(160)A$(A$,(A$)2):4180[YA$o^TP(O1):4500cA$(L)TP$A$hENTRYENTRY1rENTRY7ī4090|SS1S04035OS$"DOS 3.3":4((L)))L" FILES FOUND.":I12500:ENTRY0L0Č998:5)%1@MT(35851(35ENTRY))RMT255ī4200pMT0ī4235:END OF FILESMT34ė:"NOT A PRODOS OR DOS 3.3 DISK.";:I12000::OS$"NON-STD DOS":L0:4240LL1"A$(L)"":A$"",O35854(35ENTRY) 6II115:BK(I):X143,142,142,141,141,140,140,139,139,138,138,137,137,136,143}3:1:868:"PROCESSING..."::ENTRY0((S2),2)".5"S15S0BH140:4060BH139782,BH:783,BK(S)768(778)39ī70000::1797Q)3080,3090,3110,3100,3120,3130,3130,3130: Q:I@ Y (P2$,2,(P2$)2):e NUM$:z ZZ1ILĺTP$:! (A$(I),18,3):& ZZ1ILĺA$:+ (A$(I),2,15):0 OS$:: " ": READ DOS 3.3 DIRECTORY S15:L0:216,0$(27):  AA$(32)ī2535: A$A$AA$:AA$;:2535M( (A$)0ī2535a2 (8);" ";(8);< (A$)1ĺ(8);" ";:2520F (A$)A$(A$,(A$)1)P 2535 PRINT TO TEXT FILE  I1L FL0IL:NO FILENAME FIELD Q1W10 (1)" "A$(A$,(A$)1):22508S$(S1)P2$A$"/":W KEYBOARD STRING INPUT  :23:" ALONE ABORTS ENTRY.":" ABORTS RECORD WRITE."; A$"" 8:1 AA$ AA$(13)ı AA$(8)ī2600  AA$(27)AY...":A$:^L22200a::"WRITING..."DfD$;"APPEND";F$Nk3000VD$uCSCC1:P2$S$(C):2040D$;"CLOSE":S1" DIRECTORIES/SUBDIRECTORIES,":T" TOTAL FILES (EXCLUDING DIRECTORIES).";I12500::1:3:958:(A$,T:6:"ADD A NAME TO FILE NAME FIELD:":8:2500UA$(27)ė:"RECORD ABORTED. NO DATA WRITTEN TO DISK":I12500:::240VA$""ī2140WLL1:A$(L)A$:TP$"***":ZZ1 \LSė::" NO FILES FOUND!"::" PRESS A KEA$  A$Q*(A$)(A$,3)"BLO"(A$,18,3)"DIR"LL1:A$(L)A$:(A$,16)4(A$,18,3)"DIR"A$(A$,2,15):2250:I0S:S$(I)S$(S1)Ă:SS1>(A$,3)"BLO"2080HTTLMD$;"CLOSE";P2$R:4((L)))L" FILES FOUND.":I12500:47:L(I),S(I):/C0:S0:ZZ0:T0:216,128W15,2,3,18,4,25,9,31,9,48,6,66,7,73vD$;"PREFIX,S"SR;",D";DR1D$;"PREFIX":P2$L0:OS$"PRODOS"D$;"OPEN";P2$;",TDIR" D$;"READ";P2$:3:"PROCESSING..."A$:P2$:A$:,0:784,0" ONERR ROUTINE }814,104:815,168:816,104:817,166:818,223:819,154:820,72:821,152:822,72:823,96 DEFAULT FIELD ORDER 798,3: FILENAME ONLYI07:806I,0: p SELECT RECORD FIELDS zV10:H2:U111:U28:D110:D2210W1:FL0:FG0:FA0:NUM1e4:1:958:4)"SELECT FIELDS IN DESIRED ORDER"5:"SELECT WHEN FINISHED"10:"< > DISK TITLE""< > DISK NUMBER""< > FILENAME""< > FILE TYPE""< > DOS/PRODOS O/S"20:14:"PRESS A KEY";:QW$& H14. V77 NV0D (TMR2000L 2:` <NT((1)11)1 FNT80,90,100,110,120,130,140,150,160,170,180 PAN$"F":NVV:190 ZAN$"E":NVV1:190 dAN$"D":NVV2:190 nAN$"C":NVV3:190 xAN$"B":NVVA:::17:"G CLEF"::17:" BY":11:"TINT1 OF AppleLink"7:"The folowing program is one that will sharpen your skills at naming the notes of the TREBBLE CLEFF. Valid commands" "are C,D,E,F,G,A,B,C,D,E, F (of course) and Q for quit.":)u)u)u$)uD$;"CLOSE"*)uXIT PROGRAM? N";(8);($'A$B(.'A$(13)A$"N"A$(110)220T(3'P1$""10050m(8':(4);"PREFIX";P1$w(B'::(0uD$(4)(:uD$;"PR#3"(Du" "(NuD$;"OPEN /RAM4/DISK.FILE"(XuD$;"READ /RAM4/DISK.FILE"(buI148(luJ13)vuA$:A$;" ";NNOT FIND ";P1$B'n#:"PLEASE MOUNT VOLUME AND...PRESS RETURN."Q'x#A$:10000o'#ER5A$"BLO":2110:240'#:"ERROR # ";(222);" HAS OCCURRED."'#:"LINE #";(218)(219)256'#D$;"CLOSE"'#:'' EXIT PROGRAM ''216,128('::"ENERR HANDLING $&2#ER(222):8144&7#ER89050q&<#3:1:958:"NOT A PRODOS DISK. ATTEMPTING DOS 3.3...";&F#D$;"CLOSE"&K#I11750::1:1::"DOS 3.3";::"/PRODOS";&P#4000&Z#ER6ER79090&_#QQQQ1:QQ2ĺD$;"PREFIX/":'d#::"CA PROTECTED";:I13000:.%gOS$"PROTECTED"8%l4240S%4! INPUT DISK NUMBER _%>!FG0ı%H!:1:10:"WHAT IS THE DISK NUMBER? ";NUM;%R!25:" ";NUM$%\!NUM$""8570%f!NUM$(NUM)%p!10:26:NUM$%z!NUM(NUM$)%!NUMNUM1%!&(# OĖ1:3:958: $5100:60006$I;" = TITLE =":W$I;" = DISK NUMBER = ";NUM:r$I;" = FILE NAME = ":$I;" = FILE TYPE =":$I;" = DISK OPERATING SYSTEM =":$I;" = BLANK =":$X PROTECTED DISK %b::"THIS DISK APPEARS TO BE#d DISPLAY FIELD ORDER (#n10:15#xI1W1k#(797I)6600,6610,6620,6630,6640,6650,6650,6650q##4:1:868:"THIS IS THE ORDER IN WHICH THE FIELDS":"WILL BE WRITTEN TO THE TEXT FILE. OK? Y";(8);#A$$A$"Y"A$(121)A$(13)ILETYPE!"Q2FG1:FILENAME8"Q1FA1:DISK# K"W;(8);:WW1U"6150j"  QUIT SELECT w"W1W2"4:1:958"#FG6500"("STARTING DEFAULT DISK NUMBER? 1";"-4:31:"";A$"2A$""Ģ4:31:NUM;(8);:6500#<NUM(A$)(805Q)1ĺ"":6150:ALREADY SELECTED! 797+W CONTAINS THE ORDER OF SELECTION. E.G. 797 IS THE 1ST FIELD, 798 THE 2ND, ETC. 805+Q IS TO MARK A FIELD AS SELECTED. EACH FIELD CAN BE SELECTED ONLY ONCE PER RECORD. !797W,Q:805Q,1 "Q3FL1:F27İ5100:6000: RESTARTS4 .AU1AU26240H 8AD1AD26270W BA136300l L"":6150:BELL{ `V10V19 jVV1 t6150 ~V18V9 VV1 6150  CARRIAGE RETURN V186410 W86220 QV9:QIS FIELD)!"< > BLANK FIELD"-"< > BLANK FIELD"D"< > BLANK FIELD"^"< > QUIT SELECTION":"USE ARROW KEYS AND TO SELECT":"PRESS TO START OVER, AGAIN TO EXIT"V:HA$:A(A$)A27W1İ5100:10000:6000 $A4:190 AN$"A":NVV5:1908 AN$"G":NVV6:190P AN$"F":NVV7:190h AN$"E":NVV8:190 AN$"D":NVV9:190 AN$"C":NVV10:190 H:V "---------" :H "---------" :H "---------" :H "---------":70T  :::~  6,INSTALL EDITOR,INSTALL LANGUAGE CARD EDITOR,INSTALL SMALL EDITOR,RUN CONFIGURE PROGRAM,RUN DEMO,QUIT  ONERR HANDLER :752,173:753,222:754,0:755,76:756,12:757,190 10:10:752 :::15:"ANY KEY";:A$: 68,A:A8A11İ340:II1:350:260I A21A10İ340:II1:350:260Y "A13AI:i ,A27A0: 6AA48:A0AN1İ340:IA:350 @260 J TI27:5:M(50)::I". ";:50,M:" "MM$(I)" ":: ^INI1 hI0IN r330 | QUI ::10:"LOADING ...":4 LOAD EDITOR S A1ĺD$"BRUN EDITOR":230u A2ĺD$"BRUN EDITOR.LC":230 D$"BRUN EDITOR.SMALL" "LOADED.": MENU SELECTION I1N:340::I1:330 (49152)128260% A(49152)128:4919,(A$):) P3:16::" PRODOS "::5J Z5:" Program Writer"s d5:" Copyright 1985-89, Alan Bird" n5:" Version 2.0/April 21, 1989" xNNM 240:ANM380: QUIT A0380: ESC A4ĺD$"RUN CONFIGURE" A5ĺD$"RUN DEMO"=========================== PROGRAM WRITER STARTUP PROGRAM COPYRIGHT 1985, ALAN BIRD =========================== (:(21);::A$" ":D$(4):4102NM:I1NM:MM$(I): F:I141:A$;::I122:40:A$A$;::I138:A$;::203  :"mouse demo"22(4);"pr#4":(1)CF(4);"pr#0"TZ(4);"in#4"bn"";X,Y,S10:X;" ",Y" ",S" "S0ī110(4);"in#0"(4);"pr#4":(0)(4);"pr#0"16368,0 :H "---------"7 "H3:NV:NT11ĺ"-O-"I ,H4:NV:"O"l 619:13:"YOUR ANSWER? ";:IN$ @IN$AN$Ģ20::27:"GOOD!":I1TMR:: JIN$"Q"ė:: T"":20::310<444$$|td$$$<wwwuS,/,ssqP&<444$$|td$$$<