ReC98/th05/hardware/snd_kaja_func.asm

21 lines
314 B
NASM

; int __pascal snd_kaja_func(int ax)
snd_kaja_func proc
@@ax = word ptr (cPtrSize)
cmp snd_bgm_mode, SND_BGM_OFF
jz short @@ret
mov bx, sp
mov ax, ss:[bx+@@ax]
cmp snd_bgm_mode, SND_BGM_MIDI
jz short @@midi
int 60h
jmp short @@ret
@@midi:
int 61h
@@ret:
ret 2
snd_kaja_func endp
nop ; word alignment