63 lines
1.1 KiB
NASM
63 lines
1.1 KiB
NASM
|
;
|
||
|
|
; Command & Conquer Red Alert(tm)
|
||
|
|
; Copyright 2025 Electronic Arts Inc.
|
||
|
|
;
|
||
|
|
; This program is free software: you can redistribute it and/or modify
|
||
|
|
; it under the terms of the GNU General Public License as published by
|
||
|
|
; the Free Software Foundation, either version 3 of the License, or
|
||
|
|
; (at your option) any later version.
|
||
|
|
;
|
||
|
|
; This program is distributed in the hope that it will be useful,
|
||
|
|
; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
; GNU General Public License for more details.
|
||
|
|
;
|
||
|
|
; You should have received a copy of the GNU General Public License
|
||
|
|
; along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
|
|
;
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
IDEAL
|
||
|
|
P386N
|
||
|
|
LOCALS ??
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
segment realcode para public USE16 'code'
|
||
|
|
|
||
|
|
|
||
|
|
global PASCAL ASM_IPX_INITIALISE:far
|
||
|
|
global PASCAL ASM_IPX_UNINITIALISE:far
|
||
|
|
|
||
|
|
|
||
|
|
proc ASM_IPX_INITIALISE PASCAL FAR
|
||
|
|
|
||
|
|
int 3
|
||
|
|
mov ax,7a00h
|
||
|
|
int 2fh
|
||
|
|
and eax,0ffh
|
||
|
|
cmp al,-1
|
||
|
|
setz al
|
||
|
|
ret
|
||
|
|
|
||
|
|
endp ASM_IPX_INITIALISE
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
proc ASM_IPX_UNINITIALISE PASCAL FAR
|
||
|
|
|
||
|
|
ret
|
||
|
|
|
||
|
|
endp ASM_IPX_UNINITIALISE
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
ends
|
||
|
|
|
||
|
|
end
|
||
|
|
|
||
|
|
|
||
|
|
|