8L xC)pJJJJ IH(ȱH:=IH[H`@H^H 2 9 @   I/H`JLNGȄBȄF aK ' faaFF  RJm# KKJ qJ )J ۈJJm  JFȱJGJKaȄM ' 5aaNNJFLGJ !"#$%&'()*+,-./0123456789:;<=>PRORDSKj #\&  INSTALL.DOCT\& a/,PDISKSRC.SHKUMRa9a:%PDISKX a+ ZDATAj#*'READ.ME|\& (TECH.DOC \& {! PRORDSK9! ' &PRODOS#B  ,BASIC.SYSTEM (8 9 &CONFIG? >a+CONFIG.MLKa+@'DOSRDSKL a.FINDER.DATAS`aa8aa XL LG &PRODOS`DaElH$?EGvѶK+`L XX LU ŠϠĠӥS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8RL| Ly Lv Ӡֲ㮬f"f"C# "&i01h+# )#M8 % ) L"g# )L"@, )7(P0 ( @A p H06172839h` z97L75v^e ?/( ze?L[LLɍ$?`?e ɍɥAH93827160hH46576879h`,C fL ɍ f ,S0 @ pLޭBYL 8!9 詍` "  4"/pŠϠŠà͠ӠàԠŠJJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IջLLG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"(0`6708" = ***)<  223 ')Д )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#"0ӂ8 )# f" +#$#0 &$#0 %# )ȍX#f"P# )ɂH#*# ) %)0I0hx H( , %Щ ߜ)#j )f 8'  )ɀDEF޾ p  ޾ p($ذ z (0 k( L?ԦʚLeةީe s  pL f,FLk,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ kB94 l% fʽ  ՚,S` H $݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ͱc־JjjjZ[ (`O>0O z POjK` X,, ( 5 ` X,  `  X, `)a)_`0:8 `)H " H 媢h} I hm   8`0 :AG8 `) 媰 ` . . `SI-SRTLG-T VV H$ZA@Lĩ8 `߹-U -W b WW)JJ HT$K j0IDK H H5K 0.)K H  XK`LGLl  HK m Y ܩ8 VV K>S 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` HLJپھ pHJh` H!h߻g޻tػٻpứ `޻ٻtػp߻8nٻniػtpiٻٻtụs໅o8ễpڻiۻniݻi>j?kܻڻ߻>ٻ׻pڻ׻Ii׻׻߻߻ڻ l 1ڻۻ `>i3Lm8n933LҞAAJL ةޘг uv $ 8LʞeЌ>?@`>?@`Ba8` K  LK ֟ ֟  KK`JJJJ8`轶K)` #hhp@3 @LtJ)s@J f 򟰸 p`H? hth?,E30ɍФ3 E3HD F3 Ʉ%h3 fM E  pLthɍLL3`3,A0s0% Ipn HpnI:L ؅30پھ p WH־Ǿh۰8L־JjjjZ[ɾ)Ⱦ8 AOLӜ ҤLLX>(F`־ؾپھ׾` fɄ KDEF zLp z pL[ fKɍKL?`  zLR¸)RʈS UT`RSSS8L `yGLɳ 8`H b kXklmno YhjWVL58 L tֻʆt "ֻtl e DޭVJ P eօ L s򩣍eS3 zLG # e $L? b 4 kimljn`  pg׾mȾXhؾmɾYtѮȾɾ YX`8g@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|پɾˌھپLp k V)@W0!XY \X6Y7` \ YX`X:Y;τ<:: <`:8` b ke eվ e'OV)Jj :f a ( z   A&ji Ҥ ,WpW)0پȾھɾʾ p p,Wp CL8`jÍ eN I 9 1黍׾껍ؾ컮  p p C H h(`׾ؾ`  ߭黍׾t8mؾŰ黪t껨 L8` /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)ɐ,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~Tһ   LiLMTRi 뎣`ة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`;Zx3Q0h)ύh0HHHH " ׍hhhhhddhh .hh8`JIMJAYKERRY&MIKELKL`BLL ޥޥޥޥޥޥޥޥޥޥޥޥޥޥޥ(C)APPLE xLLM Mh@8nЍLޭ 0J @,,L=#آ <B*IBGF08Lé'+8H <,``h(`@ڍL3HEVhEhH)IWHPHHHAHHHLaVEWLӿ``"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`Ϡ(8LLLLL[^)o `\o8` ԠŬLL@ 0 $ LK8`X YI8`FHGH GF܌ עFܽܕF芝ܝ 밸XY Z܅I m[IHHyHȘI L`ܞ @@ @Ю׍q)mיqʈ@ȱ@ȱ@lmq)5qI0ܢܽ n'c* 7FG (ef Ld܅Ip mcIH`  k0no cqHlFmG 밳lm 밨e%܈b"轘ؐ` 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`8@ؐʈI묤)8 La LةC8`؍)@ fi)8wJ ] ؅F LW) y+%J(^ FإGؐ,` JHIH I%FHGI ٰ:`JJJJ9 d묣͸ dٍ0 u  `H8` `ٍyٍiB0H0FGy h0`FG `ϩBxEdD0C ް(`(8`ؑ@`M8ٽ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 NLMO MІMEKݸP$MEK O,u PeNNO (` C  7 2JHIHI؊ aL-  ` ? H ع H ؙ؊IhHIhH a iع `  عiعi` )؍0CGHFHdBdFdGx ް(8hFhG`@4͔ L @Ai ׭2` . 0#ع؍0 <讣)`.@+ i 8` L )0 *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!$|1OIVXXK تKo`V8`no` "on VI9XX`)&HJJJh`OeNeO࿰ V9XГO`@ȭ@` ON <NJKO`?>х=d<<>=? 밽܅F݅G ` \) S$ L`LHH hFhG܍ݍ 8 `FHGH  hGhF`ݹܙ݊`@Bɼ>K@J5 V9X(K   ܮ `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`  ) ⬤Ȣ؝@0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` @ABCDEFGHIJ""8h/ ʎ S` ?8 r 0 88`  Can't run next application.ProDOS Error = $ Please insert the disk: Accept: M Cancel: Esc`HZ; [:HZ"h+h`8h`/Ȁ򈘍` L   `H0H"hHHH HHH "hpHH"VHH; [*i)    +hhHH"\GQ H ?h8 S / ?8 V []bj \ ^e_f a  i  \ 2EL 0 8`0)H ""H"h8 ek)E/8ȱl蝀igt 9 X   (L $ `dm &m &m &m &mlemmli`{g8s [t0{2H* Lh2  Xȱl i L `κºú` Эht X l)lhЏL2  9 X [ J  dgdshUj" !# wgjdg. wg'g%s wghg%s w h ɍ1Ɋɋɉɛ kʽ/`L2LY g Xح o âXoύX`1e0e21ʆe dk)i/ k Lkdha+ # nrdcddpqt$q0c)crorcc0enib ` r )pqn  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`  PRORDSK0 CONFIGURATIONC( PROGRAMI2a< BY R. GLENN JONESgFmPsZydnx INIT50003500: INIT SCREEN4000: INIT VARS :::"IS THIS A FIRST TIME INSTALL? (";::"=> $";::C4$:EB 17:"5) SAVE AS BIN OR SYS FILE => ";::C5$:sL 19:"6) RESTORE ORIGNAL SYSTEM DEFAULTS"V 21:"7) SAVE CHANGES"` 23:"8) QUIT"j   VIRGIN INSTALL  5000 (4);"BLOAD DOSRDSK,A$2000" (4);"BS$2000,L$C6A,T";C5$p:"2 MAIN MENU8 u 1:9:"1) AUTO FORMAT RAMDISK ON INSTALL => ";::C1$:$ 11:"2) CHANGE VOLUME NAME => ";::C2$:. 13:"3) CHANGE DRIVER STUB LOCATION => $";::C3$:8 15:"4) CHANGE DRIVER LOCATION C5$"BIN"Ĺ8764,96- C5$"SYS"Ĺ8764,32|*:"PLEASE PRESS ENTER TO SAVE ";::DVR$;:::"OR ANY OTHER KEY TO QUIT"4RE$:RE$(13)ė:>6000H(4);"DELETE ";DVR$R5000\(4);"CREATE ";DVR$;",T";C5$f(4);"BSAVE ";DVR$;",A"NOW SETTING DRIVER ADDRESS TO $";:{16387,C4$:DLOW0:DHIGH(16391):DADDRESS(DHIGH256)DLOW:16384,DA,C4$:C4$:I120:N:N,DHIGH::8452,DHIGH:9225,DHIGH ********************** :"NOW SETTING FILE TYPE TO ";::C5$:LOW:8461,DHIGH:8487,DLOW:8492,DHIGHQDLOWDLOW17:DLOW255DHIGHDHIGH19051,DLOW:9052,DHIGH:9074,DLOW:9075,DHIGHDLOWDLOW28:DLOW255DHIGHDHIGH19098,DLOW:9099,DHIGH:9121,DLOW:9122,DHIGH **********************':::C2$:(lVLN(C2$)240:9732,VLNPvI1(C2$):9732I,((C2$,I,1)):m **********************:"NOW SETTING DVR STUB ADDRESS TO $";:16387,C3$:DLOW(16390):DHIGH(16391):DADDRESS(DHIGH256)DLOW:16384,DA,C3$:C3$:(8460,DRE$"Y"RE$"y"ė:2580!:'9 SAVE DRIVER?E&b0 **********************:"NOW SETTING AUTOINIT TO ";::C1$:DC1$"YES"Ĺ8503,129NC1$"NO "Ĺ8503,108X ********************** b:"NOW SETTING VOLUME LABEL TO ";UIT"<h::"ACTION NOW DEFAULT ":`r"AUTOINIT";:10:C1$;:26:D1$|"VOLUME";:10:C2$;:26:D2$"DVR STUB";:10:C3$;:26:D3$"DRIVER";:10:C4$;:26:D4$"FILETYPE";:10:C5$;:26:D5$13:7:RE$4$T$:, CHANGE FILE TYPE2MC5$"SYS"C5$"BIN":hC5$"BIN"C5$"SYS":n@J RESET PARMS TO DEFAULTT^:::"PLEASE CONFIRM RESETTING OF DEFAULTS "::"PRESS ";::"Y";::" TO CONFIRM":"OR ANY OTHER KEY TO QPC3$""C3$T$ Z: x;  INPUT DRIVER ADDRESSA L T$C4$ ::::"PLEASE ENTER A 4 DIGIT ADDRESS IN HEX": "ENTER ";::"RETURN";::" ALONE FOR NO CHANGE"::"NEW DRIVER ADDRESS => $";C4$:(C4$)4(C4$)0ī1440C4$""C,15) C2$""C2$T$! :' D  INPUT DVR STUB ADDRESSJ (U 2T$C3$ <::::"PLEASE ENTER A 4 DIGIT ADDRESS IN HEX": F"ENTER ";::"RETURN";::" ALONE FOR NO CHANGE"::"NEW DVR STUB ADDRESS => $";C3$:(C3$)4(C3$)0ī1340 290  L( V TOGGLE AUTOINIT. `I jC1$"YES"C1$"NO ":d tC1$"NO "C1$"YES":j   CHANGE VOLUME LABEL  :::"ENTER ";::"RETURN";::" ALONE FOR NO CHANGE" T$C2$:::"VOLUME LABEL => ";C2$:(C2$)15C2$(C2$ISK DRIVER TO CONFIGURE => ";DVR$:2 NEİ2500A NEİ3000G M "] , MAIN LOOPc 6m @2300 JCHOICE$:CH(CH$)48:CH1CH8ī330 T1:7(CHOICE2)::CHOICE;:: ^CHOICE1100,1200,1300,1400,1500,1600,1800 hCHOICE8ĉ:: rY";::"/N)";:32:RE$:? RE$(13)RE$"Y"RE$"y"NE1: NEĺ:"PDISK AND DOSRDSK":"SHOULD BE IN THE CURRENT DIRECTORY": I11000: (4);"CAT" :"CONTINUE (";::"Y";::"/N)";:11:RE$: RE$"N"RE$"n"Ā$ NEĺ:"RAM DAVE ZDATA,A$2A00,L$16A"1 (4);"BLOAD PDISK"P (4);"BLOAD ZDATA,A$2B00"| C1$D1$:C2$D2$:C3$D3$:C4$D4$:C5$D5$   RE-INSTALL  4500 C5$"SYS":(4);"BLOAD ";DVR$;",A$2000,T";C5$ C1$"NO ":(8503)129C1$"YES"5 VLN(9732)240:I1VLN:C2$C2$((9732I)):| DLOW(8460):DHIGH(8461):DADDRESS(DHIGH256)DLOW:16384,DA,C3$ DLOW(8451):DHIGH(8452):DADDRESS(DHIGH256)DLOW:16384,DA,C4$   INITIALIZE SCREEN  :::32,11:`H h `0`  n q  8` L`??zJJJJ L JJJJ P Z Z8ة8`  `       LHH hh ` 0`0`  ` 8*   ii    0 ԩLQi&i8 8&L p  ` u  8 8Jn!   H hLș D< ٩- 轛mMNOPQRL@Lo@ RQ W@ K@P W@ K@ ߩ ȥȥ `Hh`H)JJJJ e@h) ii0` ߠȱȱHȱh @@ȱHȱh @@` @ @ @) @`:`70,9080# 9089,9096,9102,9108= 9117,9127,9145,9149T LINE ";EL)ER6ĺ"FILE NOT FOUND"/5pPz DELETE ERROR HANDLERVkER(222):216,0|ER6ī5040(4);"CREATE ";DVR$;",T";C5$dn DATAx 8964,8969,8977,8986 9027,9032,9042,9049  9055,9061,90,T":NE0%(4)"BLOAD CONFIG.ML"+1U ONERR PROCESSING FOR DVR LOAD[pER(222):216,0ER13C5$"BIN"5000 STANDARD ERROR HANDLER216,0ER(222):EL(218)256(2181) "ERR ";ER;" A ":::::::::::::::::"\ ": PRORDSK :":": CONFIGURATION :":": PROGRAM :"u ":::::::::::::::::" 32,0:34,8:  INIT VARSD1$"NO ":D2$"PRAM":D3$"0380":D4$"D000":D5$"SYS" DVR$"PRORDSK":DR$",A$2000 0 COULD NOT FIND THE STAR-CARD  THE Z80 RAM DISK IS IN SLOT " WELCOME TO THE STAR-CARD SOFTWARE PROGRAM. IF YOU HAVE JUST POWERED UP YOU MUST FIRST INITIALIZE THE DISC. WHEN INITIALIZING THE DISC ALL PREVIOUS INFORMATION STORED WILL BE LOST. DO YOU WANT TO INITIALIZE THE DISC (Y"e$)TH0)G ՇW8H(U FWBD Kdp V,gJYVsJ6G^ J1a'B% (x,$1чB0[*5SOURCEB INSTALL.DOC5P PDISK.BNYREAD.ME$TECH.DOC@ҁ @ڊyz(@ڜœœ{ʾG@ڳ³z( @{(G @zʉ W! W3\,% ! 3! ͤAF,AF'! z> z ʽ ! ><3͈͐! 3 ͵ Z͉W{ ͇ z – z!  !>`>!O6y>O~ s~ yC{!G>1x>O!y>=213Uʹ,zv>@́Gm R:Ix(́z* ͊z ͊y@e.x(Ϳ͔͊́_́WK͊J͊@@!$!  E:ACR0.MAP 3U ! 3! 3UW͒H! 3ü! 3\, ! 3\! zl z=1  3 !+ ͤLL  HHȱH٠H8L  . qH HhH  HIHȱHIHhH 0HHIHH `@ H8``H h `0`/N)? E E:DOSRDSK.ERLP 0DOSRDSK ERL 1 IL& ")XO*qR&Jy8@S*DR I&"(O)i ,ʢq*5Q BCB*?kBJMF*V#$Ub('o\pv챤 4Pȥ*`ƺ,#@"7K-$ц*غ T&-K#Ԝ &8Z".s:Q@ "4BCh' K (t! P CB)$O!L5P "b^" *p!(0'#"Ĝ mCՇtYZ[\]^%"Yu!z%R_J`5ĜBJ!7\a@"+h jSݡJ` &0У{ׇx5x۶bnh$oAp jkJ %Tj%$bY 5(`"<#b!tC6g):tO<Yw]?vO [kޫ RHG ;,o>A>(C)VDg2봐@)g> (hA9 `D|g5?A 1 $'e:Ϥz׈)Ѕ P ,[0MZEh V>M{ZS!uSb@.& )T\':8ʑQu\UX`1Ђ* (K(dD6:BghDm됄#ŎRΡ (3RvLVY8HZm0y aO;$A6c cjR3D\Pʹ[ MWֲL@T96 h䓲FroGy(KKmC = q^1{=MRNr4-;P44T,0$Fc4-&2K(?Nmd@h4|Z*'tV[@».jɺMu@5yl]YyCTF!t=Wв$ J)+). !er&8}EJ25۳{-Ŵ)-Փώ0m+S4цmRW3'`b$VێAP ,sK<}+!ˆ#Be5}QzKT"pvqh=K.ZNyLr (h7P8-X"D$D;*$`Bjh,!( #nbϽ<'ˉj+ V1b6q # AH#A(")X"ұ%dH" {=-CH1k ΋&SP"DB)y+.%#|L##B L:¸VaPǢ6c '-p2⊄]LB*XIBTbT$,B0hDd@ IBŤN1#&Q*"Ϟ'A R$KRB\d4ՔDb(QH*O̎J%(Z #,_0m$,0@h QSe$⛎2V!0fb FP%1VĈ aڋW.IǐM$9$oؖ/aZ) \-evE:b` 4;-8`x+wH.DJڋYbMO.s'TTbI>V k.*`VSpD!|hQ(@G)#B'H'>Iq7$1- .VЎ KLĝNF؜<:/& m h:m"" BXSource:Disassembly:6502:TEXT.RAM.2ۢC,2JS`*@0JA)-:ZK3  zjx$IJ}_W  ᨾEJ8uڬ?ۚ5Kyw űtĸʹEE(VZ$ y1+&Et?r8i}ۻû7 &{ϋ+} A_ߨK1_ }4ZRƌRb VKS O>u[X'-+ Nտ& =1oeVT Wb_z0ѩ5SڗKڪ@#*ꘛՋAvWxӺjugB0qAqNz?8hx)fŘZFa-x K0}3w9&cc y&kqAygYzYZHZ1sWV)3`=DY!) 07 yILkz,vE;{ӝ#g", 7GZ!]Ii{S|reY&9y&54R4Km[y'RvX6aw}AɓWM'OUvc+ 1Z3X$qX*ikiO#6'V&aʞR Zj\j ^:x:cni4Eu9զO9pj>O2ٓ`~j;3cH@RqND0s-KzWqGP&gt)7-!C|IDAtS>9B!JQQkdJbK'Fl<$*<6rz?ȻŸ"E$!Ps-.\PC87)K|Gj$+/L@G`Ms 04CZGgT"h4D M4$SSN ERS@$H7I@iُ~W Y4OPw X`@4'N# 09Yp%?@jTW䟚1Mg_yщ79j5Yy# 300 2%xM4C",;W$c HãБhvD/V b 6xjj  5(3,` 04RūҐz#P41ȂH= v±ԂƹșGw@@?M<|ًBI B+83AJBT%*ʣ,IF,FjƽF#DnS;ݿE9!sKcs@U2ph#ҤҖZs򮭢+8^3?y z۳2?cC6"?c*k+C+pB܊L&0CKB)0TA+83$|25(:!,16S1Dgc(' 6>;/; SI*:eQT a 8כ%hKEFY09s3sR:Es+{Pz,ۿ\4YPh1QDr+vzSHI *p`-Є*-E" @W3yVmFm@҆UY"s=שb ]K-&3DEc(4$aE)"!,ȿ<D2` *Z$VU`ԡb9 `"&8k4c]tar{xsp1@iJ%шAi-/ Knu| Ԙ/~G.&x悮\,X]-ϱ,PF) "<`!XĴ [ap0Ս2 "WK ߓpOBl'7f܋Y0eA>v,(dѣF{rLĺdayO~tG&U+L 'dS}jV>׿ccAA!XD)ڱ\0Uك=X.8$`1k*P@MBMPM+HֈtLiR7EgL]{Eze &ʘpA͌+`'9$,1+NR$q/aXщ,0e*(On(.ڤڨX;l˨b)&v'yZQ+F u1h'LiF(UȔX! yC^RYfHF".oXX ʤtp.A{Y]!5Qb@/;(¡sfUfIPW)HA\&r&h/`YYȉ+8㍽X) &b;%fP]ADhq6f}@jn_I ک>`kdL>F`#A3|Jb2PW@pIP* RC4J* g#eB`gpa+KjT еL3C R WBT 5iqB=r0!S8P -r:Mj- <0$H{sb&Hlɂ >Gj%l3iHUN"MwlZ&@i$L:RmI&G@J Ƣ15 y3 ˆk,3 &8(ih g*$|e.Q5 aTB(R Ix&lUNJNh&#$A yg<)tdY#kg"h:7#<*ҰTx Δbɨ@b:( !(B&xII &ƜL G%"#%)b5Xrɀ P (@bQ2ͺf7\.* ?cuҷ"5ˆD$(٘{(UT*(]n]!-BL)t\o4 )Pd(S@AM8tuP9 '*uG ;W'( Pk]v&"X! ~¨Y&ך7AD R0tTl'z>uW}˚à 'L>)!-ş=Ai+0M?oNFط5<:/& m h:m-c[%%e@:63Ԩ*a.*H`rDtבJRѲH^Wf d{` @RJJ\aWM.q9*,9{Z CPhW:,Q0l_  29HFj D -t AABĶ8R w'ΟXㅈN=3*UG,il^*s/X C!#W( )*>1TP {,$4Ib=@XPBTAЅ ŦF#щb|hH ҍ2%EI=Җ*E)KGj͘:4N]ZSt99}SRԧcGjQc:SIujO+!$t$VP#_gjV3dT;jѪԭqQZWԮyFWzԯlF +R *T%.uMc4ڲl05UNfJZuhWPΒ}j!Â%Ca#$1o:aA(pM (D-V^T"g(`Tas(E"hTco ,"g#Op;~]$(F@Z$t! p`BgHFБ$ D+EVt,'FnE0D| (PZ4K>ј\f1 >63ʬ3i3B,xG"sҼ5)lk,:LfDvІ,aU|3k~BL7qcj6 ={ӗ7bS+2 Jb(-F*- B(HQ )P$KA@Llftălb#BCW,0ٮͦn %?Y3yc.!`Yh(" ؁o1 anUY-K) MdP0@n+3bp5(E)~KT7}u³2" bp @ g09 a@@*/C8¢ΘcO  "*U#j UU*`qJ(V)z%c0AoAp8 21Ҩ_.>-jD;=̻=+½/]ڐe>sӏ?4B@X]Ics(h[1W]KsO~Vb+aAhG4 I(mӪ;moԮ&Kp54VfsOKLZBS#@l\̙"̮Ehʩ bq`/tŎ^ k'R2ga'OpK%ICo?ޒ06*!-̘ʎK'z ),hb8,&!‰!("%tz  N!h媛:K$xb {‰`bb1C04Qs n*!x05 M8LN<"!`) &m L ]#/%$@:3Ⳳ3 j*A (m 8*HpRB)I!)ELi&D,9"5Zʓ$NLOA ,˘ iJYAէ Z*T5AܼGϟAR)ʤJ) TeaeH֫Q(Rp֊Flȡ3OB yJ|]2#0֙헴Y MD`!$ ":#, H)LoSBek  h`.c>ߍ \IdL RA%uhj9[ZB0y^lw<8M݊VoEIF3J*b53`I۰6mno7NNFt+<:/& m h:m""%Source:Disassembly:6502:TEXT.RAM.3ԌjMX:B_WiJ쬑Ɗ wZ[bEAxs66{|EV մrwK{?! Pc i&t[ĦY6VœmjBil+{:MTld|ڄw@}Xbݶ<-P#@ ۑ">xˋu-l'( (1]BWZ^cVb?[tՄq1a]@HEu,QI+ VRpĨhv.\* *tZSZf5 }f <ڧ0@A>$0LǠ,dֺFm;b8e i!:Onl-ODpCFu!+MNvyf:BL6iOT5*@aJfJ.\״PiBe&~f"ص#0ݠ4gQ9cA@>|k#ICy0UP05.rBȎ\i Z5Qz "ׄ@AX_fA@X" 3l)%ݔޫa'=zͮ_cNmAH? X`A 2W!^}X!3DhHTA *!,mc~? ,#֤ZR5*|xC5]A=QPUAhfh Q$V s߽d^CVƕEzQHߒ8 z:6nn KV0ECXPE9a+] ju5_.e"`$0Jj,R 0onL UM!Dk&8L$|r.KXtn /@5A~8 <-aȱ +YA`!>O2 c\b1B7 ϊa,R:0AZ+˽Qi<#')Pi2kA(M ANh"9*,u·-LDZ]%/jٚ7t8. BH_DɪS@\?NMy`𳡰;=K:!["֠v.H#!t kp(qcW*(ժMnWuu. Fo-$A.z[?C(]KVmegF*` !(r`@0K$0#Tԭ@IɌ;1nh RL&KR.Nu*XwI"8F{X09I适ܠ/bM֚J4˂U,NPKupP"7V&ajN)fn;A’(v?Iq lL y? qZPN wU9]0pOQIwXѺliP*.^j `O0=PKJt ^E SHS a`.ˬ}3DGs $њO}f N6*-3+)Ŧ - (fZ*\AR-0k kib&&}6y.74@gM2wTRx(!7 ?9+_^G=qr}n #*89"Ti^b3}\D;ъ"l"7iޥ0 %JP5^\@EW]1dDBj ,\4F8VUi#`id F,f8!`RQrZ'nq!x?*qp{KPPj)>Jp `@'U(?1P\) "@4!H5\^ R \Ayi2-mGSE`ͤ(RtQ%3MsꄝvͧKaV',I]QD,*`!( U3:̭*Ug”*L u ,V3O.\߉uӶs$6ZW"%{B#lSh:d)z^pQ_~(԰<YPz4a W~s $rLk8E) (CPQʐKwCCXm-{QAΉ#T,*!csXȆov( i6 "EřH(RAvf",LNFS<:/& m g:m Et that time. I have decided to release all of it now for educational purposes. I have not looked at this code in 15+ years and I almost was unable to salvage it off the 5 1/4 inch floppy it was on. Enjoy Glenn Jones April 01/2003right of the author and may not be used by anyone for sale or profit. I also make the standard disclaimers where applicable. The original work on this software was done in the mid 80's. A copy of it was released but the disassemblies were not included acause this program contains some code from DOSRDSK it is !!! NOT !!! being released into the public domain. As it stands, the program is also usless without the DOSRDSK utility. (user must supply this). Original code contained in this program is the copyr will handle one applicard with up to two RAM extenders. Possible volume sizes would be: Applicard with 64K ---> 128 BLKS + one ram extender ---> 384 BLKS + 2nd ram extender ---> 640 BLKS (I havn't tried it with two extenders but it should work ok.) BePrordsk.Notes Prordsk is a PRODOS based ram disk driver and installation program for use with the PCPI applicard. To use this program you MUST have a copy of the DOSRDSK utility program. This can be found on one of the applicard system disks. The drive}~O:y>3/J0=L> O:#gA`B0=TЄ(& u )nnM$!YP$! iChc0,HI(3IcBP IB6FISȪ£^J=J85JmqdI˽ٔWlG"bt0!l "\U$e' 8AiBȟ]E\n|s*igd QG)h(v+@"#Heg;ٰ d1KsѳjH+ cNYAWI :k4=-jSc*ShbZ oű)* Ly k^ MfQr"E[g9*m 2N}

n%jhh %ErctgI'ݍ)g Dԟ __"_P*"ar ;! `c)|d< "`K= } C6"`),q@RehP+tk`sxxψ8K!+!9A0Z X8K_ae(gGFrb}0HbH"f8J%CIg#22-w4װUSR )"uHW"dp_&\ُSW!v7Å/sb)&b܋a|"r_d3ьq`M"ANT< J?M[5-lԞ8 .:URJ- " &=`O)Z@!$ sOҹ .dPNI"{)h X"=D ˮn3B: ; 80sOa| &X(q$"@ H?X8odn7{<`8‚2b 6#B 'QJI**pω*Z)°'XB#H+Pr &Pϸ@4H"OH!2e -8`RJ( u1U;!8C3BډA`XBR  @J~|pPp&FA$ TB (y?eNǢȁ,:f?`z0 , h`'`x H‰Q E)`_bgpZ @ 4DH~ d@<W(׌i@G$@@D'R Tt,{)T(b) -Q{NWx$0EtNRUl P +V hY0 QbI@DEEA Bw0,E.E$0Abm@ p%TJA@G9R^}z$`1hAB PV\y(b+A`^ !6i PyeLkl21d B#zebhul "z:Br#_X}q,rO(2 Va(HŁF0HF 4F*kBV"d,`(` @ZЙI)`"ZMЦ: S i*B F, A )B h% 9iD>WH /s0ǀItt"2&1$9`P A`P#Z!mq:DOSRDSKO4VA$@z 4zU`m M*V$#U hqJ< U`B8-) ٨f1ml׌gv*I@* `H 7+47LQ! ZV!,a! !ѮG$oB,ӽ ھժ@*Wdx 'R˄o4Q ـR=hQwdijUբ| 黾˾۾ I۶ `N  `F :߿KXPB 6"P `c#,<j 4 $4p4$0سdњMvl>NF1<:/& mX:m  Sourcer$ bL;"ag( [ڥC@' Ѩ ".{'Y0X޺d겵=9K)]ˮ㴞' a conpEanN[CFj2cz}m0I2 *[]I>AE{ƚ?Ĵ R+V{XhP㵟IZ\EEe{ZU(3۬ yzeQ-`f 9"gtYc!$Mhr=NL ̄ ɨڧB95JeCf2dajUףjHu!ukuI;HG5}B@#PJ-mxQ(XѥB M z_Bsj:aB/nj9\v*G'A02֭xe)YkCf([I ډ8dI"(`ik ʗy6c($:{QR$Z)1JEvG5ƔYpZ\+%L5(p&h 7`ޭFЅD r`Sd6sPv 20- 9u@iEN( hOAC #y.#qq.LA/'(s@@bTsKqL p>s@Z SAfHYv COe23C0 !@|5Y1r=ʳ@303(rH=`LyH&? 32N;3b ta,NwH`2D'p5,'? %'&_"& +3qBQB"|ORwaQ;Rz>RR#9 DUH K-Kjr @C,LP@,8p*:cq X 1 ԄJS_<`,3$+qsr,e) y/ =--1C987U keS!3߲@40RG153$4R . b @ "'k9nQZ, $1  4q 2 &A@cf JpАMgpn@"hl äܨ1̌kJ hJ_@"L&q",5A  `9(8 HUk11xqS0#p}m^7@rA1(B n@Mhdeq)F BmU (hH``\#n'n L-z̰hjp\Hf,gF-8j`e/of"BNm6 ܌b! ; bF.F,o 6 #+|.G9nΌt4LAN @X*T+ "hZ$o ύ*8l;ok lknTb .  r6#ֲ#\@r#a0DRY|JdZq] kȶ2"ˮэ/s{¿yw,zaO ٬m\GᲲ7q -Xj Nht!sǀX4 02WCnѝ YNoFKNplciB&~@VB7fTAIG!Q 7D/_R(|>%Aoۗr⧞'L2W߾ts3 b*S&A/3X҂͝S!4V%T(JL Y{.ŕAx8p: -gcr_2Ƚhb~"GyVkjiSi#z24#҈Q!\}DڗЕnuW>0nPƳP !/-#R# =kosb ;MZ j9ح>6eQTk. (RI 㦱`sAoTcƜW#7 Є9\RN,Pm  :ƕ0 $CDh L0D]R`P/p*zҳ0fMw A`Qק]'z0}h\V%NFv<:/& m2#g:m 7Source:PRORDSK.NOTESۂ5Th@AL c(np=P]xnt1= 2~!ˍˁzWFяL1@;` B`F`~a]M `P8~CXX Ѐ!<)D@$ sLJ@ &3q#ZRD$$L G;v B& O@J@G@ r "4 O8#$|$ qPTy'P9V e@Є`I0󘄌%Ze)!WP GMm\700 )4$RhB2SҘsB !~ !RPI|Am ` [2^ &( ;ʒ㕆RGc Pt hD>U%qP\%K*;^Ϥ6C@ʑ|FB0 Q*XPQQ ,BB(RAc zJA%0{xհ84=!H1`*P!y%@v-i$_]0+LB  Ba^J)d)ŀFIv`ah99e5 J9RP#ED`h1` h H``I @dkYwIR h@dXjJ؜eahYIbcV^`AhebMd~d&b^}z0ehphPE``N ihF[Im`#hihv;:"o@H'_}J(TdVޠ `#& fvL΄Kn挃Z"V( GA#l@@!@Q!0hEGDPR@H#IpIwtg., 4LlL/VrPT0mVKUX EP]zLJ9 |R᧑LH%F/a'jai*2{,ۅ+"F1ѲnW] 0U2a+P w; eZH[k435D Oᶵfʬ#@ K[~{lO;GkokR8u9Kn:DiGTIH51{ bW5x"һsjh&;~ NO +R؂G:JXuUyLWJ0EWJpH <Lp !P[0kz٬9͇A7يFEYkiYRۅS(_01ST PWqnA`Q'0?tWAVB$A0*B6Iyz' B@wE)kKPOLjdS"^Y(. zrIOɡ6*nƉJ9YoC7&FQKKh6O^ UtRQF;pIkR77DŽUE`2 ?H. A9u'_0x]T^HD &F)(+X8H1"8nhbШ+#` 6sn~ .qHqFZ^OF3h̓&O4=;/$BmNJ}I7|U؇W>C79g]'JrkmLI(:z|puQm ANBqˈoxȠQ@&gs8_jrrkej DG)d]H5PYLN t~ !勾d)*ܶ+3gsLv҈)gt+K(@!+8&f$ ,~FQW8 ž P#αmb ,$s$Ib| 'd'Mzʢ1nq(524lѨ)oH$4No@qh4 #T7#H# '" !\I#ޭ4-+,@ǯ 0bk[0bP5@|PZc dx|EMb'Si+ 4 pUca N%h-]kw)qzEN>5tN &p kB1rL "M߼ qA C&R\x|KLC" odI 'fPxk V o+.Q 2ڲh JD>}}mc7p ,b֊0A>+jIjp4JCgֽ|T#AZ;'B;SC/:O}Vd@D@TkTCNlpCzO0XJ!Ime1<3;_6&ɹmfWdWז&(1#l 풭-@>djB6^G#o )ddkLO9Lf1!gz=K@I&(Pt d'Ό7-צ?~rG,B٨?T][AH44]1Z,fvr{]rT^4ӛaB?ُH.F"'@`G ~8#ۨF0*x߆BBm>x luڑTvoSRjɞD1X)y Vǖ\Yp\:@U&5zwɂ/(Q B6j$D ɑn(DDKhlP󞉫L+4VҋsdtD*3^>%s b (% QjbX'"fJL\̥؝lS6BP#x\2/ꣅc%]dҐu]eBh[dpjӡ'0r`_.QM%@aPHBIQ*aQEP2"a d5S(WM FJ֭LnjU݉PZK{EWz&=I'a{;FO knӰAlIXǡo ,X+˗#LlHj-".Hmd"0hLfXQ}4뻖0&$T' M'ʫ`0etbB]‚ʬ)ռf` I]7RhBpX,ze"N£xFli,p;X($Y 2ґə4v-"$ƺky|9V)}sTHr:,ih:(!P2NJk0N&ЫP ; Vx)*H"Ћ)꫰ƒ)"L!k`w-*"!œIbZLhpӋ2:Z`'$$ H*h"nh/1;QǬ@H !b** B/TKH$q "X%#:6pS[d &b$4/'~!H)Պ'ۓJRKM 2S3TPA[0=NTL+29x )nS4{ BLV%c`rE($@",ψ_TxNIY0ᓗ.aFR$O0(F=R &"H!B4@@' d԰A†BE, "x"D^D`(V;I[A0ɟ8(b0 BV x qB6q z,v-_ 6#S w+SGp\r1?>} )%x⤈|#B(bB bL PBR=ޓ 'b0 44@˸H*U|t$hٶ[n q-WoNFZ<:/& mX:m \ D Source:RAM.DVRӊTh@A @J):@@ȓ) 0y2d"V )C)&LN:s"NxQb#$<|"I'T +vN4a<us,M@ H ꈊ?!&0#3򈼦fC $k4:k K 1@($/TP,BhL PR0 `cc31$2j 6/ꎯB3O#T+Î2cE4 9t;C0 *( !tN1Q7~ ˦t(-CY2 ̼"M8{qC`t2k'9t1b.@I#G 55FN-@|6yJp}:ake$;g4pҺ+4MRCv)vѼaC&DZvk,,|@U4f[#ִD*@mfڒjRTTˡPgc`kXjֲj=Z <NFؾ=<:/& m g:m ɍJSource:RAM.DATA.NOTES:HTh@A @@DR; P0N[eJXED IC8 ń,Wo!I&S@ʑ4'PC A+II.OiA:>PoX")@nڈ]Aj)܂-w;,Ӄ$9e$ >t b(CZעGGFḄ393E l2="lF2JP`RQ{KT T@Buʿ!%.ނ0#O7kxV3o@s q0+8"nvO5߭pB+`b..s^o)LJ #""\o8br@Hb, g[4VB(k{/ *M~H\$Ao5D:'!` PnX6µ B#yI};0*0'q@pӑPyB\"xJiφr$B.E aJCA /pB ~:!e jw"ڤ&ˆ 5MsRTu8m ½DVL-Nƨܯ X-a`0aO&aI% &^80db(`NfـUb 8ty]YK&d!8d&֗ZS)R"‰q*,(;#[$ ?.]&Lr 52hhaA8/ygB2-pa&|qp6r.h xLa8֜('2" &&/@ @" [)+"L!f+=AGxT~ Hl(ȉnPF!'IrJ)b+R-|fF1Ԑ & 8*s#PH)N0;ኣDpjZ;C,#(+ h39BgTm`TSE%TS*3"bˉHrlJ) V :%[cR`=D*֙#@Йr` \@I#N@Ȩa AR0Y0b*A|*B ЄDl1@A'EPyqANAvƉcL%@ S yB"TT0B L\FT9ܑH""NP&l'A:~ADZbFzɂn߽U0(D_qn D9 &Lsԑ3(RfQ!mUv۶p};7.NF<:/& mX:m &Source:RAM.DATAۚ_Th@A @Xy¤J" $Rd'R!$ &A(A4St|awTG9Mk%(kZ)\!*]8H5XbAu# fQq˿2fhdXV8"u)e8pt ?$ZrFEi-YTL9. &G bGOWkBQG*k\Hs9e(k>'39r.b%*N'sF$<`D[M4jtBݢI,ԑ,bZb,dEy6RZ MGMGE\?i ,1t,tIҎ$j3Ai.t[%B,je+ ?VaBK)cЍpkL['C2N$yNΧGGT %MM$1($IIS*V)Y4ZD,OEKeg̬~iz]U~72؎shaNm>'=| m?IЪ tn(=PMr^~ڧiEa`Xr8Ul .qNfzyi^o.6)]Z7{:LDcy  <U*~̫gP m\I0WyiX*q.]Pg5z3iZ73AuI\)HV%$Pɇ9h@)OYKL\1 0YOXfY*ݿ Rqj/ϩS>Y>p wt$hs;+VBPkWTK)O '/?e& Z.5#w 8wL`44HQ8Y!2-^ʎ)ʝIRf,& f !v7! |K:YB_Yr}^ 6?[’ ̒lF%UԤ2\м$gm N֟)O21JRJ#Tg,Z,r+^*47_Qe1>n k&;X*~Ap{p^XHRՄ'̦bkig!]\ @5A,N M{TOFHXp7-aVFMVp]X.>eɑ[2ua^N05f<ق`,و .oҸ.+6k}5G l`X-ȥ|,B:5UvPTNw'`=jFĤیq{pɛMA?A$Km(eQNֽ8i'tg68<"v&Tbi*B v !TN1C,MC+[M:PKqJ,Z7JPkyIa*XڭJ$" L 􏊐l(1@ *LMX($Lտ *XX,02;S6dXM6ژ<ص@iTC ‚i*۟`59jTz&(o1h2T艱 idEл')-pA0 NbI(oqQ7 8* nP2X¬h q6j!BXK« \) =B+'o@3 ]XD$QAZ /!MY2Oڲ568l45x6#j?}tZo`2X+"ԌpZ^/fSSS"M9@0,VXsxEPeID 8ɕ/+yrc, 9zYSX)#!EDSgap 42 #+A@V]z " 1),V>H,M>F;~lZ ojc8ǰ0kfs$Ԃ0@h@߂{0 L!,o%#a@``EV4["abx¤XB"#A0k +t4 {nHv{fQ(Q&) @n"QaOѧm?рg!o P 0@̃ ABiȼ [)ؤ e>3H!WyDŽPo[rĵ|f-K)lx(e& (\lV4! BPD{RM]DQKMp|jOy br-k$Haj?K;ѷ~߬rDV|bs9JﳘQco$%& ?.Aicn|\p)`Ť& b=`ԡzd!.I"ԓJ%din@Mq:QצLFQ2Ia* 2ɕ 0KU_5VIh@F銋+p0݃brP#T6 PD) \peD)Wd;4Ʈ P*bێq0I# WȰ%Y$-3mgPپ}'pa<܍%9DeF4 D*!}Ysae+ eu]П8!A[WݗJ˜bC^/-evFOoP 1.8LSP+n^DŽp\؝٨5,ID]̡-P%į%XQ 8Y=1qI[QK I%@V5ғ]\iRbqZ]u.D`Й љYAFTo5)Z u JLѱ-AeQ`>!O6y>O~ s~ yC{!G>1x>O!y>=213Uʹ,zv>@́Gm R:Ix(́z* ͊z ͊y@e.x(Ϳ͔͊́_́WK͊J͊x׹kt0sK/w^;ңD#,Pn': 3APG$ `@p0O/1-<D?X0.8Xn"B#%xXOe _h+JrCF:vpƁfU2E kf pYdpvRQj.iIๅrl3K ewUm|~x?NF،O<:/& mX:m ojWSource:ZDATAۤU@ Kb3H!%BЃދp+,PSu :OM #VW'P`KN7BDT*aF}sRIҍtR<Q zkV_ >:Ò]b}VX}}fA4TiaHǭLS7Uwb7/yeT||]W ů+4c(hb"֖-4\NA+QJ_]WN{AvUe'方lWSW4jjum֭]wiHcw&sA#_U|8厈; $D9':J>e )JY!@+  bb#b?̈ (<:ͶflΞ=x $(b** ,rʞBң$* (Hb˄{o Wl)&b xLI'D u "LDhjA5B3)5Pb /A/*P+6TEtJ:p7 urce:RTEST_@ XR N@Rd  DT,M`>!O6y>O~ s~ yC{!G>1x>O!y>=213Uʹ,zv>@́Gm R:Ix(́z* ͊z ͊y@e.x(Ϳ͔͊́_́WK͊J͊USING THE SLOT AND DRIVE OF THE0DAPPLICARD....SORRY!!! CATASTROPHIC ERROR OCCURRED WHILE INITIALIZING THE VOLUME DIRECTORY EVIOUS INFORMATION STORED WILL BE LOST. DO YOU WANT TO INITIALIZE THE DISC (Y/N)? V) THE PRORDSK DRIVER HAS BEEN PREVIOUSLY INSTALLED AND THE VOLUME FORMATTED DO YOU WANT TO RE-INITIALIZE THE DISC (Y/N)? ANOTHER DRIVER OTHER THAN PRORDSK IS CURRENTLY &++( COULD NOT FIND THE STAR-CARD O( THE Z80 RAM DISK IS IN SLOT p( WELCOME TO THE STAR-CARD SOFTWARE PROGRAM. IF YOU HAVE JUST POWERED UP YOU MUST FIRST INITIALIZE THE DISC. WHEN INITIALIZING THE DISC ALL PRPRAM' `#0`HH F%hh @%` 4%#`H F%h#0` LZ%`؍ Ѝ`D`0D`# #JJJJ P Z 4%Z8#ة8`# F% 4% (#HJJJJ#h`  F% @%   @% # %0ХХC*(G!FGF &B0 H'8HЅЅh(`H Х  h  E E мH Х  Цh  E E Ѝ𐽃`H hШ0`0 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 45 0D 45 3A 44' DC H'4F 53 52 44 53 4B 2E 45' DC H'52 4C 50 09 30 05 44 4F' DC H'53 52 44 53 4B 20 45 52' D DC H'8D 06 00' LDA IOB+1 IOB ADR HB * STA $0007 DC H'8D 07 00' LDY #$08 INDEX INTO IOB LDA (IOB),Y GET LB OF BUFFER TAX SAVE IN X REG INY TE TO THE ACARD * LDA $0009 @ TO READ/WRITE FROM DC H'AD 09 00' * LDY $0008 DC H'AC 08 00' JSR $00E7 WRITE TWO BYTES TO THE ACARD LDA IOB IOB ADR LB * STA $0006 RITE COMMAND BEQ DCOM BRANCH TO I/O DRIVER BNE DERROR DRIVE ERROR DCOM TXA SAVE COMMAND IN X REG PHA PUSH COMMAND ON THE STACK JSR $00F1 WRITE ONE BYD LDA (IOB),Y GET DOS COMMAND FROM IOB CMP #$01 IS IT A DOS READ COMMAND BEQ DCOM BRANCH TO I/O DRIVER LDX #$01 ACARD WRITE COMMAND CMP #$02 IS IT A DOS W SAVE IN POINTER LB DC H'8D 08 00' BCC LOOP14 > 256 * INC $0009 BUMP UP HB DC H'EE 09 00' LOOP14 LDY #$0C OFFSET INTO IOB, DOS COMMAND LDX #$00 ACARD READ COMMAN H'8E 09 00' LDX #$04 LOOP13 ASL A * ROL $0009 DC H'2E 09 00' DEX BNE LOOP13 LDY #$05 OFFSET INTO IOB FOR SECTOR CLC ADC (IOB),Y ADD SECTOR * STA $0008 SEC * SBC $0005 DC H'ED 05 00' SUBTRACT POSSIBLE OFFSET BCS POK JMP $00D3 DRIVE ERROR POK LDX #$00 MULTIPLY TRACK BY 16 TO GET * STX $0009 BNK/TRK/SEC FORM DC GET THE DRIVE TO BE ACCESSED * CMP $0003 DC H'CD 03 00' DRIVE OF ACARD BNE RETRWTS NOT THE RIGHT DRIVE LDY #$04 OFFSET INTO IOB FOR TRACK LDA (IOB),Y GET TRACK NUMBER LOT LDA (IOB),Y SLOT OF DRIVE TO BE ACCESSED * CMP $0004 DC H'CD 04 00' SLOT OF ACARD BNE RETRWTS NOT THE RIGHT SLOT INY OFFSET INTO IOB FOR DRIVE LDA (IOB),Y NOP NOP NOP NOP LDA #$00 RESET IOB ERROR CODE LDY #$0D INDEX INTO IOB FOR ERROR CODE STA (IOB),Y INIT ERROR CODE TO ZERO LDY #$01 OFFSET INTO IOB FOR SWTS JMP RWTS+9 RETURN TO RWTS IF WRONG SLOT NOP OR DRIVE NOP NOP NOP NOP STY $06F8 EXECUTE INSTUCTION THAT WAS NOP SUBSTITUTED BY RWTS PATCH SUBSTITUTED FOR INSTRUCTIONS * AS I COULD NOT FORCE THE ASSEMBLER * TO DO ABSOLUTE ZERO PAGE ADDRESSING * * JMP $0012 DRIVER DC H'4C 12 00' DRIVE DC H'00' SLOT DC H'00' TOFFSET DC H'00' DC H'00 00' DC H'00 00' RETRA4 92 71 18 9E' DC H'52 26 90 4A 84 92 79 38' DC H'40 53 2A 13 CA 44 52 20' DC H'80 AE 49 26 13 04 04 22' DC H'28 80 98 4F 29 95 05 C0' DC H'D0 69 10 9E 20 2C 93 CA' DC H'A2 02' * * DC'S HAVE BEENC H'4C 00 00 80 0D 16 31 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 0C 00 00' DC H'80 00 80 00 02 80 00 00' DC H'00 86 49 80 00 00 4C 26' DC H'08 0A 05 22 29 58 92 4F' DC H'2A 94 C1 BUMP POINTER LDA (IOB),Y GET HB OF BUFFER STA IOB+1 SAVE IN WORK PTR STX IOB * LDX $0004 GET SLOT DC H'AE 04 00' LDY #$00 INDEX PLA RETRIEVE ACARD COMMAND CMP #$00 READ COMMAND? BNE BWR BRANCH TO WRITE BRD LDA STATIN,X TEST FOR HIGH BIT SET BPL BRD LDA INPUT,X GET A BYTE FROM ACARD 6 01 CA 12' DC H'09 CD 33 07 F1 E6 08 CA' DC H'06 09 21 2B 09 CD A4 0E' ZDATA DC A'$1206' DC A'$01FA' ZPADR DC A'$FD06' DC H'3E 00 D3 60 06 08 3E 00' DC H'21 00 00 4F D3 C0 36 FF' DC H'79 H'0C CD 33 07 E6 01 C2 C9' DC H'08 CD 5C 07 0E 2C CD 15' DC H'00 CD F7 09 C3 DA 07 21' DC H'F6 0C CD 33 07 CD 5C 07' DC H'C3 DA 07 21 DA 0C 7A E6' DC H'07 CA 6C 0A 7A E6 0F 3D' DC H'CA 31 09 F5 EFE' DC H'06 C2 E2 09 21 E2 0C CD' DC H'33 07 C3 DA 07 21 DE 0C' DC H'CD 33 07 CD 55 07 57 17' DC H'17 17 CD 92 0E 0E 48 CD' DC H'15 00 C3 DA 07 21 F2 0C' DC H'CD 33 07 C3 BC 08 21 EE' DC 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'09 CD 33 07 CD 55 07 DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'1A 00 00 00 0A 45 3A 41' DC H'43 52 30 2E 4D 41 50 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00YTE TO WRITE STA OUTPUT,X WRITE TO THE ACARD RTS DC H'00' ADATA DC H'04 00 00 00 40 40 00 21' DC H'04 01 08 01 00 80 24 21' DC H'04 00 02 00 00 00 80 10' DC H'00 20 00 20 00 88 08 00' RETURN * LDX $0004 GET SLOT DC H'AE 04 00' TAY SAVE BYTE TO WRITE LOOP17 LDA STATOUT,X BRANCH TILL HIGH BIT CLEAR BMI LOOP17 TYA RESTORE BNPUT,X GET RETURN CODE RTS RETURN PHA SAVE A REG TYA JSR $00F1 SEND Y REG (LB OF ADDRESS) PLA JSR $00F1 SEND A REG (HB OF ADDRESS) RTS SAVE IT SEC SET CARRY TO FLAG ERROR RTS RETURN * LDX $0004 GET SLOT DC H'AE 04 00' LOOP16 LDA STATIN,X WAIT TILL HIGH BIT SET BPL LOOP16 LDA I ELSE DRIVE ERROR CLC CLEAR CARRY TO SHOW NO ERROR RTS RETURN DERROR LDA #$40 IOB CODE FOR DRIVE ERROR LDY #$0D OFFSET INTO IOB FOR DRIVE ERR STA (IOB),Y LDA #$FE ELSE MAKE IT 254 LOOP15 LDY #$0E OFFSET INTO IOB FOR VOL FOUND STA (IOB),Y SAVE IT JSR $00DB GET RETURN CODE TAY SAVE IN Y REG BNE DERROR IOB * LDA $0007 GET IOB HB DC H'AD 07 00' STA IOB+1 LDY #$03 OFFSET TO VOL IN IOB LDA (IOB),Y GET VOLUME # WANTED BNE LOOP15 MAKE VOL FOUND SAME AS WANTED ),Y GET A BYTE FROM BUFFER STA OUTPUT,X WRITE A BYTE TO THE ACARD INY BUMP POINTER BNE BWR DO 256 BYTES *ONEC LDA $0006 GET IOB LB DONEC DC H'AD 06 00' STA STA (BUF),Y SAVE IN BUFFER INY BUMP POINTER BNE BRD DO 256 BYTES BEQ DONEC GOTO FINISH BWR LDA STATOUT,X TEST FOR HIGH BIT CLEAR BMI BWR LDA (BUFC6 02 10 F6 06 08 3E' DC H'00 1E 00 4F D3 C0 7E FE' DC H'FF 20 0B 73 7E BB 20 06' DC H'1C 79 C6 02 10 ED 43 7B' DC H'21 00 00 11 FF 00 19 10' DC H'FD 47 3E 00 D3 C0 31 00' DC H'00 E5 78 F5 3E 00 4F D3' DC H'C0 D9 21 80 FD 11 00 00' DC H'01 EA 00 ED B0 D9 79 C6' DC H'02 10 EB 3E 00 D3 C0 F1' DC H'3D 32 E9 00 D1 31 00 01' DC H'C3 00 00 33 07 CD 55 07' DC H'CD B4 06 0E 2C CD 15 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'09 CD 33 07 CD 55 07 FE' DC H'06 C2 E2 09 21 E2 0C CD' DC H'33 07 C3 DA 070' DC H'1A 00 00 00 0A 45 3A 41' DC H'43 52 30 2E 4D 41 50 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 00' DC DC H'00' ADATA DC H'04 00 00 00 40 40 00 21' DC H'04 01 08 01 00 80 24 21' DC H'04 00 02 00 00 00 80 10' DC H'00 20 00 20 00 88 08 00' DC H'00 00 00 00 00 00 00 00' DC H'00 00 00 00 00 00 00 0 DC H'EF 0A CD 87 09 7A C3 7F' DC H'09 FE ED C2 96 0B 7A 21' DC H'1B 0C 01 18 00 BE C2 05' DC H'0B 21' END CA BD 0A FE' DC H'F9 C2 DD 0A 21 9A 0D 3E' DC H'06 16 3C CD 33 07 CD 90' DC H'07 16 E0 CD 88 07 C3 DA' DC H'07 21 EE 0C CD 33 07 16' DC H'20 CD B5 09 C3 DA 07 5A' DC H'CD 89 06 57 7B FE CB C2' H'CD 5C 07 0E 2C CD 15 00' DC H'C3 25 0A 21 FA 0C CD 33' DC H'07 21 98 0A CD A4 0E C3' DC H'DA 07 41 46 2C 41 46 27' DC H'00 21 FA 0C 7A FE EB 3E' DC H'02 CA C1 0A 7A FE E9 CA' DC H'CF 0A FE E30 ED' DC H'A2 C2 C7 00 15 C2 C7 00' DC H'7B B7 28 0E 47 0E 20 DB' DC H'40 07 D2 DD 00 ED A2 C2' DC H'DD 00 C9 00 DA 07 7A FE' DC H'08 CA 89 0A E6 DF 57 21' DC H'AA 0C E6 DF 57 CD 33 07' DC 13 06 00 0E 00 DB 40' DC H'0F DA 9C 00 ED A3 C2 9C' DC H'00 15 C2 9C 00 7B B7 CA' DC H'BE 00 47 0E 00 DB 40 0F' DC H'DA B3 00 ED A3 C2 B3 00' DC H'C9 7A B7 28 13 06 00 0E' DC H'20 DB 40 07 D2 C7 0 DC H'0E 00 CD 8A 00 18 96 CD' DC H'81 00 5F CD 81 00 57 C9' DC H'C5 4B CD 8A 00 4A CD 8A' DC H'00 C1 C9 DB 40 07 D2 81' DC H'00 DB 20 C9 DB 40 0F DA' DC H'8A 00 79 D3 00 C9 7A B7' DC H'28 00 18 0D 11' DC H'00 01 0E 00 CD 8A 00 1B' DC H'7A B3 20 F6 0E 01 CD 8A' DC H'00 18 BA 79 B7 17 F6 40' DC H'D3 C0 65 2E 00 11 00 01' DC H'19 11 00 01 78 B7 28 05' DC H'CD BF 00 18 03 CD 94 00' H'7A E6 CD 76 00 3E 40 D3' DC H'C0 CD 81 00 47 CD 6D 00' DC H'EB 11 FF 00 0E FF 0C B7' DC H'ED 52 D2 14 00 19 3A E9' DC H'00 B9 D2 49 00 78 B7 28' DC H'0E 11 00 01 CD 81 00 1B' DC H'7A B3 C2 2A 21 DE 0C' DC H'CD 33 07 CD 55 07 57 17' DC H'17 17 CD 92 0E 0E 48 CD' DC H'15 00 C3 DA 07 21 F2 0C' DC H'CD 33 07 C3 BC 08 21 EE' DC H'0C CD 33 07 E6 01 C2 C9' DC H'08 CD 5C 07 0E 2C CD 15' DC H'00 CD F7 09 C3 DA 07 21' DC H'F6 0C CD 33 07 CD 5C 07' DC H'C3 DA 07 21 DA 0C 7A E6' DC H'07 CA 6C 0A 7A E6 0F 3D' DC H'CA 31 09 F5 E6 01 CA 12' DC H'09 CD 33 07 F1 E6 08 CA' DC H'06 09 Z80va4' 'Z80CODE.PRNP\& ET (hj0* B6502 Z80 21' DC H'1B 0C 01 18 00 BE C2 05' DC H'0B 21' END 6 3C CD 33 07 CD 90' DC H'07 16 E0 CD 88 07 C3 DA' DC H'07 21 EE 0C CD 33 07 16' DC H'20 CD B5 09 C3 DA 07 5A' DC H'CD 89 06 57 7B FE CB C2' DC H'EF 0A CD 87 09 7A C3 7F' DC H'09 FE ED C2 96 0B 7A DC H'07 21 98 0A CD A4 0E C3' DC H'DA 07 41 46 2C 41 46 27' DC H'00 21 FA 0C 7A FE EB 3E' DC H'02 CA C1 0A 7A FE E9 CA' DC H'CF 0A FE E3 CA BD 0A FE' DC H'F9 C2 DD 0A 21 9A 0D 3E' DC H'06 147 0E 20 DB' DC H'40 07 D2 DD 00 ED A2 C2' DC H'DD 00 C9 00 DA 07 7A FE' DC H'08 CA 89 0A E6 DF 57 21' DC H'AA 0C E6 DF 57 CD 33 07' DC H'CD 5C 07 0E 2C CD 15 00' DC H'C3 25 0A 21 FA 0C CD 33' H'00 15 C2 9C 00 7B B7 CA' DC H'BE 00 47 0E 00 DB 40 0F' DC H'DA B3 00 ED A3 C2 B3 00' DC H'C9 7A B7 28 13 06 00 0E' DC H'20 DB 40 07 D2 C7 00 ED' DC H'A2 C2 C7 00 15 C2 C7 00' DC H'7B B7 28 0E C9' DC H'C5 4B CD 8A 00 4A CD 8A' DC H'00 C1 C9 DB 40 07 D2 81' DC H'00 DB 20 C9 DB 40 0F DA' DC H'8A 00 79 D3 00 C9 7A B7' DC H'28 13 06 00 0E 00 DB 40' DC H'0F DA 9C 00 ED A3 C2 9C' DC 3 20 F6 0E 01 CD 8A' DC H'00 18 BA 79 B7 17 F6 40' DC H'D3 C0 65 2E 00 11 00 01' DC H'19 11 00 01 78 B7 28 05' DC H'CD BF 00 18 03 CD 94 00' DC H'0E 00 CD 8A 00 18 96 CD' DC H'81 00 5F CD 81 00 57 DC H'EB 11 FF 00 0E FF 0C B7' DC H'ED 52 D2 14 00 19 3A E9' DC H'00 B9 D2 49 00 78 B7 28' DC H'0E 11 00 01 CD 81 00 1B' DC H'7A B3 C2 2A 00 18 0D 11' DC H'00 01 0E 00 CD 8A 00 1B' DC H'7A BB0 D9 79 C6' DC H'02 10 EB 3E 00 D3 C0 F1' DC H'3D 32 E9 00 D1 31 00 01' DC H'C3 00 00 33 07 CD 55 07' DC H'CD B4 06 0E 2C CD 15 00' DC H'7A E6 CD 76 00 3E 40 D3' DC H'C0 CD 81 00 47 CD 6D 00' H'FF 20 0B 73 7E BB 20 06' DC H'1C 79 C6 02 10 ED 43 7B' DC H'21 00 00 11 FF 00 19 10' DC H'FD 47 3E 00 D3 C0 31 00' DC H'00 E5 78 F5 3E 00 4F D3' DC H'C0 D9 21 80 FD 11 00 00' DC H'01 EA 00 ED 21 2B 09 CD A4 0E' ZDATA DC A'$1206' DC A'$01FA' ZPADR DC A'$FD06' DC H'3E 00 D3 60 06 08 3E 00' DC H'21 00 00 4F D3 C0 36 FF' DC H'79 C6 02 10 F6 06 08 3E' DC H'00 1E 00 4F D3 C0 7E FE' DC EXX FD50 2180FD LD HL,DVRI FD53 110000 LD DE,0000H FD56 01EA00 LD BC,00EAH FD59 EDB0 LDIR FD5B D9 EXX FD5C 79 LD A,C FD5D C602 ADD A,02H ; 2 FD5F 10EB DJNZ CDVR ; ; SELECT BANK 0, PUSH HL FD48 78 LD A,B FD49 F5 PUSH AF FD4A 3E00 LD A,00H ; ; COPY DRIVER TO EACH BANK ; FD4C 4F CDVR: LD C,A FD4D D3C0 OUT (0C0H),A FD4F D9 K: ADD HL,DE FD3D 10FD DJNZ CBANK ; ; SELECT BANK 0 AND SAVE HL,AF ON THE STACK ; FD3F 47 LD B,A FD40 3E00 LD A,00H FD42 D3C0 OUT (0C0H),A FD44 310000 LD SP,0000H FD47 E5 FD32 10ED DJNZ TBANK ; ; TOTAL UP THE NUMBER OF AVAILABLE SECTORS-(1*nBANKS) ; FD34 43 EBANK: LD B,E FD35 7B LD A,E FD36 210000 LD HL,0000H FD39 11FF00 LD DE,00FFH FD3C 19 CBANHL) FD25 FEFF CP 0FFH FD27 200B JR NZ,EBANK ; FD29 73 LD (HL),E FD2A 7E LD A,(HL) FD2B BB CP E FD2C 2006 JR NZ,EBANK ; FD2E 1C INC E FD2F 79 LD A,C FD30 C602 ADD A,02H ; 2 COUNT THE NUMBER OF BANKS BY LOOKING FOR THE PREVIOUSLY ; STORED FF'S ; FD1B 0608 LD B,08H ; 8 FD1D 3E00 LD A,00H FD1F 1E00 LD E,00H FD21 4F TBANK: LD C,A FD22 D3C0 OUT (0C0H),A FD24 7E LD A,(,08H ; 8 FD0C 3E00 LD A,00H FD0E 210000 LD HL,0000H FD11 4F IBANK: LD C,A FD12 D3C0 OUT (0C0H),A FD14 36FF LD (HL),0FFH FD16 79 LD A,C FD17 C602 ADD A,02H ; 2 FD19 10F6 DJNZ IBANK ; ; ORG 0FD06H ; ; TURN OFF SHADOW ROM ; FD06 3E00 START: LD A,00H FD08 D360 OUT (60H),A ; ; STORE FF IN EACH POSSIBLE RAM BANK ; FD0A 0608 LD B ; DOSRDSK Z80 SETUP CODE ; Disassembly of z80 code for Dosrdsk ; By R. Glenn Jones ; All work done in loader with common ram enabled ; LOADER .Z80 FD06  i$SAVE # OF (BANKS-1), RESTORE # OF SECTORS, ; SET UP A STACK AND JUMP TO THE DRIVER ; FD61 3E00 LD A,00H FD63 D3C0 OUT (0C0H),A FD65 F1 POP AF FD66 3D DEC A FD67 32E900 LD (00E9H),A FD6A D1 POP DE FD6B 310001 LD SP,0100H FD6E C30000 JP 0000H ; ; ; DEFINE STORAGE TO ALIGN THE DRIVER ON A HALF PAGE BOUNDRY ; FD71 DS 0FH,0 ; A 0075 C9 RET ; ; ; Subroutine _WRWORD: SENDS TWO BYTES TO THE 6502_ ; Inputs _2 BYTES IN DE__________ ; Outputs _NONE_______________ ; 0076 C5 ; Inputs _NONE____________________ ; Outputs _2 BYTES IN DE_________ ; 006D CD8100 RDWORD: CALL RDBYTE ; 0070 5F LD E,A 0071 CD8100 CALL RDBYTE ; 0074 57 LD D,00 SCOMP: LD C,00H 0068 CD8A00 CALL WRBYTE ; ; BRANCH BACK TO THE BEGINNING OF THE DRIVER ; 006B 1896 JR DVR .PA ; Subroutine _RDWORD: GET TWO BYTES FROM THE 6502_ ; 005E CDBF00 DORD: CALL RD256B ; 0061 1803 JR SCOMP ; 0063 CD9400 DOWRT: CALL WR256B ; ; SEND A 'NO ERROR' RETURN CODE TO THE 6502 ; 0066 0E 004C F640 OR 40H ; "@" 004E D3C0 OUT (0C0H),A 0050 65 LD H,L 0051 2E00 LD L,00H 0053 110001 LD DE,0100H 0056 19 ADD HL,DE 0057 110001 LD DE,0100H 005A 78 LD A,B 005B B7 OR A 005C 2805 JR Z,DOWRT 18BA JR DVR ; ; DETERMINE PROPER BANK, BUMP POINTER BY 256 BYTES, SET DATA ; LENGTH TO 256 BYTES AND CALL APPROPRIATE COMMAND ; 0049 79 DOCMD: LD A,C 004A B7 OR A 004B 17 RLA03E 7A LD A,D 003F B3 OR E 0040 20F6 JR NZ,WRERR2 ; ; RETURN ERROR CODE AND BRANCH BACK TO DRIVER BEGINNING ; 0042 0E01 BADCMD: LD C,01H ; 1 0044 CD8A00 CALL WRBYTE ; 0047 ; 0033 180D JR BADCMD ; ; DO A BOGUS WRITE AND RETURN AN ERROR CODE ; 0035 110001 WRERR: LD DE,0100H 0038 0E00 WRERR2: LD C,00H 003A CD8A00 CALL WRBYTE ; 003D 1B DEC DE 0 ; ; DO A BOGUS READ AND RETURN AN ERROR CODE ; 0027 110001 LD DE,0100H 002A CD8100 RDERR: CALL RDBYTE ; 002D 1B DEC DE 002E 7A LD A,D 002F B3 OR E 0030 C22A00 JP NZ,RDERR HL,DE 001C 3AE900 LD A,(MAXB-1) 001F B9 CP C 0020 D24900 JP NC,DOCMD ; ; DETERMINE THE COMMAND TYPE IN ERROR ; 0023 78 LD A,B 0024 B7 OR A 0025 280E JR Z,WRERR 1FF00 LD DE,00FFH 0012 0EFF LD C,0FFH 0014 0C GBANK: INC C 0015 B7 OR A 0016 ED52 SBC HL,DE 0018 D21400 JP NC,GBANK ; ; TEST BANK FOR OUT OF RANGE ERROR ; 001B 19 ADD 000A 47 LD B,A ; ; GET THE (BNK/TRK/SEC) FROM THE 6502 ; 000B CD6D00 CALL RDWORD ; ; ISOLATE THE BANK FROM THE TRACK AND SECTOR ; 000E EB EX DE,HL 000F 1 WRWORD ; ; SELECT BANK 0/NO COMMON ; 0003 3E40 DVR: LD A,40H ; 0005 D3C0 OUT (0C0H),A ; ; GET A COMMAND FROM THE 6502 ; 0007 CD8100 CALL RDBYTE DOSRDSK Z80 DRIVER CODE ; DRIVER ; 0000 ORG 0000H ; ; INITIAL ENTRY POINT INTO DRIVER ; RETURNS NUMBER OF AVAIABLE SECTORS TO 6502 ; 0000 CD7600 DVRI: CALLWRWORD: PUSH BC 0077 4B LD C,E 0078 CD8A00 CALL WRBYTE ; 007B 4A LD C,D 007C CD8A00 CALL WRBYTE ; 007F C1 POP BC 0080 C9 RET ; ; ; Subroutine _RDBYTE: GETS A BYTE FROM THE 6502_ ; Inputs _NONE___________________ ; Outputs _A REG HOLDS BYTE FROM 6502_ ; 0081 DB40 RDBYTE: IN A,(40H) 0083 07 RLCA 0084 D28100 JP NC,RDBYTE ; 0i$p Hw6x|Y@ >z>t   : RET ; ; ----------------- 00E9 00 MAXB-1: NOP 00EA END ; 00DA 47 LD B,A 00DB 0E20 LD C,20H ; PORT 20 (INPUT) 00DD DB40 RDOLB2: IN A,(40H) 00DF 07 RLCA 00E0 D2DD00 JP NC,RDOLB2 ; 00E3 EDA2 INI 00E5 C2DD00 JP NZ,RDOLB2 ; 00E8 C9 RRETA 00CA D2C700 JP NC,RDOHB ; 00CD EDA2 INI 00CF C2C700 JP NZ,RDOHB ; 00D2 15 DEC D 00D3 C2C700 JP NZ,RDOHB ; 00D6 7B RDOLB: LD A,E 00D7 B7 OR A 00D8 280E JR Z,RRET utputs _NONE___________________ ; 00BF 7A RD256B: LD A,D 00C0 B7 OR A 00C1 2813 JR Z,RDOLB ; 00C3 0600 LD B,00H 00C5 0E20 LD C,20H ; PORT 20 (INPUT) 00C7 DB40 RDOHB: IN A,(40H) 00C9 07 RLC ; 00B9 EDA3 OUTI 00BB C2B300 JP NZ,WDOLB2 ; 00BE C9 WRET: RET ; Subroutine _RD256B: GETS 256 BYTES FROM THE 6502_ ; Inputs _DE HOLDS LEN, HL POINTS TO DATA ADR_ ; O ; 00AB 7B WDOLB: LD A,E 00AC B7 OR A 00AD CABE00 JP Z,WRET ; 00B0 47 LD B,A 00B1 0E00 LD C,00H ; PORT 00 (OUTPUT) 00B3 DB40 WDOLB2: IN A,(40H) 00B5 0F RRCA 00B6 DAB300 JP C,WDOLB2 LD C,00H ; PORT 00 (OUTPUT) 009C DB40 WDOHB: IN A,(40H) 009E 0F RRCA 009F DA9C00 JP C,WDOHB ; 00A2 EDA3 OUTI 00A4 C29C00 JP NZ,WDOHB ; 00A7 15 DEC D 00A8 C29C00 JP NZ,WDOHB ; Inputs _DE HOLDS LEN, HL POINTS TO DATA ADR_ ; Outputs _NONE___________________ ; 0094 7A WR256B: LD A,D 0095 B7 OR A 0096 2813 JR Z,WDOLB ; 0098 0600 LD B,00H 009A 0E00 ; 008A DB40 WRBYTE: IN A,(40H) 008C 0F RRCA 008D DA8A00 JP C,WRBYTE ; 0090 79 LD A,C 0091 D300 OUT (00H),A 0093 C9 RET ; Subroutine _WR256B: SENDS 256 BYTES TO THE 6502_ 087 DB20 IN A,(20H) 0089 C9 RET ; ; ; Subroutine _WRBYTE: SENDS A BYTE TO THE 6502_ ; Inputs _C REG HOLDS BYTE TO SEND TO 6502_ ; Outputs _NONE________________ B<J0 * DISASSEMBLYDOSRDSKBPRORDSK5B PRORDSK.NOTES 5RAMUB RAM..NOTESARAM.DATAoURAM.DATA.NOTESuBRAM.DVRu RAM.DVR.NOTES5RAM.SUBS@ҁ @ڊyz(@ڜœœ{ʾG@ڳ³z( @{(G @zʉ W! W3\,% ! 3! ͤAF,AF'! z> z ʽ ! ><3͈͐! 3 ͵ Z͉W{ ͇ z – z!  !>`>!O6y>O~ s~ yC{!G>1x>O!y>=213Uʹ,zv>@́Gm R:Ix(́z* ͊z ͊y@e.x(Ϳ͔͊́_́WK͊J͊@@!$!  E:ACR0.MAP 3U ! 3! 3UW͒H! 3ü! 3\, ! 3\! zl z=1  3 !+ ͤLL  HHȱH٠H8L  . qH HhH  HIHȱHIHhH 0HHIHH `@ H8``H h `0`/N)? E E:DOSRDSK.ERLP 0DOSRDSK ERL 1 IL& ")XO*qR&Jy8@S*DR I&"(O)i ,ʢ THE Z80 RAM DISK IS IN SLOT " WELCOME TO THE STAR-CARD SOFTWARE PROGRAM. IF YOU HAVE JUST POWERED UP YOU MUST FIRST INITIALIZE THE DISC. WHEN INITIALIZING THE DISC ALL PREVIOUS INFORMATION STORED WILL BE LOST. DO YOU WANT TO INITIALIZE THE DISC (Y 0 COULD NOT FIND THE STAR-CARD `H h `0`  n q  8` L`??zJJJJ L JJJJ P Z Z8ة8`  `       LHH hh ` 0`0`  ` 8*   ii    0 ԩLQi&i8 8&L p  ` u  8 8Jn!   H hLș D< ٩- 轛mBRAM.SUBS.NOTESRTESTUZDATA@ҁ @ڊyz(@ڜœœ{ʾG@ڳ³z( @{(G @>`>!O6y>O~ s~ yC{!G>1x>O!y>=213Uʹ,zv>@́Gm R:Ix(́z* ͊z ͊y@e.x(Ϳ͔͊́_́WK͊J͊USING THE SLOT AND DRIVE OF THE0DAPPLICARD....SORRY!!! CATASTROPHIC ERROR OCCURRED WHILE INITIALIZING THE VOLUME DIRECTORY EVIOUS INFORMATION STORED WILL BE LOST. DO YOU WANT TO INITIALIZE THE DISC (Y/N)? V) THE PRORDSK DRIVER HAS BEEN PREVIOUSLY INSTALLED AND THE VOLUME FORMATTED DO YOU WANT TO RE-INITIALIZE THE DISC (Y/N)? ANOTHER DRIVER OTHER THAN PRORDSK IS CURRENTLY &++( COULD NOT FIND THE STAR-CARD O( THE Z80 RAM DISK IS IN SLOT p( WELCOME TO THE STAR-CARD SOFTWARE PROGRAM. IF YOU HAVE JUST POWERED UP YOU MUST FIRST INITIALIZE THE DISC. WHEN INITIALIZING THE DISC ALL PRPRAM' `#0`HH F%hh @%` 4%#`H F%h#0` LZ%`؍ Ѝ`D`0D`# #JJJJ P Z 4%Z8#ة8`# F% 4% (#HJJJJ#h`  F% @%   @% # %0ХХC*(G!FGF &B0 H'8HЅЅh(`H Х  h  E E мH Х  Цh  E E Ѝ𐽃`H hШ0`&&&( (N(M( T%# "( e(`#$I11#)p2# o(n(Ll!L!++ !% 0%*&)&N*&n)&*&#()&#(U)T) T% H hL"#( (C*&&(& ($&(& (&(& ( 9*8* T%L1"()N(n(N(n(N(n(((&Lh PRORDSK ::: A PRODOS ADAPTION OF DOSRDSK FOR THE APPLICARD ::: BY R. GLENN JONES VER 1.0 JULY 01 1988"((p I$(*()( T%L1"# $ LNOTOMSG CONFLICT OF INTEREST JSR PRINT JMP QUIT ; ; START INSTALL BY DOING Z80 STUFF ; INSTALL ANOP LDA ZDADRS USING IT INY CPY #10 BNE CHKNCHR CHECK THE NEXT CHARACTER JMP ALTINIT IT'S OURS; SEE IF IT'S TO BE REFORMATTED ; ; NOPE! -----> PRINT MSG AND RETURN TO PRODOS ; NOTODVR ANO START COMPARISON PAST FIRST JUMP CHKNCHR ANOP LDA (WK1),Y GET A BYTE FROM THE DRIVER CMP DVRCALL,Y COMPARE IT TO OURS BNE NOTODVR NOT THE SAME, SOME ONE ELSE I IS IT THE SAME AS "NO DEV CONNECTED" BEQ INSTALL YES; THEN GOTO NORMAL INSTALL STA WK1+1 NO; SAVE IT FOR COMPARISON ; ; CHECK TO SEE IF THE DRIVER IS OURS ; LDY #3 IT THE SAME AS "NO DEV CONNECTED" BEQ CHKHB YES STA WK1 NO; SO SAVE IT IN ZERO PAGE CHKHB ANOP LDA DEVADR01+1,Y GET HB OF DRIVER ADDRESS CMP DEVADR01+1 ; CHKDVR ANOP LDA SLOT0X GET SLOT 0X FORM ASL A INDEX INTO TABLE * 2 TAY LDA DEVADR01,Y GET LB OF DRIVER ADDRESS CMP DEVADR01 ISG LDY ACARDNF LB OF APPLICARD NOT FOUND MSG JSR PRINT PRINT IT. JMP QUIT RETURN TO PRODOS ; ; CHECK PRODOS TO SEE IF A DRIVER IS ALREADY INSTALLED FOR THIS SLOT/DRIVETE THE SLOT STA DEVLST,Y SAVE IT IN THE DEVICE LIST LDA SLOT0X GET SLOT 0X FORM ASL A TAY LDA #