mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 22:43:15 -06:00
116 lines
2.6 KiB
Plaintext
116 lines
2.6 KiB
Plaintext
;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'-'@'
|
||
CTRLC EQU 'C'-'@' ;..control-C..
|
||
CTRLD EQU 'D'-'@'
|
||
CTRLE EQU 'E'-'@'
|
||
CTRLF EQU 'F'-'@'
|
||
CTRLK EQU 'K'-'@'
|
||
CTRLR EQU 'R'-'@'
|
||
CTRLS EQU 'S'-'@' ;..XOFF..
|
||
CTRLX EQU 'X'-'@'
|
||
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
|
||
|