mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-25 17:34:06 +00:00
51 lines
894 B
Plaintext
51 lines
894 B
Plaintext
; Interface to call Physical XIOS
|
|
; From a process not in the O.S.
|
|
; code reentrant, separate data areas per process
|
|
; used by VOUT and PIN RSPs
|
|
|
|
name pxios
|
|
|
|
cgroup group code
|
|
dgroup group dats
|
|
|
|
assume cs:cgroup
|
|
assume ds:dgroup
|
|
|
|
dats segment public 'DATA'
|
|
extrn rsplink:word ;segment of SYSDAT
|
|
extrn udaseg:word ;UDA must be in ES for XIOS call
|
|
extrn u_retseg:word, u_wrkseg:word, u_insys:byte
|
|
dats ends
|
|
|
|
code segment public 'CODE'
|
|
public pxios1, pxios2, pxios3, pxios4
|
|
xiosmod equ 28h
|
|
p_uda equ 10h
|
|
rlr equ 68h
|
|
|
|
pxios2 equ pxios1
|
|
pxios3 equ pxios1
|
|
pxios4 equ pxios1
|
|
|
|
pxios1 proc
|
|
push bp
|
|
mov bp,sp
|
|
|
|
mov ax,[bp+8] ;set up registers
|
|
mov cx,[bp+6]
|
|
mov dx,[bp+4]
|
|
|
|
push ds
|
|
mov ds,rsplink ;SYSDAT
|
|
mov si,ds:word ptr rlr ;ready list root
|
|
mov es,[p_uda+si] ;UDA
|
|
call ds:dword ptr [xiosmod]
|
|
pop ds
|
|
|
|
pop bp
|
|
ret 6
|
|
pxios1 endp
|
|
|
|
code ends
|
|
end
|