ReC98/th04/snd/kajaint.asm

22 lines
327 B
NASM

; int __pascal snd_kaja_interrupt(int ax)
snd_kaja_interrupt proc
@@ax = word ptr (cPtrSize + 2)
push bp
mov bp, sp
cmp _snd_bgm_mode, SND_BGM_OFF
jz short @@ret
mov ax, [bp+@@ax]
cmp _snd_bgm_mode, SND_BGM_MIDI
jz short @@midi
int 60h
jmp short @@ret
@@midi:
int 61h
@@ret:
pop bp
ret 2
snd_kaja_interrupt endp