mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-26 01:44:21 +00:00
69 lines
3.4 KiB
Plaintext
69 lines
3.4 KiB
Plaintext
8086/8087/8088 MACRO ASSEMBLER PXIOS 18:10:30 04/22/83 PAGE 1
|
||
|
||
|
||
VAX/VMS 8086/8087/8088 MACRO ASSEMBLER V1.0 ASSEMBLY OF MODULE PXIOS
|
||
OBJECT MODULE PLACED IN PXIOS.OBJ
|
||
NO INVOCATION LINE CONTROLS
|
||
|
||
|
||
LOC OBJ LINE SOURCE
|
||
|
||
1 ; Interface to call Physical XIOS
|
||
2 ; From a process not in the O.S.
|
||
3 ; code reentrant, separate data areas per process
|
||
4 ; used by VOUT and PIN RSPs
|
||
5
|
||
6 name pxios
|
||
7
|
||
8 cgroup group code
|
||
9 dgroup group dats
|
||
10
|
||
11 assume cs:cgroup
|
||
12 assume ds:dgroup
|
||
13
|
||
---- 14 dats segment public 'DATA'
|
||
15 extrn rsplink:word ;segment of SYSDAT
|
||
16 extrn udaseg:word ;UDA must be in ES for XIOS call
|
||
17 extrn u_retseg:word, u_wrkseg:word, u_insys:byte
|
||
---- 18 dats ends
|
||
19
|
||
---- 20 code segment public 'CODE'
|
||
21 public pxios1, pxios2, pxios3, pxios4
|
||
0028 22 xiosmod equ 28h
|
||
0010 23 p_uda equ 10h
|
||
0068 24 rlr equ 68h
|
||
25
|
||
0000 26 pxios2 equ pxios1
|
||
0000 27 pxios3 equ pxios1
|
||
0000 28 pxios4 equ pxios1
|
||
29
|
||
0000 30 pxios1 proc
|
||
0000 55 31 push bp
|
||
0001 8BEC 32 mov bp,sp
|
||
33
|
||
0003 8B4608 34 mov ax,[bp+8] ;set up registers
|
||
0006 8B4E06 35 mov cx,[bp+6]
|
||
0009 8B5604 36 mov dx,[bp+4]
|
||
37
|
||
000C 1E 38 push ds
|
||
000D 8E1E0000 E 39 mov ds,rsplink ;SYSDAT
|
||
0011 8B366800 40 mov si,ds:word ptr rlr ;ready list root
|
||
0015 8E4410 41 mov es,[p_uda+si] ;UDA
|
||
0018 FF1E2800 42 call ds:dword ptr [xiosmod]
|
||
001C 1F 43 pop ds
|
||
44
|
||
001D 5D 45 pop bp
|
||
001E C20600 46 ret 6
|
||
47 pxios1 endp
|
||
48
|
||
---- 49 code ends
|
||
50 end
|
||
8086/8087/8088 MACRO ASSEMBLER PXIOS 18:10:30 04/22/83 PAGE 2
|
||
|
||
|
||
LOC OBJ LINE SOURCE
|
||
|
||
|
||
ASSEMBLY COMPLETE, NO ERRORS FOUND
|
||
|