GIOPROYALDZCIOPROYALFOR IOPROYALRELzIOPROYALZZ0%ROYALKEYDZF> SYSDEF LIBHXEROX Z80vIOPROYAL.DOC[DOC]$ t  i6D2NC o Tr4!@A6 A13BtBH2ȀO( pةHy0 fY(D)`i6"㡢2 EhtZ̈́6M dNR @i71 7MZ~6[d։h 3LHa:LjheG# (y g - `Hb2 C@6 EaBiz($@k%"ydL"'SqC#dc#V5lH$ip pG@O Agk$b`Ud.ekQuFaK^il  1GKyޗicQTe&`cHۄQB g*Y:&UE)_4II^E҄&d)={ ҧiiT"PUqFWE1b^b效u_An}ikԅSD1i,9>Q ߱[zLF$U~o+dUEF~*^ٶ<*NB\يсcF$Q{aX $gOuoE5v&&K7s;I֖jM:FWE[8 !k\MeΑKf-8r$QmkJ W˔+lPgU/ a$BfW gq^%]m%Xmi,#&X: Q&Sd.c`{D\z_iumR NڣqiW5AݫFF PtrGD@vƞEC62vf#􂩚+G{3`ϕYԒb`kp0m"|t cBFGÒuaPު`" =ՆEvA8!H*sS@9K*|AA$L&@:2KX*d7 Mzt)-DVD; L %Vz_uAՒ-Ed6򩓳ЈSB ж3 K\)듦&n4,'P:ЮM ah!i LцTnB!zF¤U=R_%Ȑ*+֒ 2OOdA>1x'LDjGJs ]YCȀ-#֍ 9NF X sS4&yAS&La`{HjO2ඊ]$A$P\_d~HEC̡/pb7 R "0V\RNjF[rRZf"j66P d=jxժY3ԵNRI)PCFR$z+0ڒȘe~&ʡK 8 2"Ņ0?d::kȤZ$z{?f;,I\*ң.H TtA5"!Y{2OV\arG#X Cl9W"R.CA#kD0EFe!ACQ9BzĀ .1R;:H(RT o "pA)(F$!\%2[SEǙ.=`&[EICsˆԐ1} dABp5r ]ֈ[¬o"@'HpoA!&͆L!*;1*A%|nEqBXUI_;3ټ m IG8  APiew8vHH x! p`DtHe.zVʠkF*%pBT\ Q9nDF]bDڷ.=X wUm}aWoaV쁈oYj[8Js<qgFge|Oda dk1se2z;ijA68 pj :S=M?vH#k܃+<"9SFa-3aR+0A .A>%!=(&HR "jq8Xf2G!ǐ"{#X70: 8X?V,^"2c9F`1n=8||WFcPL 0Hd1;?2' AXƉ(d=2dBGM'"䬑C#Gy'aACKF8u!p'q;L#r0O,ڐKD7 ✧2t-Y& q٩c%='AM @ႝ |jXa $V.Q|OĀ@p"doJ4ig-N )i>$g>D"!  t;Fh0SfM+ 2@(Y'TPކUYaQL UIfA"'`ٰ3Pb#ʭWmrP* RPl AMB !<&dV`Pŕ Y /l K5hv^dk;F?z;E…I9@A*1"(F8 Md.0AY+5*5DO!Q]ZUcM;);Se98qS|G%ЂxNPvaڟ%AQ%EuvԳkZ#h5n(bͭ#lķFC (9^LXaN AB|ۭQWt U,!jN!̎ĵPӗ)B `Imq@=15!!)G`!L:cCCF 7ħoq;eNȌ"f) CvHZʯ)/ʟ0pd6Y*@sx;$`Uhl’ԋҞV@w;w;?!ǐ|~ ެ( PfA&V '9(RBh0!qw &r6Bpa1-7&?~2 Q/iKTw,Gso`IQ#pG?u!- aS2)tqc'Egu6>m1n1-Eo|hGv7HBAA\9K r"TrvrswrmwřMsmt&+q!7M6ZAcqMtQu3)}'sVqevlvvDwmsb3exGogKwZ18Gxa_}t-LÏ)v$7u~Kcu r~M:a=*TT6q=0nX)ج1a}C~y{=ebt?TdMZsSpVv"pd0LPF(H ^ӧzF >&*A[ rW+'zdd3c@/8S.r3;2:hw/?(!+"e rPӏ_T7;-awn3Ǎ1a"1d""nQ+bWG!,D/q.rM0Bكum?br z=q!n9wQBD :h` љ3KgcG䲕GviJTuI2ȗ~ydif8u0,uyXuGd؝vYAYώ=䋑8RHsKFXJotHA5L2\DU)q`B}a?Յ7_Yr`evB;ՉĚw~B XąbM>)ddDՁaL9d -A$[)agHBv v"Z+c¹:fĢ@͉gig(q*$wiQ{0#885'uKѕ-qh8 Oe< .su~סʋA>L0Yueu[*J2`7kH39Y*d%86drl~Xr8DJ!$71ns .<*lnqtU;+] TϩiqwZN*TvϩaԜxySBBב`hFf;9C6rxՔcԣ,n,"oFau ƭNE`gd%Xp'䔡! B1.HOJmW{deytVO`\@ڰŏ@0!PrEax78[c.@rud^+'nPM!kW'V,&(DZ8D68BW`%WS F[IxhkUQb(s,VN@5Jd L]{. ٴE6ZQP \evROYALKEY.DEF[KEY DEF'S]$ ACR@JFɄ %O"e3MƓnIs:ͦцA"G PH$@*!PhXl0AybȀJ(Sc)@B9Lh@2TÚ *,1HRn9R2$ 4Sq2 8S1l7c]t2&d 6a17Gәi39 X =g .7V*&35ҳtϻ7gS>u !q~q.f&m;F}q!qU~GsG[x!fqDdi~ƑGutp'oV!teg6 `xiarF8|GrvuGᕗ\eviFA C 8j7fnX6AB@3 'Y/~Z q :F h )@ʗ0֔ D6J qpcG*6 @%Z9FQ#J4@|); hKc* CJjÝƙ[l ў'):m;lF 4+R{y4kjխ:Ψ l&DUkEj03o;[z" N,]6qJ/Zvz+#xGGa9r-s e{6&baeW rթJOj1 q\' (fwvAƺ;Eʲ.6QqՄmg[Mђq Ùc1Cj!V,Z69-e, ŮcMtcgX}OU .ryoؽN'aaVzn}^jEwOT+=ވtڞ;_fp:*3 ,,L* ۺ`aU0˽h_ [T4 C (sϠNEXBD LX BH@cT%,17E$R39m#jA8$k `ˉ9Zm#DACD3B 8R d &EKz/0BLQ4x1 sY0b2WǢ $@C:LO1<]TH:0)iz+ n4$Yy; ; LIBRARY OF COMMONLY USED DEFINITIONS ; Use of this library will make assembly language ; programs easier to read and maintain. ; ; The following definitions were collected by ; simply extracting them from ZCPR3 utilities. ; Please feel free to add to this list and to ; comment on the preferred definition where ; there are several equivalent ones. Bump the ; revision # and send it back for coordination. ; ; Version 1.0 - 31 Jan 1986 ; Al Hawley, Z-Node #2, (213) 670-9465 ;---------------------------------------------- ;Logic Definitions FALSE EQU 0 ;these all seem to be TRUE EQU NOT FALSE ;..appropriate in YES EQU TRUE ;..different contexts. NO EQU FALSE ;---------------------------------------------- ; System Functions ; RDCONF EQU 1 WRCONF EQU 2 RDRF EQU 3 PUNCHF EQU 4 LISTF EQU 5 DIRCONF EQU 6 PRBUFF EQU 9 RDBUFF EQU 10 CONSTF EQU 11 VERNOF EQU 12 RESETDKF EQU 13 LOGINF EQU 14 OPENF EQU 15 CLOSEF EQU 16 SRCHFF EQU 17 SRCHNF EQU 18 ERASEF EQU 19 READF EQU 20 WRITEF EQU 21 MAKEF EQU 22 RENF EQU 23 INQDISKF EQU 25 SETDMAF EQU 26 INQALCF EQU 27 ATTRF EQU 30 GETPARMF EQU 31 SGUSERF EQU 32 GETF EQU 0FFH ;get user area e-reg value COMPSZF EQU 35 SETRRF EQU 36 ;---------------------------------------------- ; System Addresses ; OS$BASE EQU 000H ;system base.. CCPLEN EQU 800H ;..and 'CCP' length in bytes. WBOOT EQU OS$BASE+0 IOBYTE EQU OS$BASE+03H UDFLAG EQU OS$BASE+04H BDOS EQU OS$BASE+05H FCB EQU OS$BASE+5CH TFCB EQU OS$BASE+5CH FCB1 EQU OS$BASE+5CH ;preferred (AEH) FCB2 EQU OS$BASE+6CH FCBEXT EQU FCB+12 FCBRNO EQU FCB+32 TBUF EQU OS$BASE+80H TBUFF EQU OS$BASE+80H TPA EQU OS$BASE+100H ;---------------------------------------------- ; ASCII Definitions ; CTRLA EQU 'A'-'@' CTRLB EQU 'B'-'@' CTRLC EQU 'C'-'@' ;..control-C.. CTRLD EQU 'D'-'@' CTRLE EQU 'E'-'@' CTRLF EQU 'F'-'@' CTRLG EQU 'G'-'@' CTRLH EQU 'H'-'@' CTRLI EQU 'I'-'@' CTRLJ EQU 'J'-'@' CTRLK EQU 'K'-'@' CTRLL EQU 'L'-'@' CTRLM EQU 'M'-'@' CTRLN EQU 'N'-'@' CTRLO EQU 'O'-'@' CTRLP EQU 'P'-'@' CTRLQ EQU 'Q'-'@' CTRLR EQU 'R'-'@' CTRLS EQU 'S'-'@' CTRLT EQU 'T'-'@' CTRLU EQU 'U'-'@' CTRLV EQU 'V'-'@' CTRLW EQU 'W'-'@' CTRLX EQU 'X'-'@' CTRLY EQU 'Y'-'@' CTRLZ EQU 'Z'-'@' BS EQU 08H ;..backspace.. TAB EQU 09H ;..tab.. LF EQU 0AH ;..linefeed.. FF EQU 0CH ;..formfeed.. CR EQU 0DH ;..carriage return.. CAN EQU 18H ;..cancel.. EOF EQU 1Ah ;..End-of-file EOFCHAR EQU 1AH ;..end-of-file.. ESC EQU 1BH ;..escape character. SPC EQU 20H ;..space ;---------------------------------------------- ;for TCAP screen functions ; DIM EQU 1 ;for highlighting use BRIGHT EQU 2 ;opposite of dim CL EQU CTRLZ ;clear screen, home cursor CRUP EQU CTRLE ;cursor up CRDN EQU CTRLX ;cursor down CURSL EQU CTRLS ;cursor left CURSR EQU CTRLD ;cursor right