mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-27 02:14:19 +00:00
Upload
Digital Research
This commit is contained in:
47
MPM OPERATING SYSTEMS/MPM-86/MPM-86 2.0 SOURCES/01/EQU.BDO
Normal file
47
MPM OPERATING SYSTEMS/MPM-86/MPM-86 2.0 SOURCES/01/EQU.BDO
Normal file
@@ -0,0 +1,47 @@
|
||||
;
|
||||
; BDOS symbols:
|
||||
;
|
||||
on EQU 0ffffh
|
||||
off EQU 00000h
|
||||
testf EQU off
|
||||
;
|
||||
; Special 8086 symbols:
|
||||
;
|
||||
b equ byte ptr 0
|
||||
w equ word ptr 0
|
||||
;
|
||||
; literal constants
|
||||
;
|
||||
enddir EQU 0ffffh ;end of directory
|
||||
;
|
||||
; file control block (fcb) constants
|
||||
;
|
||||
fcblen EQU 32 ;fcb length
|
||||
empty EQU 0e5h ;empty directory entry
|
||||
lstrec EQU 127 ;last record# in extent
|
||||
recsiz EQU 128 ;record size
|
||||
dirrec EQU recsiz/fcblen ;directory elts / record
|
||||
dskshf EQU 2 ;log2(dirrec)
|
||||
dskmsk EQU dirrec-1
|
||||
fcbshf EQU 5 ;log2(fcblen)
|
||||
extnum EQU 12 ;extent number field
|
||||
maxext EQU 31 ;largest extent number
|
||||
ubytes EQU 13 ;unfilled bytes field
|
||||
modnum EQU 14 ;data module number
|
||||
maxmod EQU 63 ;largest module number
|
||||
fwfmsk EQU 80h ;file write flag is high
|
||||
;order modnum
|
||||
namlen EQU 15 ;name length
|
||||
reccnt EQU 15 ;record count field
|
||||
dskmap EQU 16 ;disk map field
|
||||
lstfcb EQU fcblen-1
|
||||
nxtrec EQU fcblen
|
||||
ranrec EQU nxtrec+1 ;random record field (2 bytes)
|
||||
;
|
||||
; reserved file indicators
|
||||
;
|
||||
rofile EQU 9 ;high order of first type char
|
||||
invis EQU 10 ;invisible file in dir command
|
||||
ARCHIVE EQU 11 ;FILE HAS BEEN ARCHIVED ATTRIBUTE
|
||||
;
|
||||
|
||||
Reference in New Issue
Block a user