4-READ ME  FGET-TIMEAZMD1GET-TIMECOMpMAKE1 SUB%MAKE2 SUBMAKEEXECSUBjPCPI-RTCCRC vPCPI-RTCCZM#PCPI-RTCDZCy7XPCPI-RTCZZZ2GJWHATSFORTXTp PCPI-RT contain th followin programs mainl i crunche form t implemen rea tim cloc fo th PCP Applicard usin th on- boar Z80CT chip Thi softwar i specifi t ZCPR2 bu ma b adapte t othe CCPs. -READ.ME This file. GET-TIME.AZ Sourc o BIO tim cal example. GET-TIME.COM BIOS time call example. MAKEEXEC.SUB Primary batch file for use with GSUBxx.COM. MAKE1.SUB Secondary batch file called by MAKEEXEC.SU t generat ZCPR system. MAKE2.SUB Secondary batch file called by MAKEEXEC.SU t INSTAL ne PCP system. PCPI-RTC.CZM (PCPI-RTC.COM) Assembled real time clock code, requirin CP/ To o Memor valu of 0FD00h. PCPI-RTC.CRC CRC list of these files. PCPI-RTC.DZ (PCPI-RTC.DOC Installatio detail an technica description. PCPI-RTC.ZZZ (PCPI-RTC.AZM) Source of Real Time Clock. WHATSFOR.TX Brie descriptio o PCPI-RTC.LBR.; GET-TIME.AZM - An example of how the new time string BIOS call may ; be used. ; BDOS EQU 0005 ; CONOUT EQU 2 PRNSTR EQU 9 ; JPOFST EQU 33h ; offset of time call JP from beginning of ; BIOS. ; ; ORG 100h ; LD (SAVESP),SP LD SP,LOCSTK ; LD DE,MESSAG LD C,PRNSTR CALL BDOS ; LD HL,(0001) ; Get warm boot address LD L,JPOFST ; Set HL to Time JP in BIOS Jump Table ; LD (RELOC+1),HL ; Patch CALL ; RELOC: CALL 0000 ; LD B,0Bh PRINLP: LD A,(HL) LD E,A LD C,CONOUT ; BDOS Console Output call PUSH BC PUSH HL CALL BDOS POP HL POP BC ; DEC B JR Z,DONE INC HL JR PRINLP ; DONE: LD DE,CRLF LD C,PRNSTR CALL BDOS ; LD SP,(SAVESP) RET ; MESSAG: DEFB 0Dh,0Ah,0Dh,0Ah,'The time is now',20h,20h,'$' CRLF: DEFB 0Dh,0Ah,0Dh,0Ah,'$' SAVESP: DEFS 2 DEFS 30h LOCSTK: ; END sU1: *.3" ~_(#P {U The time is now $ $;Instal ZCPR2 in PCPICPM (K.B/G.J.M) ;A two stage batch process is required to make GSUB run properly. ;Initiate by GSUB14 MAKEEXEC GSUB14 MAKE1 GSUB14 MAKE2 ; ;Note all of the required files for this installation will fit, in ;crunched form on a 5 1/4 Apple floppy. The installation may be most ;conveniently be done by use of a RAM disk of approximately 200K ;capacity.;Instal ZCPR2 in PCPICPM (K.B/G.J.M) ; ;** Note** Use ZCPR2.ASM modified to include the CCPFLG flag ; MAC ZCPR2 $$PZ SZ ^G DDT {F100,3700,00|IZCPR2.HEX|R2500|G0|} SAVE 8 ZCPRDC00.COM MAC ZCPR2 $$PZ SZ +R ^G DDT {F100,3700,00|IZCPR2.HEX|R2400|G0|} SAVE 8 ZCPRDD00.COM GENBMAP ZCPRDC00.COM ZCPRDD00.COM DDT {F100,500,00|IZCPRDC00.MAP|R|M100,1FF,6000|F100,900,00|IZCPRDC00.COM|R|M100,8FF,7000|F100,3700,00|IPCPICPM.BAC|R|M7000,77FF,200|M6000,60FF,3120|G0|} SAVE 54 STARCPM ^G^G INSTALL {ADRIVERS|IB$$FD00|XBB|XX} ^^^^ ;Use Top of Memory address as indicated by running PCPI-RTC.COM ^G ^G ^G ---> MAKE1 .SUB CRC = 5A 2C ---> MAKE2 .SUB CRC = D8 79 ---> MAKEEXEC.SUB CRC = 5C 79 ---> WHATSFOR.TXT CRC = AB 2F ---> PCPI-RTC.DZC CRC = 0D 29 ---> PCPI-RTC.CZM CRC = 4D 2A ---> GET-TIME.AZM CRC = F3 45 ---> GET-TIME.COM CRC = AE B8 ---> PCPI-RTC.ZZZ CRC = D9 3E ---> -READ .ME CRC = 47 56 vPCPI-RTC.COM yNiPŜ rXVi!sjq )_\ *)%R̐E N#*'pd"#<3 0# M}P}^̎,pxe8 c0> /25|s># ߐ)tX4?Cj1 8Ŭnd7@PPYB! 0Pn "@Jo]"b@S(@ rIII*vnM19&b[  К0 HH !ƘOjcL@ p)I(t,ƜSwD;Ɋ h w(yx",5Pl <,N@Dg$rD 6rPDgH.rDZvrPDrjYCyp$g-Bvp %'-!BrPT1-)CJrT 1AhSPT9@!Hب# 1`a0%X~BGTP  ʌ d@r&brX ^ ֐\@ЭdhGx>1(@~X@r;:eӂx) OU?@jԙR0| s@0@=F(F4@u@X#xx>l P 2􃨝yAQ8 EP0olEP8\yT Pp D> @X:*#u 4EP;mwL@9x p `p_@`!(? q7@XO4c\L|@v,c @@@vPCPI-RTC.AZM  2$T!E4@ pB  e0 A:A8&p7"9d7pa9$X H!$"L@O: 's@a7Ll1DZ21h,AF 2e 3Xo: &-g .4q{-h4(yA`l4fAp&ߠHʔQn1g1,7&I4m4ts([I[v;!y`.fNfyx:;^M$<>ҲihlH4M1L]jFzu'H٦}}G1Mq =Q0L qqݛ!u^ё"f{Ԗz^1-o{ٕ٫ g.l՛s\eGQEpNY[׹Q4^u{aa fY\n}7o#ay$ids`!{spHx\FaKlY:6cFUnU[WoӶR QTQ@+NCHDܵ N$N@ Qt'ᾱGQfG(+TZѰln /IU¡/aQw|_[sESk1O% qԕ(fST~HEPVL[y" $KM5Ǹ8+>=PB('atIb@ i'c KC:v`o!;T!  Rl6Bkrn{:c0_*?*0"[*:PW$PPx ) לC`)6@$'ĵ y lюģ 6X9A@F R1X"SUi8+d+'R@}`rWHPg ȣ s5yX9ytLBCt3''ꅛNfȽrEpR6P+l(lRi2`$2^/&k. a(($ M[GIA5.Q$$E(XL%e@f8hMjMNFk2`c!NqT?F0ĝ=IP>M7Jir&HX`u/tTB hSa@OfU6sM lqO4_4B,{$V0t>uƹ(7E.+D ~5&}`@>z rFNUdo~GPAJ@ W +:f ? b Z~:tzVw_9QK'!s#F !1 Kt:Qax)z`$S{ʤ>eeq:eR1q9'A`1eV궥ڲʺ* ٤ۭLRZ='1jz/ EB ' s2Gj  'jƓ߮(ɮH9@A1PK]J֮Z|**[sJx$i<A6fUv 5~3HP{ rp8%y _S[O.1biRHiL'iU{Mb5M.Pc@LbRc~*-C76 䀌vmu_t ѐs&෤wilAY) uxX;Xd:]bժPgVdtG0$~iߟxF/DV'Ligj"L42ݠd|VvS5D,;FN`EN;ļdv5XA@h4! g*\=+H7nks!f~frnBkBFTPME0Ukq*Yr P!~Hcq½U@槔Ɠ'("rM5GOIddg +{I|r5FYt|i][c.L9eO%VX6lTM$̖|/[8U@P_DJPPevdlvǴPIųI|ndN[$ۼғWWNYjwֽ(ՠ5LT*}֝G*)1pvnrjiFZ^?%-4b7* .-Hbqu13Q9M]vx-g|MJ{d03T0 p0673~RŁի3 0}] ۆ(F1#1mut-|]YP%~1Ggݐ1ś8m ,]Gi_-- ! p2[7~ 4|q`SUFb!@  MRwލ[Mknsu;gWLܜ"5BsR]嵵-HoMۺ}7_^]'gY~ է~3n/0}r7ZYߤ0 L%߹j%HΟuyansJ 7=Zwߞy߽ޢ߽C> N.>둲D;/۞Iv|>nFGP>MOn6"<AaWTǞ?M}m1p5.-FMPOL z$#` jε#Ƣly5H~u^N.{5/E-\@'A?CF?HL3@G_PRG?/l_.W1oe+dl'"?\ި> [4.ܓNF}4]z(?bQKj*mRŶ#"4VQjm@R<2+}uXG+ܙ L<0C/+d7̠]`Mf@+~]`McYԜwt0\~ICGC'*?j%+%ō5N$HdV_W|O[ ѝPQDղkCfG[*\*sk kEawB}DU Maƿ^s+_]f+T8L@"R$)⦽'QXBl'gavѝ{]894ɷx_TacX=DZgå\чVM[+,wܣEiѾ!%$`Kjp2X%,;⼟5cMQm uƕ|@ɗETq`ɷ|a@Mrh˽|ce'#l<_e +:ָ0C/qCevǴ`x;hn]P.@jM\, 6bQȽ/ke+;01}}PCqkBS9k!¼{\~u[؂rocbSJi1Z:G3$!q4a}uQA@fo ٘I?FSi} daQrUi"{!2/^|EO%a'*RkIqѺ"VAR!6/"Dx_Ee_.:]"|*$lȿ|Yc=PħcbeJ99oqR_Ylf6TBpc؞aL[rT@5f^ HsEhsh&RME Ň0՜ V| b//z0{>&~2xLV?:qx!%E+3 -s|ᣥ8BUg1MPPAřIB17tޛ^8/1KnFph2fa,g!<'jE2) Sc*fq5%g$I!?%ag%Aί)˧˩%bCA<h}%uVb LRQ427'"kER\7Dh/#rEE{;5rz8D'ꞄV>a2'M{byO 3hyF‡nNhyFq/Fו:Nʗ*|{Ϩ:SA(.eCdg$D3<3RtCbL){jf{iX<'$E6 'j{q30Ikw=R,J@sJC'$T+w9@,@L),C̴hu4gM"q~)UdNL,L:eĄԞ$uᬝnң0ĭU~Y&z' >pSoi!;B{(Nq{wMz4rQ [0,).w2po!!6)fkxrr!02P6bEXBq`wQX8`UT1X$iFx:nQ9\(T ۇ'G# ,Vl6 @A5umA`4 xS!kO$$HL)cF4,Ӑ0nFOw59dVPpWa4k2R}1PU?0T$ PLjM|LT#>NGV&q,K t$K+CKpEa=]ҧ f7 E%]h9UKy8ݮaT*6"N? N8VJjH1Gs6Eً %89U)T߄!HӝCڼWBR mq'=58j N.7ȋHp,T>'}U4Uaqn^ zM5tN6L\6skf+hq%ze|Ō\Y|Ծa@J槉6S:ebl(%Gkί`_))`vD%S&'rrCЛΏ7&pG.{4EߜԏCLi-eS|T_+htsCGIBU)8{4wDYKHy40>[﹗E{7psGr= CD\k,5 `_DeFZY"h2hґxuUGpA?e& ʿ-#",8z޶3ܼEdeGiLh==5 R$r^c&0MtN L"3!ΝX%'1B'6gAX*֝ښdҖ9)&5N|Y|=.IBUjn)cMƄ #65Yjl!J"a줵{e8!c.6/>|RAaxG+ n*\HDI3ܟ6VtsQ"V[ч)lZ؂b 8k;*r{XL)2uB@__+:r.n}Weцp]eJqɆ*yBYI 99F`<2y S,,Bdd"ڔC9cl¢I3wO lG-Ğ jl.L3\Kb1'lH<_KN _lϼMLFf?1cYlHmQB 0Mh.JTZBēy>$H̚921@ )vPCPI-RTC.DOC $pN*H" 0@R"BI4 ! 2XO)E IJa$A)*P'rlJ-<O ll1ʤl̳IACA (\D'cIf7HT!"A z Si1kU4i6 Sit0 &p8D#)-ʛl3a .D5Hnrg-!D !I1Bbmv=ɖ1 ɬ1Uii79S5]MrʖS`.I!ʛէ`gigAx C4ͻoE7Ymd~ap7`]bXфc[AW/fҐ|uPDiږWy`1tAweu"F g6Lr"|h3 e[_Z և sG!ivSЁ$(!oh0pFHxY AsVd#!׭4 DJ17UG>h&sigϭW~gl`)Ȫ]YuQ)3)A|<0׵eեtķy\bn͖M6 AQ&;ѱ I2YV#Es5G>Wwt^n޻a@Jau_-Ã;2Yjs]km4D%@*BAxM..*jTkLA&2\+E0 1c:b_|%R`!p[ f#n$#w 2(;gu(Ȑ 6,Dfa[/]ĩ4+O!^C8g/9#\qb`Wzm0RVa2JFֳdLIG"GsSɖfc^Z(C'v Wb1'`7P̊zga(bh 9fXg,Ȣ欓ʵrH2`\Rހ 0TdL` MY.}]@&pgBA'vY9hf3 ( c D`.a><4AGe$E`jQ% "2,QM$$2IxE#$, p0/lZn 3#H1# ;qТW@UUւLyM8@e)D0FMkidItUيUp_hlgŘYS9A׃iZ;.XXRaDlCn;: f ޒYclm\ u#4]Aj[}pT๓b:&ŜJܰvenUj[Pʭ0,[Pbgɵ' 2;8pEh'Ɲ1a5_@ ~1YaՆ8W @*B6ydd'H |[c)B@m\PR@f IL$ s` s 6 5OTE!y/hP&97T !4+ Abߨ#S9B!@*h|՛-OCC0tgBCZ lb K]്U0#Սk:SKfYmF@0&J &̡s20,ip U-jr!-EպHbu!aM6Q)ٛ;.6_GPy;P(Q Qpa(gmH AT0 ("JFt' ׽b@ 0Iȹt+-0dm(PNAhŗU;6Qu#hP\:#a*ؔ܂\]; 3Y:0*4ǠSä_xb(P:Y%0tҋ̏A@TB&)f%fA7ZW?_@N۷hͰ1FXOx<7 _Eŋ -)tCEWARK*G$ - ܄E 1tBmFHR]ƒ4T%3Ar-V|6AI-T1tetB,3u\$QeoRu/l"81uQeZp/%~S?!)M5tC_%!7KC?,@?#C8"BuG7!3Se.u8(Pw׾?$T#2J_"aWQYDBC K%yHX(yRw"9vCR(" RtmR!rI Xz1g0#A∘q^IAze].d0+!qPEPXQtf֎E}X󉎓A}!puF[CԖa#^&7$X &x9Q$q'&MD'nv|ZSR2X2"py`Pp0N7A[R$tQtTD2ҌvpѿjPm#A!ZAa#F03/h$)F*=V^%45e~$1Z"8%ُ0K`8L&xI-j:"2IzS(?b0y^L{`5PP^(55@-qFrc{\rY:ǟjR$ӎPH[jDSLt8p.ZQa\q'^\ImYKb`@v``VQ`sadcY%0yZ3"5 (]Nc%X]3;t G5asQ`587Q)3〦AjE1ZЊ!I"(Misӣ}ArNaA| Y9PtP_^JD^2SBP6 Zi(#YP%&1X#R6 2hamCes5>rMa0٫15tC)Q(0"u}E9xClCZ)A! AM@nI#͛ČC;{Sy(xRM\BhgApl&$<<T?FӭgP$,{lDsII4XA:PS'lbaOC 1 h`2[{9ctAʯS 8 Diqqޔh)\8%"?c5!1Xy%)Bs(BXTDI T@0K@o[W85h7mhIH)c-2kD8+J_]!ǻ'+"+Nϋa$!F0B'Z\wG~̩$/CƅhBXRv0SPEa S!W| >/DYD'AXtV9[HM<!MA$T,ptB5Rc̻BD"'"<tJ"KK!Fo}#$lD9cbsp'bIRs$B#!G1u0M,! 4M!e؜\>Qn2bj&rm]3ïz̉͑,5,ɽ"8 CA"M=^đa= 9cC"|nƒ =8DGND3$d[I tm HQ|X! [:Dʪ$zc &-XyrZi..@w\+M2B1F"v)dq\$-{+tL,-2C|ӓ5ܜJa1p*Jx#%dD.4\#q3‘](O\1 ӕzIy&0(\}ZGp٢wyR A|^XLC~$}:yYbV?퀲$E- }XړR4&}ݬmV@-<= 26&3ʴMǑ2Zq:^j6.@aʡBzro9_$!dLH|x@t@ QL8VzNI3D;ha2ޭM^?}ox .ܮJ.\=@~n~,ރ=]LFG43U2ȣ/λ"PQZZQX> 7\҂(I8`010hLT$Ӹtf^^}aȞaZoҮ@?NK|}o(Tl=@a@"V|' Ŕ\Ƃ@>dj/>\SjS6~qyeךu)TRRqI|TFKMuZATxv,ƮAu+*8&.!`A dzjH"+'PeM0G5wHcs2Dġ=0m8qSB%7ޑ%1`155 - 29 q#1RpO#6SXZp.r:_a60PJrġdcr0.>PCPI-RTC.LBR - Real time clock using Applicard on-board Z80CTC PCPI-RTC.LB contain sourc an assemble version o real- tim cloc fo th PCP Applicard Th RT i implemete usin th on-boar Z80CT chip Th CP/ promp i modifie t indicat time whic i update eac second BIO cal i als provide t extrac th time a require b othe applications Thi specifi applicatio i fo us wit ZCPR2 bu ma b modifie fo othe CCPs.