ReC98/libs/master.lib/respal_free.asm

56 lines
750 B
NASM
Raw Normal View History

2014-09-03 13:41:25 +00:00
; master library - PC98
;
; Description:
; 常駐パレットの開放
;
; Function/Procedures:
; void respal_free( void ) ;
;
; Parameters:
; none
;
; Returns:
; none
;
; Binding Target:
; Microsoft-C / Turbo-C / Turbo Pascal
;
; Running Target:
; PC-9801
;
; Requiring Resources:
; CPU: 8086
;
; Notes:
; 常駐パレットが作成されていなければ、何もしません。
;
; Compiler/Assembler:
; TASM 3.0
; OPTASM 1.6
;
; Author:
; 恋塚昭彦
;
; Revision History:
; 92/11/16 Initial
func RESPAL_FREE
mov AX,ResPalSeg
or AX,AX
jnz short @@FREE
if GAME ge 2
2014-09-03 13:41:25 +00:00
nop
endif
call RESPAL_EXIST
or AX,AX
jnz short @@IGNORE
@@FREE:
mov ES,AX
mov AH,49h ; メモリブロックの開放
int 21h
mov ResPalSeg,0
@@IGNORE:
ret
endfunc