You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
124 lines
6.4 KiB
124 lines
6.4 KiB
; Kernel OLD routines, NOPs, but exist in KERNEL.DEF, so I can't kill them
|
|
|
|
|
|
.xlist
|
|
include kernel.inc
|
|
include tdb.inc
|
|
include newexe.inc
|
|
.list
|
|
|
|
sBegin CODE
|
|
assumes cs,CODE
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; LimitEmsPages ;
|
|
; ;
|
|
; Limits the total number of EMS pages a task may have. ;
|
|
; ;
|
|
; Arguments: ;
|
|
; Maximum amount of memory in Kbytes that this task wants. ;
|
|
; ;
|
|
; Returns: ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
; Fri Jun 26, 1987 01:53:15a -by- David N. Weise [davidw] ;
|
|
; Wrote it. ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
cProc LimitEmsPages,<PUBLIC,FAR>
|
|
; parmD amount
|
|
cBegin nogen
|
|
xor ax,ax
|
|
|
|
cwd
|
|
ret 4
|
|
cEnd nogen
|
|
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; KbdReset ;
|
|
; ;
|
|
; Keyboard driver calls here when Ctl+Alt+Del is happening. ;
|
|
; ;
|
|
; Arguments: ;
|
|
; ;
|
|
; Returns: ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
cProc KbdRst,<PUBLIC,FAR>
|
|
cBegin nogen
|
|
|
|
ret
|
|
cEnd nogen
|
|
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; GetCurPID ;
|
|
; A utility routine for EMS functions needed from user routines ;
|
|
; ;
|
|
; function = ;
|
|
; 0 - return the current PID in ax ;
|
|
; 1 - copy the TDB_EEMSSave area into a new block and return ;
|
|
; the new block's handle in ax ;
|
|
; 2 - do not free the banks of the current app ;
|
|
; 3 - free the given PID's banks ;
|
|
; 4 - do an HFree on the given handle ;
|
|
; 5 - get expanded memory sizes ;
|
|
; 6 - ;
|
|
; 7 - do an EMS_save ;
|
|
; 8 - do an EMS_restore ;
|
|
; ;
|
|
; ;
|
|
; Arguments: ;
|
|
; None ;
|
|
; ;
|
|
; Returns: ;
|
|
; see above ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ax,bx,cx,di,si,ds,es ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
; Fri Jul 17, 1987 11:02:23a -by- Rick N. Zucker [rickz] ;
|
|
; Wrote it. ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
cProc GetCurPID,<PUBLIC,FAR>,<di,si>
|
|
parmW function
|
|
parmW gcpArg
|
|
cBegin
|
|
xor ax,ax
|
|
xor dx,dx
|
|
|
|
cEnd
|
|
|
|
sEnd CODE
|
|
|
|
end
|