mirror of https://github.com/nmlgc/ReC98.git
24 lines
499 B
NASM
24 lines
499 B
NASM
; void pascal near boss2_explode_small(unsigned int type);
|
|
public BOSS2_EXPLODE_SMALL
|
|
boss2_explode_small proc near
|
|
|
|
@@y = word ptr -4
|
|
@@x = word ptr -2
|
|
@@type = word ptr 4
|
|
|
|
enter 4, 0
|
|
mov ax, _boss_pos.cur.x
|
|
mov [bp+@@x], ax
|
|
mov ax, _boss_pos.cur.y
|
|
mov [bp+@@y], ax
|
|
mov eax, _boss2_pos.cur
|
|
mov _boss_pos.cur, eax
|
|
call boss_explode_small pascal, [bp+@@type]
|
|
mov ax, [bp+@@x]
|
|
mov _boss_pos.cur.x, ax
|
|
mov ax, [bp+@@y]
|
|
mov _boss_pos.cur.y, ax
|
|
leave
|
|
retn 2
|
|
boss2_explode_small endp
|