640 lines
15 KiB
NASM
Executable File
640 lines
15 KiB
NASM
Executable File
**************************************************************
|
||
*
|
||
* Software: Jamie Rivett
|
||
* Initiated: 10/12/93
|
||
*
|
||
* COPYRIGHT (C) 1992 WILLIAMS ELECTRONICS GAMES, INC.
|
||
*
|
||
**************************************************************
|
||
|
||
.file "admseq1.asm"
|
||
.title "Adam Bomb animation sequences"
|
||
.width 132
|
||
.option b,d,l,t
|
||
.mnolist
|
||
|
||
|
||
.include "macros.h"
|
||
.include "mproc.equ" ;Mproc equates
|
||
.include "sys.equ"
|
||
.include "game.equ"
|
||
.include "plyr.equ"
|
||
.include "anim.equ"
|
||
.include "sound.h"
|
||
|
||
.include "adamimg.h"
|
||
|
||
|
||
******************************************************************************
|
||
* EXTERNAL REFERENCES
|
||
|
||
;from ROPES.ASM
|
||
.ref rope_command
|
||
|
||
******************************************************************************
|
||
* SYMBOLS DEFINED IN THIS FILE
|
||
|
||
******************************************************************************
|
||
* EQUATES FOR THIS FILE
|
||
|
||
TSEC equ 53
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* STANDS
|
||
|
||
SUBR adm_zip_anim
|
||
WL TSEC*60,A2ST2D+FR1
|
||
.word 0
|
||
|
||
#STNA2_SPD equ 6
|
||
|
||
SUBR adm_stand2_anim
|
||
SUBR adm_stand8_anim
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
WL #STNA2_SPD,A2ST2D+FR1
|
||
WL #STNA2_SPD,A2ST2D+FR2
|
||
WL #STNA2_SPD,A2ST2D+FR3
|
||
WL #STNA2_SPD,A2ST2D+FR4
|
||
WL #STNA2_SPD,A2ST2D+FR5
|
||
WL #STNA2_SPD,A2ST2D+FR6
|
||
WL #STNA2_SPD,A2ST2D+FR7
|
||
WL #STNA2_SPD,A2ST2D+FR8
|
||
WL #STNA2_SPD,A2ST2D+FR9
|
||
WL #STNA2_SPD,A2ST2D+FR10
|
||
WL #STNA2_SPD,A2ST2D+FR11
|
||
WL #STNA2_SPD,A2ST2D+FR12
|
||
.word ANI_REPEAT
|
||
|
||
#STNA4_SPD equ 6
|
||
SUBR adm_stand4_anim
|
||
SUBR adm_stand6_anim
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
WL #STNA4_SPD,A4ST4J+FR1
|
||
WL #STNA4_SPD,A4ST4J+FR2
|
||
WL #STNA4_SPD,A4ST4J+FR3
|
||
WL #STNA4_SPD,A4ST4J+FR4
|
||
WL #STNA4_SPD,A4ST4J+FR5
|
||
WL #STNA4_SPD,A4ST4J+FR6
|
||
WL #STNA4_SPD,A4ST4J+FR7
|
||
WL #STNA4_SPD,A4ST4J+FR8
|
||
WL #STNA4_SPD,A4ST4J+FR9
|
||
WL #STNA4_SPD,A4ST4J+FR10
|
||
WL #STNA4_SPD,A4ST4J+FR11
|
||
.word ANI_REPEAT
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* WALKING TORSOS
|
||
|
||
#TORSO2_SPD equ 4
|
||
|
||
SUBR adm_torso2_anim
|
||
SUBR adm_torso8_anim
|
||
WL #TORSO2_SPD,A2TW2Z+FR1
|
||
.word ANI_REPEAT
|
||
|
||
|
||
#TORSO4_SPD equ 4
|
||
SUBR adm_torso4_anim
|
||
SUBR adm_torso6_anim
|
||
WL #TORSO4_SPD,A4TW4Z+FR1
|
||
WL #TORSO4_SPD,A4TW4Z+FR2
|
||
.word ANI_REPEAT
|
||
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* WALKS FACING #2
|
||
|
||
#W1F2_SPD equ 2
|
||
SUBR adm_walk1_f2_anim
|
||
WL #W1F2_SPD,A2WL1A+FR1
|
||
WL #W1F2_SPD,A2WL1A+FR2
|
||
WL #W1F2_SPD,A2WL1A+FR3
|
||
WL #W1F2_SPD,A2WL1A+FR4
|
||
WL #W1F2_SPD,A2WL1A+FR5
|
||
WL #W1F2_SPD,A2WL1A+FR6
|
||
WL #W1F2_SPD,A2WL1A+FR7
|
||
WL #W1F2_SPD,A2WL1A+FR8
|
||
WL #W1F2_SPD,A2WL1A+FR9
|
||
WL #W1F2_SPD,A2WL1A+FR10
|
||
WL #W1F2_SPD,A2WL1A+FR11
|
||
WL #W1F2_SPD,A2WL1A+FR12
|
||
WL #W1F2_SPD,A2WL1A+FR13
|
||
WL #W1F2_SPD,A2WL1A+FR14
|
||
WL #W1F2_SPD,A2WL1A+FR15
|
||
WL #W1F2_SPD,A2WL1A+FR16
|
||
WL #W1F2_SPD,A2WL1A+FR17
|
||
WL #W1F2_SPD,A2WL1A+FR18
|
||
.word ANI_REPEAT
|
||
|
||
#W2F2_SPD equ 2
|
||
SUBR adm_walk2_f2_anim
|
||
WL #W2F2_SPD,A2WL2B+FR1
|
||
WL #W2F2_SPD,A2WL2B+FR2
|
||
WL #W2F2_SPD,A2WL2B+FR3
|
||
WL #W2F2_SPD,A2WL2B+FR4
|
||
WL #W2F2_SPD,A2WL2B+FR5
|
||
WL #W2F2_SPD,A2WL2B+FR6
|
||
WL #W2F2_SPD,A2WL2B+FR7
|
||
WL #W2F2_SPD,A2WL2B+FR8
|
||
WL #W2F2_SPD,A2WL2B+FR9
|
||
WL #W2F2_SPD,A2WL2B+FR10
|
||
WL #W2F2_SPD,A2WL2B+FR11
|
||
WL #W2F2_SPD,A2WL2B+FR12
|
||
WL #W2F2_SPD,A2WL2B+FR13
|
||
WL #W2F2_SPD,A2WL2B+FR14
|
||
WL #W2F2_SPD,A2WL2B+FR15
|
||
WL #W2F2_SPD,A2WL2B+FR16
|
||
WL #W2F2_SPD,A2WL2B+FR17
|
||
WL #W2F2_SPD,A2WL2B+FR18
|
||
WL #W2F2_SPD,A2WL2B+FR19
|
||
WL #W2F2_SPD,A2WL2B+FR20
|
||
.word ANI_REPEAT
|
||
|
||
#W4F2_SPD equ 2
|
||
SUBR adm_walk4_f2_anim
|
||
WL #W4F2_SPD,A2WL8B+FR1
|
||
WL #W4F2_SPD,A2WL8B+FR2
|
||
WL #W4F2_SPD,A2WL8B+FR3
|
||
WL #W4F2_SPD,A2WL8B+FR4
|
||
WL #W4F2_SPD,A2WL8B+FR5
|
||
WL #W4F2_SPD,A2WL8B+FR6
|
||
WL #W4F2_SPD,A2WL8B+FR7
|
||
WL #W4F2_SPD,A2WL8B+FR8
|
||
WL #W4F2_SPD,A2WL8B+FR9
|
||
WL #W4F2_SPD,A2WL8B+FR10
|
||
WL #W4F2_SPD,A2WL8B+FR11
|
||
WL #W4F2_SPD,A2WL8B+FR12
|
||
WL #W4F2_SPD,A2WL8B+FR13
|
||
WL #W4F2_SPD,A2WL8B+FR14
|
||
WL #W4F2_SPD,A2WL8B+FR15
|
||
WL #W4F2_SPD,A2WL8B+FR16
|
||
WL #W4F2_SPD,A2WL8B+FR17
|
||
.word ANI_REPEAT
|
||
|
||
#W5F2_SPD equ 2
|
||
SUBR adm_walk5_f2_anim
|
||
WL #W5F2_SPD,A2WL1A+FR18
|
||
WL #W5F2_SPD,A2WL1A+FR17
|
||
WL #W5F2_SPD,A2WL1A+FR16
|
||
WL #W5F2_SPD,A2WL1A+FR15
|
||
WL #W5F2_SPD,A2WL1A+FR14
|
||
WL #W5F2_SPD,A2WL1A+FR13
|
||
WL #W5F2_SPD,A2WL1A+FR12
|
||
WL #W5F2_SPD,A2WL1A+FR11
|
||
WL #W5F2_SPD,A2WL1A+FR10
|
||
WL #W5F2_SPD,A2WL1A+FR9
|
||
WL #W5F2_SPD,A2WL1A+FR8
|
||
WL #W5F2_SPD,A2WL1A+FR7
|
||
WL #W5F2_SPD,A2WL1A+FR6
|
||
WL #W5F2_SPD,A2WL1A+FR5
|
||
WL #W5F2_SPD,A2WL1A+FR4
|
||
WL #W5F2_SPD,A2WL1A+FR3
|
||
WL #W5F2_SPD,A2WL1A+FR2
|
||
WL #W5F2_SPD,A2WL1A+FR1
|
||
.word ANI_REPEAT
|
||
|
||
#W6F2_SPD equ 2
|
||
SUBR adm_walk6_f2_anim
|
||
WL #W6F2_SPD,A2WL2B+FR20
|
||
WL #W6F2_SPD,A2WL2B+FR19
|
||
WL #W6F2_SPD,A2WL2B+FR18
|
||
WL #W6F2_SPD,A2WL2B+FR17
|
||
WL #W6F2_SPD,A2WL2B+FR16
|
||
WL #W6F2_SPD,A2WL2B+FR15
|
||
WL #W6F2_SPD,A2WL2B+FR14
|
||
WL #W6F2_SPD,A2WL2B+FR13
|
||
WL #W6F2_SPD,A2WL2B+FR12
|
||
WL #W6F2_SPD,A2WL2B+FR11
|
||
WL #W6F2_SPD,A2WL2B+FR10
|
||
WL #W6F2_SPD,A2WL2B+FR9
|
||
WL #W6F2_SPD,A2WL2B+FR8
|
||
WL #W6F2_SPD,A2WL2B+FR7
|
||
WL #W6F2_SPD,A2WL2B+FR6
|
||
WL #W6F2_SPD,A2WL2B+FR5
|
||
WL #W6F2_SPD,A2WL2B+FR4
|
||
WL #W6F2_SPD,A2WL2B+FR3
|
||
WL #W6F2_SPD,A2WL2B+FR2
|
||
WL #W6F2_SPD,A2WL2B+FR1
|
||
.word ANI_REPEAT
|
||
|
||
|
||
#W8F2_SPD equ 2
|
||
SUBR adm_walk8_f2_anim
|
||
WL #W8F2_SPD,A2WL8B+FR17
|
||
WL #W8F2_SPD,A2WL8B+FR16
|
||
WL #W8F2_SPD,A2WL8B+FR15
|
||
WL #W8F2_SPD,A2WL8B+FR14
|
||
WL #W8F2_SPD,A2WL8B+FR13
|
||
WL #W8F2_SPD,A2WL8B+FR12
|
||
WL #W8F2_SPD,A2WL8B+FR11
|
||
WL #W8F2_SPD,A2WL8B+FR10
|
||
WL #W8F2_SPD,A2WL8B+FR9
|
||
WL #W8F2_SPD,A2WL8B+FR8
|
||
WL #W8F2_SPD,A2WL8B+FR7
|
||
WL #W8F2_SPD,A2WL8B+FR6
|
||
WL #W8F2_SPD,A2WL8B+FR5
|
||
WL #W8F2_SPD,A2WL8B+FR4
|
||
WL #W8F2_SPD,A2WL8B+FR3
|
||
WL #W8F2_SPD,A2WL8B+FR2
|
||
WL #W8F2_SPD,A2WL8B+FR1
|
||
.word ANI_REPEAT
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* WALKS FACING #4
|
||
|
||
#W1F4_SPD equ 2
|
||
SUBR adm_walk1_f4_anim
|
||
WL #W1F4_SPD,A4WL5B+FR20
|
||
WL #W1F4_SPD,A4WL5B+FR19
|
||
WL #W1F4_SPD,A4WL5B+FR18
|
||
WL #W1F4_SPD,A4WL5B+FR17
|
||
WL #W1F4_SPD,A4WL5B+FR16
|
||
WL #W1F4_SPD,A4WL5B+FR15
|
||
WL #W1F4_SPD,A4WL5B+FR14
|
||
WL #W1F4_SPD,A4WL5B+FR13
|
||
WL #W1F4_SPD,A4WL5B+FR12
|
||
WL #W1F4_SPD,A4WL5B+FR11
|
||
WL #W1F4_SPD,A4WL5B+FR10
|
||
WL #W1F4_SPD,A4WL5B+FR9
|
||
WL #W1F4_SPD,A4WL5B+FR8
|
||
WL #W1F4_SPD,A4WL5B+FR7
|
||
WL #W1F4_SPD,A4WL5B+FR6
|
||
WL #W1F4_SPD,A4WL5B+FR5
|
||
WL #W1F4_SPD,A4WL5B+FR4
|
||
WL #W1F4_SPD,A4WL5B+FR3
|
||
WL #W1F4_SPD,A4WL5B+FR2
|
||
WL #W1F4_SPD,A4WL5B+FR1
|
||
.word ANI_REPEAT
|
||
|
||
#W2F4_SPD equ 2
|
||
SUBR adm_walk2_f4_anim
|
||
WL #W2F4_SPD,A4WL2B+FR1
|
||
WL #W2F4_SPD,A4WL2B+FR2
|
||
WL #W2F4_SPD,A4WL2B+FR3
|
||
WL #W2F4_SPD,A4WL2B+FR4
|
||
WL #W2F4_SPD,A4WL2B+FR5
|
||
WL #W2F4_SPD,A4WL2B+FR6
|
||
WL #W2F4_SPD,A4WL2B+FR7
|
||
WL #W2F4_SPD,A4WL2B+FR8
|
||
WL #W2F4_SPD,A4WL2B+FR9
|
||
WL #W2F4_SPD,A4WL2B+FR10
|
||
WL #W2F4_SPD,A4WL2B+FR11
|
||
WL #W2F4_SPD,A4WL2B+FR12
|
||
WL #W2F4_SPD,A4WL2B+FR13
|
||
WL #W2F4_SPD,A4WL2B+FR14
|
||
WL #W2F4_SPD,A4WL2B+FR15
|
||
WL #W2F4_SPD,A4WL2B+FR16
|
||
WL #W2F4_SPD,A4WL2B+FR17
|
||
WL #W2F4_SPD,A4WL2B+FR18
|
||
WL #W2F4_SPD,A4WL2B+FR19
|
||
WL #W2F4_SPD,A4WL2B+FR20
|
||
.word ANI_REPEAT
|
||
|
||
#W4F4_SPD equ 2
|
||
SUBR adm_walk4_f4_anim
|
||
WL #W4F4_SPD,A4WL4A+FR1
|
||
WL #W4F4_SPD,A4WL4A+FR2
|
||
WL #W4F4_SPD,A4WL4A+FR3
|
||
WL #W4F4_SPD,A4WL4A+FR4
|
||
WL #W4F4_SPD,A4WL4A+FR5
|
||
WL #W4F4_SPD,A4WL4A+FR6
|
||
WL #W4F4_SPD,A4WL4A+FR7
|
||
WL #W4F4_SPD,A4WL4A+FR8
|
||
WL #W4F4_SPD,A4WL4A+FR9
|
||
WL #W4F4_SPD,A4WL4A+FR10
|
||
WL #W4F4_SPD,A4WL4A+FR11
|
||
WL #W4F4_SPD,A4WL4A+FR12
|
||
WL #W4F4_SPD,A4WL4A+FR13
|
||
WL #W4F4_SPD,A4WL4A+FR14
|
||
WL #W4F4_SPD,A4WL4A+FR15
|
||
WL #W4F4_SPD,A4WL4A+FR16
|
||
WL #W4F4_SPD,A4WL4A+FR17
|
||
WL #W4F4_SPD,A4WL4A+FR18
|
||
WL #W4F4_SPD,A4WL4A+FR19
|
||
.word ANI_REPEAT
|
||
|
||
#W5F4_SPD equ 2
|
||
SUBR adm_walk5_f4_anim
|
||
WL #W5F4_SPD,A4WL5B+FR1
|
||
WL #W5F4_SPD,A4WL5B+FR2
|
||
WL #W5F4_SPD,A4WL5B+FR3
|
||
WL #W5F4_SPD,A4WL5B+FR4
|
||
WL #W5F4_SPD,A4WL5B+FR5
|
||
WL #W5F4_SPD,A4WL5B+FR6
|
||
WL #W5F4_SPD,A4WL5B+FR7
|
||
WL #W5F4_SPD,A4WL5B+FR8
|
||
WL #W5F4_SPD,A4WL5B+FR9
|
||
WL #W5F4_SPD,A4WL5B+FR10
|
||
WL #W5F4_SPD,A4WL5B+FR11
|
||
WL #W5F4_SPD,A4WL5B+FR12
|
||
WL #W5F4_SPD,A4WL5B+FR13
|
||
WL #W5F4_SPD,A4WL5B+FR14
|
||
WL #W5F4_SPD,A4WL5B+FR15
|
||
WL #W5F4_SPD,A4WL5B+FR16
|
||
WL #W5F4_SPD,A4WL5B+FR17
|
||
WL #W5F4_SPD,A4WL5B+FR18
|
||
WL #W5F4_SPD,A4WL5B+FR19
|
||
WL #W5F4_SPD,A4WL5B+FR20
|
||
.word ANI_REPEAT
|
||
|
||
#W6F4_SPD equ 2
|
||
SUBR adm_walk6_f4_anim
|
||
WL #W6F4_SPD,A4WL2B+FR20
|
||
WL #W6F4_SPD,A4WL2B+FR19
|
||
WL #W6F4_SPD,A4WL2B+FR18
|
||
WL #W6F4_SPD,A4WL2B+FR17
|
||
WL #W6F4_SPD,A4WL2B+FR16
|
||
WL #W6F4_SPD,A4WL2B+FR15
|
||
WL #W6F4_SPD,A4WL2B+FR14
|
||
WL #W6F4_SPD,A4WL2B+FR13
|
||
WL #W6F4_SPD,A4WL2B+FR12
|
||
WL #W6F4_SPD,A4WL2B+FR11
|
||
WL #W6F4_SPD,A4WL2B+FR10
|
||
WL #W6F4_SPD,A4WL2B+FR9
|
||
WL #W6F4_SPD,A4WL2B+FR8
|
||
WL #W6F4_SPD,A4WL2B+FR7
|
||
WL #W6F4_SPD,A4WL2B+FR6
|
||
WL #W6F4_SPD,A4WL2B+FR5
|
||
WL #W6F4_SPD,A4WL2B+FR4
|
||
WL #W6F4_SPD,A4WL2B+FR3
|
||
WL #W6F4_SPD,A4WL2B+FR2
|
||
WL #W6F4_SPD,A4WL2B+FR1
|
||
.word ANI_REPEAT
|
||
|
||
#W8F4_SPD equ 2
|
||
SUBR adm_walk8_f4_anim
|
||
WL #W8F4_SPD,A4WL4A+FR19
|
||
WL #W8F4_SPD,A4WL4A+FR18
|
||
WL #W8F4_SPD,A4WL4A+FR17
|
||
WL #W8F4_SPD,A4WL4A+FR16
|
||
WL #W8F4_SPD,A4WL4A+FR15
|
||
WL #W8F4_SPD,A4WL4A+FR14
|
||
WL #W8F4_SPD,A4WL4A+FR13
|
||
WL #W8F4_SPD,A4WL4A+FR12
|
||
WL #W8F4_SPD,A4WL4A+FR11
|
||
WL #W8F4_SPD,A4WL4A+FR10
|
||
WL #W8F4_SPD,A4WL4A+FR9
|
||
WL #W8F4_SPD,A4WL4A+FR8
|
||
WL #W8F4_SPD,A4WL4A+FR7
|
||
WL #W8F4_SPD,A4WL4A+FR6
|
||
WL #W8F4_SPD,A4WL4A+FR5
|
||
WL #W8F4_SPD,A4WL4A+FR4
|
||
WL #W8F4_SPD,A4WL4A+FR3
|
||
WL #W8F4_SPD,A4WL4A+FR2
|
||
WL #W8F4_SPD,A4WL4A+FR1
|
||
.word ANI_REPEAT
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* TURNS (STANDS)
|
||
|
||
|
||
SUBR adm_2_to_4_turn_anim
|
||
SUBR adm_8_to_6_turn_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TT5Z+FR2
|
||
WL 3,A1TT5Z+FR3
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_4_to_2_turn_anim
|
||
SUBR adm_6_to_8_turn_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TT5Z+FR3
|
||
WL 3,A1TT5Z+FR2
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_4_to_6_turn_anim
|
||
SUBR adm_6_to_4_turn_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TT5Z+FR4
|
||
.word ANI_XFLIP
|
||
WL 3,A1TT5Z+FR4
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_2_to_8_turn_anim
|
||
SUBR adm_8_to_2_turn_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TT5Z+FR1
|
||
.word ANI_XFLIP
|
||
WL 3,A1TT5Z+FR1
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_4_to_8_turn_anim
|
||
SUBR adm_6_to_2_turn_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TT5Z+FR3
|
||
WL 3,A1TT5Z+FR2
|
||
WL 3,A1TT5Z+FR1
|
||
.word ANI_XFLIP
|
||
WL 3,A1TT5Z+FR1
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_2_to_6_turn_anim
|
||
SUBR adm_8_to_4_turn_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TT5Z+FR1
|
||
.word ANI_XFLIP
|
||
WL 3,A1TT5Z+FR1
|
||
WL 3,A1TT5Z+FR2
|
||
WL 3,A1TT5Z+FR3
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* TURNS (TORSOS)
|
||
|
||
|
||
SUBR adm_2_to_4_turn2_anim
|
||
SUBR adm_8_to_6_turn2_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TR5Z+FR2
|
||
.word ANI_SETFACING
|
||
WL 3,A1TR5Z+FR3
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_4_to_2_turn2_anim
|
||
SUBR adm_6_to_8_turn2_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TR5Z+FR3
|
||
.word ANI_SETFACING
|
||
WL 3,A1TR5Z+FR2
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_4_to_6_turn2_anim
|
||
SUBR adm_6_to_4_turn2_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TR5Z+FR4
|
||
.word ANI_SETFACING ;ANI_XFLIP <- not primary anim
|
||
WL 3,A1TR5Z+FR4
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_2_to_8_turn2_anim
|
||
SUBR adm_8_to_2_turn2_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
WL 3,A1TR5Z+FR1
|
||
.word ANI_SETFACING ;ANI_XFLIP <- not primary anim
|
||
WL 3,A1TR5Z+FR1
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_4_to_8_turn2_anim
|
||
SUBR adm_6_to_2_turn2_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
SUBR adm_2_to_6_turn2_anim
|
||
SUBR adm_8_to_4_turn2_anim
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP ;uninterruptable
|
||
.word ANI_SETSPEED,100h
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* RUNNING IN #3
|
||
|
||
SUBR adm_run2_anim
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
WL ANI_GOTO,#lp0
|
||
|
||
#RUN_SPD equ 2
|
||
SUBR adm_run_anim
|
||
.word ANI_SETMODE,MODE_UNINT ;uninterruptable
|
||
#lp0
|
||
#lp1
|
||
WL #RUN_SPD+1,A3RN3A+FR10
|
||
WL #RUN_SPD,A3RN3A+FR11
|
||
WL #RUN_SPD,A3RN3A+FR12
|
||
WL #RUN_SPD,A3RN3A+FR13
|
||
WL #RUN_SPD,A3RN3A+FR1
|
||
WL #RUN_SPD+1,A3RN3A+FR2
|
||
WL #RUN_SPD,A3RN3A+FR3
|
||
.word ANI_SOUND,run_snd
|
||
.word ANI_SETMODE,MODE_NORMAL ;clear UNINT bit
|
||
WL #RUN_SPD+1,A3RN3A+FR4
|
||
WL #RUN_SPD,A3RN3A+FR5
|
||
WL #RUN_SPD+1,A3RN3A+FR6
|
||
WL #RUN_SPD,A3RN3A+FR7
|
||
WL #RUN_SPD+1,A3RN3A+FR8
|
||
.word ANI_SOUND,run_snd
|
||
WL #RUN_SPD,A3RN3A+FR9
|
||
|
||
WL ANI_GOTO,#lp1
|
||
|
||
|
||
*
|
||
* OUT OF CONTROL RUN IN #3
|
||
|
||
SUBR adm_ocrun_anim
|
||
.word ANI_SETMODE,MODE_NOAUTOFLIP ;don't change facing
|
||
WL 15,A3RN3A+FR1
|
||
#lp
|
||
WL #RUN_SPD+1,A3RN3A+FR10
|
||
WL #RUN_SPD,A3RN3A+FR11
|
||
WL #RUN_SPD,A3RN3A+FR12
|
||
WL #RUN_SPD,A3RN3A+FR13
|
||
WL #RUN_SPD,A3RN3A+FR1
|
||
WL #RUN_SPD+1,A3RN3A+FR2
|
||
WL #RUN_SPD,A3RN3A+FR3
|
||
.word ANI_SOUND,run_snd
|
||
WL #RUN_SPD+1,A3RN3A+FR4
|
||
WL #RUN_SPD,A3RN3A+FR5
|
||
WL #RUN_SPD+1,A3RN3A+FR6
|
||
WL #RUN_SPD,A3RN3A+FR7
|
||
WL #RUN_SPD+1,A3RN3A+FR8
|
||
.word ANI_SOUND,run_snd
|
||
WL #RUN_SPD,A3RN3A+FR9
|
||
WL ANI_GOTO,#lp
|
||
|
||
#*****************************************************************************
|
||
*
|
||
* BOUNCE OFF ROPES
|
||
|
||
SUBR adm_bounce_anim
|
||
|
||
.word ANI_SETMODE,MODE_UNINT+MODE_NOAUTOFLIP| MODE_NOCONFINE ;uninterruptable
|
||
.word ANI_ZEROVELS
|
||
WL 4,A3BO3A+FR1
|
||
|
||
WL 3,A3BO3A+FR2
|
||
.word ANI_BOUNCEROPE,0
|
||
WL 1,A3BO3A+FR2
|
||
|
||
WL 3,A3BO3A+FR3
|
||
.word ANI_BOUNCEROPE,1
|
||
WL 1,A3BO3A+FR3
|
||
|
||
WL 3,A3BO3A+FR4
|
||
.word ANI_BOUNCEROPE,2
|
||
WL 1,A3BO3A+FR4
|
||
|
||
WL 5,A3BO3A+FR5
|
||
.word ANI_BOUNCEROPE,4
|
||
WL 1,A3BO3A+FR5
|
||
|
||
WL 3,A3BO3A+FR6
|
||
.word ANI_BOUNCEROPE,-1 ;release
|
||
WL 1,A3BO3A+FR6
|
||
|
||
WL 4,A3BO3A+FR7
|
||
.word ANI_SOUND,run_snd
|
||
|
||
.word ANI_SETMODE,MODE_NORMAL
|
||
.word ANI_END
|
||
|
||
|
||
#*****************************************************************************
|
||
|
||
SUBR adm_slave_image_table
|
||
|
||
.long #s2_grapple ;0 S2_GRAPPLE
|
||
.long #s4_grapple ;1 S4_GRAPPLE
|
||
.long #s3_grap_to_hh ;2 S3_GRAP_TO_HH
|
||
.long #s3_pile_driven ;3 S3_PILE_DRIVEN
|
||
|
||
|
||
#s2_grapple ;ABOMB #2 grapple
|
||
.long A2GR3Z+FR5 ;0 (most forward)
|
||
.long A2GR3Z+FR6 ;1
|
||
.long A2GR3Z+FR7 ;2
|
||
.long A2GR3Z+FR8 ;3 (most back)
|
||
|
||
#s4_grapple ;ABOMB #4 grapple
|
||
.long A4GR3B+FR7 ;0 (most forward)
|
||
.long A4GR3B+FR6 ;1
|
||
.long A4GR3B+FR5 ;2
|
||
.long A4GR3B+FR4 ;3 (most back)
|
||
|
||
#s3_grap_to_hh ;ABOMB #3 from grapple to head being held
|
||
|
||
#s3_pile_driven ;ABOMB #3 pile driven
|
||
|
||
|
||
******************************************************************************
|
||
.end
|
||
|