;
; 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.
;
; Rev   1.1 - 10 Feb 1988       Joe Silvia
;       Changed OS$BASE to BASE for uniformity with Z3BASE.LIB
;       * added equates
;
; 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
NO      EQU     FALSE           ;..different contexts.
YES     EQU     TRUE

;----------------------------------------------
; 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
;
CCPLEN  EQU     800H            ;..'CCP' length in bytes.
BASE    EQU     000H            ;..system base..
WBOOT   EQU     BASE+0
IOBYTE  EQU     BASE+03H
UDFLAG  EQU     BASE+04H
BDOS    EQU     BASE+05H

FCB     EQU     BASE+5CH
TFCB    EQU     BASE+5CH
FCB1    EQU     BASE+5CH        ;..preferred (AEH)..
FCB2    EQU     BASE+6CH

FCBEXT  EQU     FCB+12
FCBRNO  EQU     FCB+32

TBUF    EQU     BASE+80H
TBUFF   EQU     BASE+80H

TPA     EQU     BASE+100H

;----------------------------------------------
; ASCII Definitions
;
CTRLA   EQU     'A'-'@'
CTRLC   EQU     'C'-'@'         ;..control-C..
CTRLD   EQU     'D'-'@'
CTRLE   EQU     'E'-'@'
CTRLF   EQU     'F'-'@'
CTRLK   EQU     'K'-'@'
CTRLQ   EQU     'Q'-'@'         ;..XON..                * added 1.1
CTRLR   EQU     'R'-'@'
CTRLS   EQU     'S'-'@'         ;..XOFF..
CTRLX   EQU     'X'-'@'
CTRLZ   EQU     'Z'-'@'

BELL    EQU     07H             ;..console bell..       * added 1.1
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..

; end sysdef.lib
..................... ... ...-....1200 N81N         ......................... ... ...-....1200 N81N         ............