historicalsource
/
wwf-wrestlemania
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
wwf-wrestlemania/REACT3.ASM

362 lines
7.9 KiB
NASM
Executable File
Raw Permalink Blame History

This file contains invisible Unicode characters!

This file contains invisible Unicode characters that may be processed differently from what appears below. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to reveal hidden characters.

**************************************************************
*
* Software: Jamie Rivett
* Initiated: 8/8/94
*
* COPYRIGHT (C) 1992 WILLIAMS ELECTRONICS GAMES, INC.
*
**************************************************************
.file "react3.asm"
.title "wrester reactions to hits"
.width 132
.option b,d,l,t
.mnolist
.include "macros.h"
.include "mproc.equ" ;Mproc equates
.include "display.equ" ;Display proc equates
.include "gsp.equ" ;Gsp asm equates
.include "sys.equ"
.include "game.equ"
.include "plyr.equ"
.include "anim.equ"
.include "audit.equ"
.include "sound.h"
.include "ring.equ"
.include "lifebar.h"
******************************************************************************
* EXTERNAL REFERENCES
*
.REF CALL_MID_HIT
.REF CALL_DROP_KICK
.ref change_anim1a
.ref wres_collis_off
.ref block_hit_flail
.ref block_hit
.ref face_each_other
.ref wres_slave_anim
.ref set_getup_time
; .ref check_dizzy
.ref hit_damage_pending
.ref DO_SCREAM
******************************************************************************
* EXTERNAL ANIM SEQUENCES
;BAM BAM
.ref bam_2_body_hit_anim,bam_4_body_hit_anim
.ref bam_fall_back_anim
;DOINK
.ref dnk_fall_back_anim
;BRET
.ref hrt_fall_back_anim
;LEX
.ref lex_2_body_hit_anim,lex_4_body_hit_anim
.ref lex_fall_back_anim
;RAZOR
.ref rzr_2_body_hit_anim,rzr_4_body_hit_anim
.ref rzr_fall_back_anim
;SHAWN
.ref shn_2_body_hit_anim,shn_4_body_hit_anim
.ref shn_fall_back_anim
;TAKER
.ref und_2_body_hit_anim,und_4_body_hit_anim
.ref und_fall_back_anim
.ref und_2_knee_hit_anim,und_4_knee_hit_anim
;YOKO
.ref yok_fall_back_anim
******************************************************************************
* SYMBOLS DEFINED IN THIS FILE
******************************************************************************
* EQUATES FOR THIS FILE
#*****************************************************************************
#*****************************************************************************
;AMODE_BIGBOOT 11
SUBR hit_bigboot
move *a13(PLYRMODE),a1
cmpi MODE_RUNNING,a1
;No hit if not running
jrz #cont2
cmpi MODE_INAIR,a1
jrz #cont
#face
CALLA CALL_FACE_HIT
GETLIFE
jrz #isdead
WRSNDX FLYKICK_L1,FLYKICK_L2
;this should really hurt.....
calla DO_SCREAM
SETMODE NORMAL
.ref head_hit2_tbl
FACE24TBL head_hit2_tbl
calla change_anim1a
#isdead
calla wres_collis_off
rets
#cont2
movi 100,a0
.ref RNDPER
calla RNDPER
jrhi #face
#cont
CALLA CALL_DROP_KICK
WRSNDX LBOWDROP_L1,LBOWDROP_L2
GETLIFE
jrz #skip
;Any hit mode which does a fall back sequence onto the ground
;will not check dizzy at the start.
;The check dizzy happens in the sequence.
; calla inc_burnout
SETMODE NORMAL
#skip
clr a0
move a0,*a13(ROLL_POS)
calla set_getup_time
.ref fall_back_tbl
FACETBL fall_back_tbl
calla change_anim1a
movi [3,0],a2
move *a10(OBJ_XPOSINT),a0
move *a13(OBJ_XPOSINT),a1
cmp a0,a1 ;offx - defx
jrgt #fall_right ;attacker on left
movi [-3,0],a2
#fall_right
move a2,*a13(OBJ_XVEL),L
calla wres_collis_off
rets
#no_hit
clr a14
move a14,@hit_damage_pending
calla wres_collis_off
rets
#*****************************************************************************
;AMODE_KNEE 12
SUBR hit_knee
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit
rets
#noblock
CALLA CALL_MID_HIT
GETLIFE
jrz #isdead
WRSNDX KICK_L1,KICK_L2
; move *a13(PLYR_DIZZY),a0
; jrnz #diz
;
; calla check_dizzy
; jrz #not_dizzy
;
; movi 5*TSEC,a0
; move a0,*a13(GETUP_TIME)
;
;#diz
; FACE24TBL #knee_hit_dizzy
; jruc #cont
;
;#not_dizzy
; calla inc_burnout
SETMODE NORMAL
FACE24TBL knee_hit_tbl
#cont
calla change_anim1a
move *a10(OBJ_XVEL),a0,L ;slow down doink's
sra 3,a0 ;x_vel after collis
move a0,*a10(OBJ_XVEL),L
#isdead
calla wres_collis_off
rets
SUBR knee_hit_tbl
.ref hrt_2_knee_hit_anim,hrt_4_knee_hit_anim
.ref yok_2_knee_hit_anim,yok_4_knee_hit_anim
.ref rzr_2_knee_hit_anim,rzr_4_knee_hit_anim
.ref und_2_knee_hit_anim,und_4_knee_hit_anim
.ref shn_2_knee_hit_anim,shn_4_knee_hit_anim
.ref bam_2_knee_hit_anim,bam_4_knee_hit_anim
.ref dnk_2_knee_hit_anim
.ref lex_2_knee_hit_anim,lex_4_knee_hit_anim
.long hrt_2_knee_hit_anim,hrt_4_knee_hit_anim ;0 Bret Hart
.long rzr_2_knee_hit_anim,rzr_4_knee_hit_anim ;1 Razor Ramon
.long und_2_knee_hit_anim,und_4_knee_hit_anim ;2 Undertaker
.long yok_2_knee_hit_anim,yok_4_knee_hit_anim ;3 Yokozuna
.long shn_2_knee_hit_anim,shn_4_knee_hit_anim ;4 Shawn Michaels
.long bam_2_knee_hit_anim,bam_4_knee_hit_anim ;5 Bam Bam
.long dnk_2_knee_hit_anim,dnk_2_knee_hit_anim ;6 Doink
.long 0,0 ;7 spare
.long lex_2_knee_hit_anim,lex_4_knee_hit_anim ;8 Lex Luger
.long 0,0 ;9 Referee
;#knee_hit_dizzy
; .ref hrt_4_knee_hit_dizzy_anim
; .ref yok_4_knee_hit_dizzy_anim
; .ref rzr_4_knee_hit_dizzy_anim
; .ref und_4_knee_hit_dizzy_anim
; .ref shn_4_knee_hit_dizzy_anim
; .ref bam_4_knee_hit_dizzy_anim
; .ref dnk_4_knee_hit_dizzy_anim
; .ref lex_4_knee_hit_dizzy_anim
;
; .long hrt_4_knee_hit_dizzy_anim,hrt_4_knee_hit_dizzy_anim ;0 Bret Hart
; .long rzr_4_knee_hit_dizzy_anim,rzr_4_knee_hit_dizzy_anim ;1 Razor Ramon
; .long und_4_knee_hit_dizzy_anim,und_4_knee_hit_dizzy_anim ;4 Undertaker
; .long yok_4_knee_hit_dizzy_anim,yok_4_knee_hit_dizzy_anim ;3 Yokozuna
; .long shn_4_knee_hit_dizzy_anim,shn_4_knee_hit_dizzy_anim ;4 Shawn Michaels
; .long bam_4_knee_hit_dizzy_anim,bam_4_knee_hit_dizzy_anim ;5 Bam Bam
; .long dnk_4_knee_hit_dizzy_anim,dnk_4_knee_hit_dizzy_anim ;6 Doink
; .long 0,0 ;7 spare
; .long lex_4_knee_hit_dizzy_anim,lex_4_knee_hit_dizzy_anim ;8 Lex Luger
; .long 0,0 ;9 Referee
#*****************************************************************************
;AMODE_KNEE 27
SUBR hit_headknees
WRSNDX KICK_L1,KICK_L2
movi 40000h,a0
move a0,*a13(OBJ_YVEL),L
FACETBL #knee_hit
calla change_anim1a
calla wres_collis_off
rets
#knee_hit
.ref dnk_quick_knee_hit_anim
.ref hrt_quick_knee_hit_anim
.ref yok_quick_knee_hit_anim
.ref bam_quick_knee_hit_anim
.ref und_quick_knee_hit_anim
.ref rzr_quick_knee_hit_anim
.ref shn_quick_knee_hit_anim
.ref lex_quick_knee_hit_anim
.long hrt_quick_knee_hit_anim ;0 Bret Hart
.long rzr_quick_knee_hit_anim ;1 Razor Ramon
.long und_quick_knee_hit_anim ;2 Undertaker
.long yok_quick_knee_hit_anim ;3 Yokozuna
.long shn_quick_knee_hit_anim ;4 Shawn Michaels
.long bam_quick_knee_hit_anim ;5 Bam Bam
.long dnk_quick_knee_hit_anim ;6 Doink
.long 0 ;7 spare
.long lex_quick_knee_hit_anim ;8 Lex Luger
.long 0 ;9 Referee
#*****************************************************************************
;AMODE_BOXPUNCH 14
SUBR hit_boxpunch
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
; move *a13(FACING_DIR),a0 ;check for hit
; move *a13(NEW_FACING_DIR),a1 ;from behind
; and a0,a1
; andi MOVE_LEFT|MOVE_RIGHT,a1
; jrz #noblock
calla block_hit_flail
rets
#noblock
;All of the damage amounts need to be in lookup tables linked to the wrestler
;who actually struck the blow.
.ref CALL_FACE_HIT
CALLA CALL_FACE_HIT
;Any hit mode which does a fall back sequence onto the ground
;will not check dizzy at the start.
;The check dizzy happens in the sequence.
WRSNDX FLYKICK_L1,FLYKICK_L2
GETLIFE
jrz #skip
SETMODE NORMAL
#skip
movi 5*TSEC,a0
move a0,*a13(GETUP_TIME)
FACETBL fall_back_tbl
calla change_anim1a
movi [4,0],a2
move *a10(OBJ_XPOSINT),a0
move *a13(OBJ_XPOSINT),a1
cmp a0,a1 ;offx - defx
jrgt #go_rgt ;attacker on left
neg a2
#go_rgt
move a2,*a13(OBJ_XVEL),L
#isdead
calla wres_collis_off
rets
******************************************************************************
.end

Reference in New Issue View Git Blame Copy Permalink