wwf-wrestlemania/REACT5.ASM

917 lines
20 KiB
NASM
Raw Normal View History

2021-04-06 15:21:54 -07:00
**************************************************************
*
* Software: Jamie Rivett
* Initiated: 8/8/94
*
* COPYRIGHT (C) 1992 WILLIAMS ELECTRONICS GAMES, INC.
*
**************************************************************
.file "react5.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"
.include "damage.equ"
******************************************************************************
* EXTERNAL REFERENCES
.ref change_anim1a
.ref wres_collis_off
; .ref inc_burnout
.ref block_hit_flail
.ref block_hit
; .ref create_damage_points
.ref slide_offscr
; .ref check_dizzy
.ref wres_slave_anim
.ref triple_sound,CALL_AVERAGE_MOVE
.ref CALL_NASTY_MOVE,PCNT
******************************************************************************
* EXTERNAL ANIM SEQUENCES
;BAM BAM
.ref bam_2_head_hit2_anim
.ref bam_4_head_hit2_anim
.ref bam_4_losebal_anim
.ref bam_fall_back_anim
.ref bam_get_buzz_anim
;DOINK
.ref dnk_2_bncoff_anim
.ref dnk_4_bncoff_dizzy_anim
.ref dnk_4_bncoff_anim
.ref dnk_4_losebal_anim
.ref dnk_4_losebal_dizzy_anim
.ref dnk_get_buzz_anim
.ref dnk_head_hit2_anim
.ref dnk_head_hit_dizzy_anim
.ref dnk_2_head_hit2_anim,dnk_4_head_hit2_anim
.ref dnk_fall_back_anim
;BRET
.ref hrt_fall_back_anim,hrt_4_losebal_dizzy_anim
.ref hrt_2_head_hit2_anim,hrt_4_head_hit2_anim
.ref hrt_4_head_hit_dizzy_anim
.ref hrt_get_buzz_anim,hrt_4_losebal_anim
;LEX
.ref lex_2_head_hit2_anim,lex_4_head_hit2_anim
.ref lex_head_hit_dizzy_anim
.ref lex_4_losebal_anim
.ref lex_fall_back_anim
.ref lex_get_buzz_anim
;RAZOR
.ref rzr_2_head_hit2_anim,rzr_4_head_hit2_anim
.ref rzr_4_losebal_anim
.ref rzr_fall_back_anim
.ref rzr_get_buzz_anim
;SHAWN
.ref shn_4_head_hit_dizzy_anim
.ref shn_2_head_hit3_anim,shn_4_head_hit3_anim
.ref shn_fall_back_anim
.ref shn_4_losebal_anim
.ref shn_get_buzz_anim
;TAKER
.ref und_fall_back_anim
.ref und_get_buzz_anim
.ref und_2_head_hit2_anim,und_4_head_hit2_anim
.ref und_head_hit_dizzy_anim
.ref und_4_losebal_dizzy_anim
.ref und_4_losebal_anim
.ref und_4_bncoff_dizzy_anim
.ref und_2_bncoff_anim,und_4_bncoff_anim
;YOKO
.ref yok_fall_back_anim
.ref yok_get_buzz_anim
.ref yok_4_losebal_anim
******************************************************************************
* SYMBOLS DEFINED IN THIS FILE
******************************************************************************
* EQUATES FOR THIS FILE
#*****************************************************************************
#*****************************************************************************
;AMODE_RUN 20
;Return carry set if the run hit is good and will count, clear if it's going
; to be discarded anyway.
SUBR good_run_hit
;Ignore most running collisions
move *a13(OBJ_ZPOS),a0,L
move *a10(OBJ_ZPOS),a1,L
sub a0,a1
abs a1
srl 16,a1
;FIXX!! Unless it is Yoko!
move *a10(WRESTLERNUM),a0
cmpi 3,a0
jrnz #notyok
;Yoko
;This fixes YOKO gut hitting you after he is flung
move *a10(GETUP_TIME),a0 ;delay b4 gaining control
jrnz #bad
cmpi 5,a1 ;if yoko ;15
jrlt #good
#notyok
cmpi 2,a1 ;6
jrgt #bad
#good setc
rets
#bad clrc
rets
SUBR hit_run
;Tell running wrestler to stop running, and push other guy out of the way.
callr good_run_hit
jrnc #skip
move *a13(PLYRMODE),a1
cmpi MODE_INAIR,a1
jrz #isdead
cmpi MODE_INAIR2,a1
jrz #isdead
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
movi [3,0],a0
move a0,*a13(OBJ_YVEL),L
jruc #gotblk
#noblock
;If player is on ground, ignore running collisions!
move *a13(PLYRMODE),a0
cmpi MODE_ONGROUND,a0
jrz #isdead
GETLIFE
jrz #isdead
WRSNDX LBOWDROP_L1,LBOWDROP_L2
SETMODE NORMAL
FACETBL #losebal
move *a10(WRESTLERNUM),a1
cmpi 3,a1
jrnz #notyok2
;Yoko ran into me!
.ref fall_back_tbl
FACETBL fall_back_tbl
calla change_anim1a
.ref hit_damage_pending
movi -D_GUTPUSH,a0
move a0,@hit_damage_pending
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
jruc #gotblk
; move *a13(PLYR_DIZZY),a1
; jrz #notdiz
;;Guy is dizzy, need to stay in dizzy after losing balance
; FACETBL #losebal_dizzy
;
;#notdiz
#notyok2
calla change_anim1a
#gotblk
calla wres_collis_off
;This is what happens to running wrestler.
movi [3,0],a0
move a0,*a10(OBJ_YVEL),L
movi MODE_NORMAL,a0
move a0,*a10(PLYRMODE)
move *a10(PLYR_DIZZY),a0
jrz #notdiz0
;Running guy is in dizzy mode, bounce off and stay dizzy!
clr a0
move a0,*a10(RUN_TIME)
SWAP a10,a13
FACETBL #bncoff_dizzy
jruc #cnt
#notdiz0
move *a10(GETUP_TIME),a0
jrz #skipm
;Cause getup meter to slide off screen.
move *a10(METER_PROC),a0,L
jrz #skipm ;skip if we don't have a getup meter
PUSH a8,a9,a10
move *a0(PA8),a8,L
move *a0(PA9),a9,L
move *a0(PA10),a10,L
movi GETUP_PID,a1
movi slide_offscr,a7
calla XFERPROC
PULL a8,a9,a10
#skipm clr a0
move a0,*a10(RUN_TIME)
move a0,*a13(RUN_TIME)
move a0,*a10(GETUP_TIME)
SWAP a10,a13
FACE24TBL bncoff
#cnt
calla change_anim1a
SWAP a10,a13
movi [3,0],a2
move *a10(OBJ_XPOSINT),a0
move *a13(OBJ_XPOSINT),a1
cmp a0,a1 ;offx - defx
jrlt #right
neg a2
#right
move a2,*a10(OBJ_XVEL),L
#isdead
calla wres_collis_off
rets
#skip move *a13(MOVE_DIR),a14
.ref new_victim_movedir
move a14,@new_victim_movedir
calla wres_collis_off
rets
#losebal
.long hrt_4_losebal_anim ;0 Bret Hart
.long rzr_4_losebal_anim ;1 Razor Ramon
.long und_4_losebal_anim ;2 Undertaker
.long yok_4_losebal_anim ;3 Yokozuna
.long shn_4_losebal_anim ;4 Shawn Michaels
.long bam_4_losebal_anim ;5 Bam Bam
.long dnk_4_losebal_anim ;6 Doink
.long dnk_4_losebal_anim ;7 spare
.long lex_4_losebal_anim ;8 Lex Luger
.long dnk_4_losebal_anim ;9 Referee
;Fix!!!
;#losebal_dizzy
; .long hrt_4_losebal_dizzy_anim ;0 Bret Hart
; .long dnk_4_losebal_dizzy_anim ;1 Razor Ramon
; .long und_4_losebal_dizzy_anim ;2 Undertaker
; .long dnk_4_losebal_dizzy_anim ;3 Yokozuna
; .long dnk_4_losebal_dizzy_anim ;4 Shawn Michaels
; .long dnk_4_losebal_dizzy_anim ;5 Bam Bam
; .long dnk_4_losebal_dizzy_anim ;6 Doink
; .long dnk_4_losebal_dizzy_anim ;7 spare
; .long dnk_4_losebal_dizzy_anim ;8 Lex Luger
; .long dnk_4_losebal_dizzy_anim ;9 Referee
SUBR bncoff
.ref rzr_2_bncoff_anim,rzr_4_bncoff_anim
.ref hrt_2_bncoff_anim,hrt_4_bncoff_anim
.ref bam_2_bncoff_anim,bam_4_bncoff_anim
.ref yok_2_bncoff_anim,yok_4_bncoff_anim
.ref shn_2_bncoff_anim,shn_4_bncoff_anim
.ref lex_2_bncoff_anim,lex_4_bncoff_anim
.ref und_2_bncoff_anim,und_4_bncoff_anim
.long hrt_2_bncoff_anim,hrt_4_bncoff_anim ;0 Bret Hart
.long rzr_2_bncoff_anim,rzr_4_bncoff_anim ;1 Razor Ramon
.long und_2_bncoff_anim,und_4_bncoff_anim ;2 Undertaker
.long yok_2_bncoff_anim,yok_4_bncoff_anim ;3 Yokozuna
.long shn_2_bncoff_anim,shn_4_bncoff_anim ;4 Shawn Michaels
.long bam_2_bncoff_anim,bam_4_bncoff_anim ;5 Bam Bam
.long dnk_2_bncoff_anim,dnk_4_bncoff_anim ;6 Doink
.long dnk_2_bncoff_anim,dnk_4_bncoff_anim ;7 spare
.long lex_2_bncoff_anim,lex_4_bncoff_anim ;8 Lex Luger
.long dnk_2_bncoff_anim,dnk_4_bncoff_anim ;9 Referee
SUBR bncoff_gate
.ref yok_2_bncoff_gate_anim,yok_4_bncoff_gate_anim
.long hrt_2_bncoff_anim,hrt_4_bncoff_anim ;0 Bret Hart
.long rzr_2_bncoff_anim,rzr_4_bncoff_anim ;1 Razor Ramon
.long und_2_bncoff_anim,und_4_bncoff_anim ;2 Undertaker
.long yok_2_bncoff_gate_anim,yok_4_bncoff_gate_anim ;3 Yokozuna
.long shn_2_bncoff_anim,shn_4_bncoff_anim ;4 Shawn Michaels
.long bam_2_bncoff_anim,bam_4_bncoff_anim ;5 Bam Bam
.long dnk_2_bncoff_anim,dnk_4_bncoff_anim ;6 Doink
.long dnk_2_bncoff_anim,dnk_4_bncoff_anim ;7 spare
.long lex_2_bncoff_anim,lex_4_bncoff_anim ;8 Lex Luger
.long dnk_2_bncoff_anim,dnk_4_bncoff_anim ;9 Referee
#bncoff_dizzy
.ref rzr_4_bncoff_dizzy_anim
.ref hrt_4_bncoff_dizzy_anim
.ref bam_4_bncoff_dizzy_anim
.ref yok_4_bncoff_dizzy_anim
.ref shn_4_bncoff_dizzy_anim
.ref und_4_bncoff_dizzy_anim
.ref lex_4_bncoff_dizzy_anim
.long hrt_4_bncoff_dizzy_anim ;0 Bret Hart
.long rzr_4_bncoff_dizzy_anim ;1 Razor Ramon
.long und_4_bncoff_dizzy_anim ;2 Undertaker
.long yok_4_bncoff_dizzy_anim ;3 Yokozuna
.long shn_4_bncoff_dizzy_anim ;4 Shawn Michaels
.long bam_4_bncoff_dizzy_anim ;5 Bam Bam
.long dnk_4_bncoff_dizzy_anim ;6 Doink
.long dnk_4_bncoff_dizzy_anim ;7 spare
.long lex_4_bncoff_dizzy_anim ;8 Lex Luger
.long dnk_4_bncoff_dizzy_anim ;9 Referee
#*****************************************************************************
;AMODE_PUPPET 21
SUBR hit_puppet
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit
rets
#noblock
;no need for this check now. AMODE_PUPPET vs. dead guy won't even
; register a collision now.
; ;don't grab dead guys
; move *a13(PLYRMODE),a14
; cmpi MODE_DEAD,a14
; jreq #done
SUBR hit_puppet_even_if_dead
SETMODE PUPPET
move a10,*a13(ATTACH_PROC),L ;proc attached to
move a13,*a10(ATTACH_PROC),L
movi wres_slave_anim,a0
calla change_anim1a
clr a0
move a0,*a13(GETUP_TIME)
#done calla wres_collis_off
rets
#*****************************************************************************
;AMODE_PUPPET 53
SUBR hit_puppet_noflail
;Used for puppet moves that will not flail opponent
;just cause them to do regular hit block
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit
rets
#noblock
;don't grab dead guys
move *a13(PLYRMODE),a14
cmpi MODE_DEAD,a14
jreq #done
SETMODE PUPPET
move a10,*a13(ATTACH_PROC),L ;proc attached to
move a13,*a10(ATTACH_PROC),L
movi wres_slave_anim,a0
calla change_anim1a
clr a0
move a0,*a13(GETUP_TIME)
#done calla wres_collis_off
rets
#*****************************************************************************
;AMODE_PUPPET2 31
SUBR hit_puppet2
;A puppet mode for ignoring puppet move if getup time is zero
;Used for hair pickup against a rolling/getting up opponent!
move *a13(GETUP_TIME),a0
jrz #out
;don't grab dead guys
move *a13(PLYRMODE),a14
cmpi MODE_DEAD,a14
jreq #done
SETMODE PUPPET
move a10,*a13(ATTACH_PROC),L ;proc attached to
move a13,*a10(ATTACH_PROC),L
movi wres_slave_anim,a0
calla change_anim1a
clr a0
move a0,*a13(GETUP_TIME)
calla wres_collis_off
rets
#out
move *a10(ANIMODE),a1
andni MODE_STATUS,a1
move a1,*a10(ANIMODE)
#done calla wres_collis_off
rets
#*****************************************************************************
;AMODE_PUPPET 32
SUBR hit_puppet_hdgrab
;This is a special attack mode which ignores blocking opponents!
;UNLESS they've got a safe time set.
move *a13(SAFE_TIME),a0
jrz #noblock
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrne #noblock
calla block_hit_flail
rets
#noblock
;don't grab dead guys
move *a13(PLYRMODE),a14
cmpi MODE_DEAD,a14
jreq #done
clr a14
move a14,*a10(HITBLOCKER)
move @PCNT,a14
move a14,*a13(HEAD_GRAB_TIME)
SETMODE PUPPET
move a10,*a13(ATTACH_PROC),L ;proc attached to
move a13,*a10(ATTACH_PROC),L
movi wres_slave_anim,a0
calla change_anim1a
clr a0
move a0,*a13(GETUP_TIME)
#done calla wres_collis_off
rets
#*****************************************************************************
;AMODE_PUPPET 54
SUBR hit_puppet_toss
;This is a special attack mode which ignores blocking opponents!
move *a13(SAFE_TIME),a0
jrz #noblock
;If safe time is set, just holding block will suffice
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock2
calla block_hit
rets
#noblock
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock2
;If stick is down & away - skip toss
move *a13(STICK_VAL_CUR),a14
andi 0ch,a14
jrz #noblock2
move *a13(NEW_FACING_DIR),a1
andi 0ch,a1
cmp a14,a1
jrz #noblock2
move *a13(STICK_VAL_CUR),a14
btst 1,a14
jrz #noblock2
;Pulling down & away!
;Don't allow hiptoss
calla block_hit
rets
#noblock2
;;don't grab dead guys
; move *a13(PLYRMODE),a14
; cmpi MODE_DEAD,a14
; jreq #done
clr a14
move a14,*a10(HITBLOCKER)
; move @PCNT,a14
; move a14,*a13(HEAD_GRAB_TIME)
SETMODE PUPPET
move a10,*a13(ATTACH_PROC),L ;proc attached to
move a13,*a10(ATTACH_PROC),L
movi wres_slave_anim,a0
calla change_anim1a
clr a0
move a0,*a13(GETUP_TIME)
#done calla wres_collis_off
rets
#*****************************************************************************
;AMODE_BACKHAND 22 - SLAP
SUBR hit_backhand
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit_flail
rets
#noblock
;if it's shawn, do 33h instead of 43h
movi 33h,a0
move *a10(WRESTLERNUM),a14
subk W_SHAWN,a14
jrz #snd_ok
movi 43h,a0
#snd_ok calla triple_sound
calla CALL_AVERAGE_MOVE
GETLIFE
jrz #isdead
WRSNDX UPRCUT_L2
; WRSNDX HDBUTT_L1,HDBUTT_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 #head_hit_dizzy
; calla change_anim1a
;
;
;#not_dizzy
SETMODE NORMAL
move *a13(OBJ_YPOSINT),a14
move *a13(GROUND_Y),a0
sub a0,a14
cmpi 20,a14
jrge #fall_back
FACE24TBL #head_hit2
calla change_anim1a
calla wres_collis_off
rets
#isdead
calla wres_collis_off
rets
#fall_back
FACETBL fall_back_tbl
calla change_anim1a
calla wres_collis_off
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
neg a2
#fall_right
move a2,*a13(OBJ_XVEL),L
rets
#head_hit2
;No z float..
.ref lex_2_head_hit3_anim,lex_4_head_hit3_anim
.ref rzr_2_head_hit3_anim,rzr_4_head_hit3_anim
.ref yok_2_head_hit3_anim,yok_4_head_hit3_anim
.ref hrt_2_head_hit3_anim,hrt_4_head_hit3_anim
.long hrt_2_head_hit3_anim,hrt_4_head_hit3_anim ;0 Bret Hart
.long rzr_2_head_hit3_anim,rzr_4_head_hit3_anim ;1 Razor Ramon
.long und_2_head_hit2_anim,und_4_head_hit2_anim ;2 Undertaker
.long yok_2_head_hit3_anim,yok_4_head_hit3_anim ;3 Yokozuna
.long shn_2_head_hit3_anim,shn_4_head_hit3_anim ;4 Shawn Michaels
.long bam_2_head_hit2_anim,bam_4_head_hit2_anim ;5 Bam Bam
.long dnk_2_head_hit2_anim,dnk_4_head_hit2_anim ;6 Doink
.long 0,0 ;7 spare
.long lex_2_head_hit3_anim,lex_4_head_hit3_anim ;8 Lex Luger
.long 0,0 ;9 Referee
;#head_hit_dizzy
; .ref bam_head_hit_dizzy_anim,rzr_4_head_hit_dizzy_anim
; .ref und_head_hit_dizzy_anim,yok_4_head_hit_dizzy_anim
;
; .long hrt_4_head_hit_dizzy_anim,hrt_4_head_hit_dizzy_anim ;0 Bret Hart
; .long rzr_4_head_hit_dizzy_anim,rzr_4_head_hit_dizzy_anim ;1 Razor Ramon
; .long und_head_hit_dizzy_anim,und_head_hit_dizzy_anim ;2 Undertaker
; .long yok_4_head_hit_dizzy_anim,yok_4_head_hit_dizzy_anim ;3 Yokozuna
; .long shn_4_head_hit_dizzy_anim,shn_4_head_hit_dizzy_anim ;4 Shawn Michaels
; .long bam_head_hit_dizzy_anim,bam_head_hit_dizzy_anim ;5 Bam Bam
; .long dnk_head_hit_dizzy_anim,dnk_head_hit_dizzy_anim ;6 Doink
; .long 0,0 ;7 spare
; .long lex_head_hit_dizzy_anim,lex_head_hit_dizzy_anim ;8 Lex Luger
; .long 0,0 ;9 Referee
;
#*****************************************************************************
;AMODE_EARSLAP 28 - SLAP
SUBR hit_earslap
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit
rets
#noblock
movi 43h,a0
calla triple_sound
GETLIFE
jrz #isdead
WRSNDX HDBUTT_L2
; move *a13(PLYR_DIZZY),a0
; jrnz #diz
;
; calla check_dizzy
; jrz #not_dizzy
;
; movi 5*TSEC,a0
; move a0,*a13(GETUP_TIME)
;
;#diz
; FACETBL #head_hit_dizzy
; calla change_anim1a
;
;#isdead
; calla wres_collis_off
; rets
;#not_dizzy
SETMODE NORMAL
FACETBL #head_hit2
calla change_anim1a
#isdead
calla wres_collis_off
rets
#head_hit2
;No z float..
.ref lex_4_head_hit4_anim
.ref rzr_4_head_hit4_anim
.ref yok_4_head_hit4_anim
.ref hrt_4_head_hit4_anim
.ref und_4_head_hit4_anim
.ref bam_4_head_hit4_anim
.ref dnk_4_head_hit4_anim
.ref shn_4_head_hit4_anim
.long hrt_4_head_hit4_anim ;0 Bret Hart
.long rzr_4_head_hit4_anim ;1 Razor Ramon
.long und_4_head_hit4_anim ;2 Undertaker
.long yok_4_head_hit4_anim ;3 Yokozuna
.long shn_4_head_hit4_anim ;4 Shawn Michaels
.long bam_4_head_hit4_anim ;5 Bam Bam
.long dnk_4_head_hit4_anim ;6 Doink
.long 0 ;7 spare
.long lex_4_head_hit4_anim ;8 Lex Luger
.long 0 ;9 Referee
;#head_hit_dizzy
;
; .long hrt_4_head_hit_dizzy_anim
; .long rzr_4_head_hit_dizzy_anim
; .long und_head_hit_dizzy_anim
; .long yok_4_head_hit_dizzy_anim
; .long shn_4_head_hit_dizzy_anim
; .long bam_head_hit_dizzy_anim
; .long dnk_head_hit_dizzy_anim
; .long 0 ;7 spare
; .long lex_head_hit_dizzy_anim
; .long 0 ;9 Referee
#*****************************************************************************
;AMODE_BUZZ 23
SUBR hit_buzz
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit
rets
#noblock
;All of the damage amounts need to be in lookup tables linked to the wrestler
;who actually struck the blow.
; calla CALL_NASTY_MOVE
GETLIFE
;Bug! We want to see the electrocution!
;FIX!!
jrz #isdead
SETMODE NORMAL
#isdead
move a10,*a13(ATTACH_PROC),L ;proc attached to
move a13,*a10(ATTACH_PROC),L
; movi wres_slave_anim,a0
; calla change_anim1a
; calla create_damage_points
;Buzz sound
WRSNDX PUNCH_L1,PUNCH_L2
FACETBL #get_buzz
calla change_anim1a
calla wres_collis_off
rets
#get_buzz
.long hrt_get_buzz_anim ;0 Bret Hart
.long rzr_get_buzz_anim ;1 Razor Ramon
.long und_get_buzz_anim ;2 Undertaker
.long yok_get_buzz_anim ;3 Yokozuna
.long shn_get_buzz_anim ;4 Shawn Michaels
.long bam_get_buzz_anim ;5 Bam Bam
.long dnk_get_buzz_anim ;6 Doink
.long 0 ;7 spare
.long lex_get_buzz_anim ;8 Lex Luger
.long 0 ;9 Referee
#*****************************************************************************
;AMODE_HAYMAKER 24
SUBR hit_haymaker
move *a13(PLYRMODE),a1
cmpi MODE_BLOCK,a1
jrnz #noblock
calla block_hit_flail
rets
#noblock
; movi 40,a0
; calla inc_getup_time
;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
FACETBL #fall_back
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
#fall_back
.long hrt_fall_back_anim ;0 Bret Hart
.long rzr_fall_back_anim ;1 Razor Ramon
.long und_fall_back_anim ;2 Undertaker
.long yok_fall_back_anim ;3 Yokozuna
.long shn_fall_back_anim ;4 Shawn Michaels
.long bam_fall_back_anim ;5 Bam Bam
.long dnk_fall_back_anim ;6 Doink
.long 0 ;7 spare
.long lex_fall_back_anim ;8 Lex Luger
.long 0 ;9 Referee
******************************************************************************
.end