mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-25 09:24:19 +00:00
12 lines
316 B
Modula-2
12 lines
316 B
Modula-2
;*****************************************************
|
|
;*
|
|
;* Assign Console Control Block
|
|
;*
|
|
;*****************************************************
|
|
|
|
acb_cns equ byte ptr 0
|
|
acb_match equ byte ptr acb_cns + byte
|
|
acb_pd equ word ptr acb_match + byte
|
|
acb_name equ byte ptr acb_pd + word
|
|
acblen equ acb_name + pnamsiz
|