4168 lines
80 KiB
NASM
4168 lines
80 KiB
NASM
**************************************************************
|
|
*
|
|
* Owner: TURMELL
|
|
*
|
|
* Software: Shawn Liptak, Mark Turmell
|
|
* Initiated: 9/17/92
|
|
*
|
|
* Modified: Mark Turmell, 1/6/93 -Split from PLYR.asm
|
|
*
|
|
* COPYRIGHT (C) 1992 WILLIAMS ELECTRONICS GAMES, INC.
|
|
*
|
|
*.Last mod - 3/23/93 15:13
|
|
**************************************************************
|
|
.file "plyr3.asm"
|
|
.title "basketball player code"
|
|
.width 132
|
|
.option b,d,l,t
|
|
.mnolist
|
|
|
|
.include "hotspot.tbl"
|
|
|
|
.include "mproc.equ" ;Mproc equates
|
|
.include "disp.equ" ;Display proc equates
|
|
.include "gsp.equ" ;Gsp asm equates
|
|
.include "sys.equ"
|
|
.include "audit.equ"
|
|
.include "world.equ" ;Court-world defs
|
|
.include "game.equ"
|
|
.include "macros.hdr" ;Macros
|
|
.asg 0,SEQT
|
|
.include "plyr.equ"
|
|
|
|
.include "imgtbl7.glo"
|
|
.include "imgtbl1.glo"
|
|
|
|
.include "plyrhd.glo"
|
|
.include "plyrhd2.glo"
|
|
.include "plyrhd5.glo"
|
|
.include "HOTSPOT.GLO"
|
|
|
|
.include "ball.tbl"
|
|
.include "ballshad.tbl"
|
|
.include "ballshad.glo"
|
|
|
|
|
|
;sounds external
|
|
|
|
|
|
|
|
;symbols externally defined
|
|
|
|
;DJT Start
|
|
.ref game_time
|
|
;DJT End
|
|
.ref gug1,BEdwrd1
|
|
|
|
.ref pup_court,pup_aba
|
|
.ref anipt_getsclxy
|
|
.ref BAKMODS,BGND_UD1
|
|
; .ref snd_play1ovr
|
|
.ref IRQSKYE
|
|
.ref dpageflip
|
|
.ref GAMSTATE
|
|
.ref COLCYC
|
|
.ref system_savegame,system_restoregame
|
|
.ref tvpanelon
|
|
.ref RNDRNG0
|
|
.ref READ_DIP
|
|
|
|
.ref pal_getf
|
|
|
|
;From plyrat3.asm
|
|
.ref sd_h
|
|
; .ref RA_H
|
|
.ref Blaylock_h
|
|
.ref Ssmith_h
|
|
.ref Knorman_h
|
|
; .ref Henderso_h
|
|
.ref Barros_h
|
|
.ref Montross_h
|
|
.ref Radja_h
|
|
.ref Curry_h
|
|
.ref Zidek_h
|
|
.ref Kerr_h
|
|
.ref Thill_h
|
|
.ref Cmills_h
|
|
.ref Phills_h
|
|
.ref Kidd_h
|
|
.ref Pjones_h
|
|
.ref Rauf_h
|
|
.ref Pack_h
|
|
.ref Mcdyes_h
|
|
.ref Ghill_h
|
|
.ref Tmills_h
|
|
.ref Thorpe_h
|
|
.ref Sprewell_h
|
|
.ref Jsmith_h
|
|
.ref Cassel_h
|
|
.ref Ddavis_h
|
|
.ref Mckee_h
|
|
.ref Vaught_h
|
|
.ref Rrogers_h
|
|
.ref Lmurray_h
|
|
.ref Richardson_h
|
|
.ref Bbarry_h
|
|
.ref Vanexel_h
|
|
.ref Ceballos_h
|
|
.ref Ejones_h
|
|
.ref Bowens_h
|
|
.ref Grobinson_h
|
|
.ref EMurdock_h
|
|
.ref Respert_h
|
|
; .ref Rooks_h
|
|
.ref Garnett_h
|
|
.ref Gilliam_h
|
|
.ref Obannon_h
|
|
.ref Dscott_h
|
|
.ref Wright_h
|
|
.ref Stackhouse_h
|
|
.ref Wperson_h
|
|
.ref Finley_h
|
|
.ref Strickland_h
|
|
.ref Sabonis_h
|
|
.ref Bwilliams_h
|
|
.ref Childress_h
|
|
.ref Wwilliams_h
|
|
.ref Bgrant_h
|
|
.ref Marciulonis_h
|
|
.ref Ajohnson_h
|
|
.ref Sford_h
|
|
.ref Crogers_h
|
|
.ref Stoudamire_h
|
|
.ref Anthony_h
|
|
; .ref Gattison_h
|
|
.ref Breeves_h
|
|
.ref Jhoward_h
|
|
.ref McCloud_h
|
|
.ref Houston_h
|
|
.ref Muresan_h
|
|
.ref KEdwards_h
|
|
.ref Fox_h
|
|
.ref Ferry_h
|
|
.ref Mullin_h
|
|
.ref Longley_h
|
|
.ref MJackson_h
|
|
.ref Danilovic_h
|
|
.ref OMiller_h
|
|
.ref Delnegro_h
|
|
.ref Douglas_h
|
|
.ref WAnderson_h
|
|
.ref TMurray_h
|
|
.ref Koncak_h
|
|
.ref Rose_h
|
|
.ref Brandon_h
|
|
; .ref Coles_h
|
|
.ref DHarper_h
|
|
.ref Edney_h
|
|
.ref VMaxwell_h
|
|
|
|
;From plyrat2.asm
|
|
.ref Laetner_h
|
|
.ref Hawkins_h
|
|
.ref LJohnson_h
|
|
.ref Divac_h
|
|
.ref KMalone_h
|
|
.ref Stockton_h
|
|
.ref Ewing_h
|
|
.ref Seikaly_h
|
|
.ref Miller_h
|
|
.ref Mutumbo_h
|
|
.ref Oakley_h
|
|
.ref Olajuwon_h
|
|
.ref Rice_h
|
|
.ref DRobinson_h
|
|
.ref Schrempf_h
|
|
.ref Smith_h
|
|
.ref Tisdale_h
|
|
.ref Kemp_h
|
|
.ref Pippen_h
|
|
.ref Gill_h
|
|
.ref Mullin_h
|
|
.ref Person_h
|
|
.ref Augmon_h
|
|
.ref Benjamin_h
|
|
.ref Coleman_h
|
|
.ref Drexler_h
|
|
; .ref DEllis_h
|
|
.ref Elliot_h
|
|
.ref Hardaway_h
|
|
.ref HCGrant_h
|
|
.ref Hornacek_h
|
|
.ref Manning_h
|
|
.ref Cow_h
|
|
.ref fifi_h
|
|
.ref FIFI_F
|
|
.ref Alien_h
|
|
.ref Mel_h
|
|
.ref Mik_h
|
|
.ref Joe_h
|
|
.ref Ang_h
|
|
.ref Lis_h
|
|
.ref Guido_h
|
|
.ref Ber_h
|
|
.ref Chk_h
|
|
.ref Fat_h
|
|
.ref Fra_h
|
|
.ref Gor_h
|
|
.ref Gre_h
|
|
.ref Old_h
|
|
.ref Pig_h
|
|
.ref Wiz_h
|
|
.ref eric_h
|
|
.ref madball_h
|
|
.ref jackjr_h
|
|
.ref kim_h
|
|
.ref clown_h
|
|
.ref ape_h
|
|
.ref cheech_h
|
|
.ref mar_h
|
|
.ref bardo_h
|
|
.ref oursler_h
|
|
.ref mxv_h
|
|
.ref eddie_h
|
|
.ref dim_h
|
|
.ref mike_h
|
|
.ref sean_h
|
|
.ref bud_h
|
|
.ref BUD_F
|
|
.ref bardo_h
|
|
.ref willy_h
|
|
|
|
.ref plyrobj_t
|
|
.ref BOON_F,TOBIAS_F,OURSL_F
|
|
.ref EDDIE_F
|
|
|
|
;symbols defined in this file
|
|
|
|
.def NBALL101,NBALL601,ABALL101
|
|
|
|
.def plr_heads_small,plr_heads_small_end
|
|
.def SM_HEADS_CNT
|
|
|
|
|
|
;uninitialized ram definitions
|
|
|
|
; .bss cycram ,9*16
|
|
; .bss clipbits ,32 ;Bit set for each clip # shown
|
|
;
|
|
; BSSX clipsrunning ,32
|
|
|
|
BSSX ditch_meter,16
|
|
|
|
;equates for this file
|
|
|
|
|
|
.text
|
|
|
|
#*******************************
|
|
* do ball animation
|
|
|
|
SUBR do_ball_ani
|
|
|
|
move *a8(OZPOS),a2 ;No
|
|
subi CZMIN-32,a2 ;-Base -32 to go 1 smaller @ crt top
|
|
jrge #zge
|
|
clr a2
|
|
#zge
|
|
srl 5,a2
|
|
move *a13(ball_zsznum),a4
|
|
sub a2,a4
|
|
jrne #newani ;Same Z range? br=no
|
|
dsj a10,#skipa
|
|
|
|
#newani
|
|
move a2,*a13(ball_zsznum)
|
|
sll 5,a2
|
|
move a2,a3
|
|
move *a8(OPAL),a1 ;Chk for correct palette
|
|
sll 32-8,a1
|
|
srl 32-8-5,a1
|
|
.ref PALRAM
|
|
addi PALRAM-32,a1
|
|
move *a1,a1,L
|
|
movi BBALL_P,a0 ;=reg ball pal
|
|
move *a13(ball_onfire),a14 ;Is someone on-fire?
|
|
jrz #nofpal ; br=no
|
|
addi #anif_t,a2
|
|
move @balltmshotcnt,a14 ;Is it a team on-fire?
|
|
subk TMFIRE_MINCNT,a14
|
|
jrlt #notd ; br=no
|
|
movi BBALFLA_P,a0 ;=blue ball pal
|
|
jruc #notd
|
|
#nofpal
|
|
addi #ani_t,a2
|
|
move @pup_aba,a14
|
|
jrz #notd
|
|
movi ABALL_P,a0 ;=reg ball pal
|
|
addi #ania_t-#ani_t,a2
|
|
#notd
|
|
cmp a1,a0 ;Does ball have the right palette?
|
|
jreq #gotp ; br=yes
|
|
calla pal_getf
|
|
move a0,*a8(OPAL) ;Set correct palette
|
|
|
|
#gotp
|
|
move *a13(ball_ani1st_p),a1,L
|
|
move *a2,a2,L
|
|
cmp a1,a2
|
|
jreq #sameseq
|
|
|
|
addi #shad_t,a3 ;Set new shadow img
|
|
move *a3,a0,L
|
|
move a0,*a9(OIMG),L
|
|
move *a0,a14,L
|
|
move a14,*a9(OSIZE),L
|
|
move *a0(ISAG),*a9(OSAG),L
|
|
move *a0(IANIOFFY),a14
|
|
neg a14
|
|
move a14,*a9(OYPOS)
|
|
|
|
move a2,*a13(ball_ani1st_p),L
|
|
jruc #newz
|
|
|
|
#sameseq
|
|
move *a13(ball_onfire),a14
|
|
jrnz #movin ;On fire?
|
|
move *a8(OXVEL),a0,L
|
|
abs a0
|
|
srl 2,a0
|
|
jrnz #movin
|
|
movk 5,a10
|
|
move *a8(OZVEL),a0,L
|
|
abs a0
|
|
srl 2,a0
|
|
jrz #skipa
|
|
#movin
|
|
move *a13(ball_ani_p),a2,L
|
|
move *a2+,a0,L ;*Next img
|
|
jrnz #notend
|
|
move a1,a2
|
|
#newz
|
|
move *a2+,a0,L ;*1st img
|
|
#notend
|
|
move *a2+,a10
|
|
move a2,*a13(ball_ani_p),L
|
|
|
|
move a0,*a8(OIMG),L ;Set new ball img
|
|
movb *a0(ICTRL+7),*a8(OCTRL+7) ;Set 5 z comp & 3 bpp bits
|
|
move *a0,a2,L
|
|
move a2,*a8(OSIZE),L
|
|
move *a0(ISAG),*a8(OSAG),L
|
|
move *a0(IANIOFFX),a2
|
|
move *a0(IANIOFFY),*a13(ball_aniy)
|
|
move *a13(ball_anix),a1
|
|
move a2,*a13(ball_anix)
|
|
move *a8(OXPOS),a0
|
|
add a1,a0 ;Old ani X
|
|
sub a2,a0 ;-New ani X
|
|
move a0,*a8(OXPOS)
|
|
|
|
#skipa
|
|
rets
|
|
|
|
|
|
#ani_t
|
|
.long #b1_l
|
|
|
|
.long #b1_l,#b1_l,#b1_l,#b2_l,#b2_l,#b3_l
|
|
.long #b3_l,#b4_l,#b5_l,#b6_l,#b7_l
|
|
|
|
.long #b8_l,#b8_l,#b8_l,#b8_l,#b8_l,#b8_l
|
|
|
|
; .long #b1_l
|
|
;
|
|
; .long #b2_l,#b2_l,#b3_l,#b3_l,#b4_l,#b4_l
|
|
; .long #b5_l,#b6_l,#b7_l,#b8_l,#b9_l
|
|
;
|
|
; .long #b10_l,#b10_l,#b10_l,#b10_l,#b10_l,#b10_l
|
|
|
|
.asg 2,D
|
|
|
|
;DJT Start
|
|
.def CBANI_T
|
|
CBANI_T
|
|
;DJT End
|
|
#b1_l
|
|
LWLWLWLW NBALL101,D,NBALL102,D,NBALL103,D,NBALL104,D
|
|
LWLWLWLW NBALL105,D,NBALL106,D,NBALL107,D,NBALL108,D
|
|
LWLWLWLW NBALL109,D,NBALL110,D,NBALL111,D,NBALL112,D
|
|
LWLWLWLW NBALL113,D,NBALL114,D,NBALL115,D,NBALL116,D
|
|
LWLWLWLW NBALL117,D,NBALL118,D,NBALL119,D,NBALL120,D
|
|
LWLWLWLW NBALL121,D,NBALL122,D,NBALL123,D,NBALL124,D
|
|
LWLWLWLW NBALL125,D,NBALL126,D,NBALL127,D,NBALL128,D
|
|
LWLW NBALL129,D,NBALL130,D
|
|
.long 0
|
|
|
|
#b2_l
|
|
LWLWLWLW NBALL201,D,NBALL202,D,NBALL203,D,NBALL204,D
|
|
LWLWLWLW NBALL205,D,NBALL206,D,NBALL207,D,NBALL208,D
|
|
LWLWLWLW NBALL209,D,NBALL210,D,NBALL211,D,NBALL212,D
|
|
LWLWLWLW NBALL213,D,NBALL214,D,NBALL215,D,NBALL216,D
|
|
LWLWLWLW NBALL217,D,NBALL218,D,NBALL219,D,NBALL220,D
|
|
LWLWLWLW NBALL221,D,NBALL222,D,NBALL223,D,NBALL224,D
|
|
LWLWLWLW NBALL225,D,NBALL226,D,NBALL227,D,NBALL228,D
|
|
LWLW NBALL229,D,NBALL230,D
|
|
.long 0
|
|
|
|
#b3_l
|
|
LWLWLWLW NBALL301,D,NBALL302,D,NBALL303,D,NBALL304,D
|
|
LWLWLWLW NBALL305,D,NBALL306,D,NBALL307,D,NBALL308,D
|
|
LWLWLWLW NBALL309,D,NBALL310,D,NBALL311,D,NBALL312,D
|
|
LWLWLWLW NBALL313,D,NBALL314,D,NBALL315,D,NBALL316,D
|
|
LWLWLWLW NBALL317,D,NBALL318,D,NBALL319,D,NBALL320,D
|
|
LWLWLWLW NBALL321,D,NBALL322,D,NBALL323,D,NBALL324,D
|
|
LWLWLWLW NBALL325,D,NBALL326,D,NBALL327,D,NBALL328,D
|
|
LWLW NBALL329,D,NBALL330,D
|
|
.long 0
|
|
|
|
#b4_l
|
|
LWLWLWLW NBALL401,D,NBALL402,D,NBALL403,D,NBALL404,D
|
|
LWLWLWLW NBALL405,D,NBALL406,D,NBALL407,D,NBALL408,D
|
|
LWLWLWLW NBALL409,D,NBALL410,D,NBALL411,D,NBALL412,D
|
|
LWLWLWLW NBALL413,D,NBALL414,D,NBALL415,D,NBALL416,D
|
|
LWLWLWLW NBALL417,D,NBALL418,D,NBALL419,D,NBALL420,D
|
|
LWLWLWLW NBALL421,D,NBALL422,D,NBALL423,D,NBALL424,D
|
|
LWLWLWLW NBALL425,D,NBALL426,D,NBALL427,D,NBALL428,D
|
|
LWLW NBALL429,D,NBALL430,D
|
|
.long 0
|
|
|
|
#b5_l
|
|
LWLWLWLW NBALL501,D,NBALL502,D,NBALL503,D,NBALL504,D
|
|
LWLWLWLW NBALL505,D,NBALL506,D,NBALL507,D,NBALL508,D
|
|
LWLWLWLW NBALL509,D,NBALL510,D,NBALL511,D,NBALL512,D
|
|
LWLWLWLW NBALL513,D,NBALL514,D,NBALL515,D,NBALL516,D
|
|
LWLWLWLW NBALL517,D,NBALL518,D,NBALL519,D,NBALL520,D
|
|
LWLWLWLW NBALL521,D,NBALL522,D,NBALL523,D,NBALL524,D
|
|
LWLWLWLW NBALL525,D,NBALL526,D,NBALL527,D,NBALL528,D
|
|
LWLW NBALL529,D,NBALL530,D
|
|
.long 0
|
|
|
|
#b6_l
|
|
LWLWLWLW NBALL601,D,NBALL602,D,NBALL603,D,NBALL604,D
|
|
LWLWLWLW NBALL605,D,NBALL606,D,NBALL607,D,NBALL608,D
|
|
LWLWLWLW NBALL609,D,NBALL610,D,NBALL611,D,NBALL612,D
|
|
LWLWLWLW NBALL613,D,NBALL614,D,NBALL615,D,NBALL616,D
|
|
LWLWLWLW NBALL617,D,NBALL618,D,NBALL619,D,NBALL620,D
|
|
LWLWLWLW NBALL621,D,NBALL622,D,NBALL623,D,NBALL624,D
|
|
LWLWLWLW NBALL625,D,NBALL626,D,NBALL627,D,NBALL628,D
|
|
LWLW NBALL629,D,NBALL630,D
|
|
.long 0
|
|
|
|
#b7_l
|
|
LWLWLWLW NBALL701,D,NBALL702,D,NBALL703,D,NBALL704,D
|
|
LWLWLWLW NBALL705,D,NBALL706,D,NBALL707,D,NBALL708,D
|
|
LWLWLWLW NBALL709,D,NBALL710,D,NBALL711,D,NBALL712,D
|
|
LWLWLWLW NBALL713,D,NBALL714,D,NBALL715,D,NBALL716,D
|
|
LWLWLWLW NBALL717,D,NBALL718,D,NBALL719,D,NBALL720,D
|
|
LWLWLWLW NBALL721,D,NBALL722,D,NBALL723,D,NBALL724,D
|
|
LWLWLWLW NBALL725,D,NBALL726,D,NBALL727,D,NBALL728,D
|
|
LWLW NBALL729,D,NBALL730,D
|
|
.long 0
|
|
|
|
#b8_l
|
|
LWLWLWLW NBALL801,D,NBALL802,D,NBALL803,D,NBALL804,D
|
|
LWLWLWLW NBALL805,D,NBALL806,D,NBALL807,D,NBALL808,D
|
|
LWLWLWLW NBALL809,D,NBALL810,D,NBALL811,D,NBALL812,D
|
|
LWLWLWLW NBALL813,D,NBALL814,D,NBALL815,D,NBALL816,D
|
|
LWLWLWLW NBALL817,D,NBALL818,D,NBALL819,D,NBALL820,D
|
|
LWLWLWLW NBALL821,D,NBALL822,D,NBALL823,D,NBALL824,D
|
|
LWLWLWLW NBALL825,D,NBALL826,D,NBALL827,D,NBALL828,D
|
|
LWLW NBALL829,D,NBALL830,D
|
|
.long 0
|
|
|
|
;;#b9_l
|
|
;; LWLWLWLW NBALL901,D,NBALL902,D,NBALL903,D,NBALL904,D
|
|
;; LWLWLWLW NBALL905,D,NBALL906,D,NBALL907,D,NBALL908,D
|
|
;; LWLWLWLW NBALL909,D,NBALL910,D,NBALL911,D,NBALL912,D
|
|
;; LWLWLWLW NBALL913,D,NBALL914,D,NBALL915,D,NBALL916,D
|
|
;; LWLWLWLW NBALL917,D,NBALL918,D,NBALL919,D,NBALL920,D
|
|
;; LWLWLWLW NBALL921,D,NBALL922,D,NBALL923,D,NBALL924,D
|
|
;; LWLWLWLW NBALL925,D,NBALL926,D,NBALL927,D,NBALL928,D
|
|
;; LWLW NBALL929,D,NBALL930,D
|
|
;; .long 0
|
|
;;
|
|
;;#b10_l
|
|
;; LWLWLWLW NBALL1001,D,NBALL1002,D,NBALL1003,D,NBALL1004,D
|
|
;; LWLWLWLW NBALL1005,D,NBALL1006,D,NBALL1007,D,NBALL1008,D
|
|
;; LWLWLWLW NBALL1009,D,NBALL1010,D,NBALL1011,D,NBALL1012,D
|
|
;; LWLWLWLW NBALL1013,D,NBALL1014,D,NBALL1015,D,NBALL1016,D
|
|
;; LWLWLWLW NBALL1017,D,NBALL1018,D,NBALL1019,D,NBALL1020,D
|
|
;; LWLWLWLW NBALL1021,D,NBALL1022,D,NBALL1023,D,NBALL1024,D
|
|
;; LWLWLWLW NBALL1025,D,NBALL1026,D,NBALL1027,D,NBALL1028,D
|
|
;; LWLW NBALL1029,D,NBALL1030,D
|
|
;; .long 0
|
|
|
|
|
|
#anif_t
|
|
.long #bf1_l
|
|
|
|
.long #bf1_l,#bf1_l,#bf1_l,#bf2_l,#bf2_l,#bf3_l
|
|
.long #bf3_l,#bf4_l,#bf5_l,#bf6_l,#bf7_l
|
|
|
|
.long #bf8_l,#bf8_l,#bf8_l,#bf8_l,#bf8_l,#bf8_l
|
|
|
|
; .long #bf1_l
|
|
;
|
|
; .long #bf2_l,#bf2_l,#bf3_l,#bf3_l,#bf4_l,#bf4_l
|
|
; .long #bf5_l,#bf6_l,#bf7_l,#bf8_l,#bf9_l
|
|
;
|
|
; .long #bf10_l,#bf10_l,#bf10_l,#bf10_l,#bf10_l,#bf10_l
|
|
|
|
|
|
.asg 2,D
|
|
|
|
#bf1_l
|
|
LWLWLWLW FBALL101,D,FBALL102,D,FBALL103,D,FBALL104,D
|
|
LWLWLWLW FBALL105,D,FBALL106,D,FBALL107,D,FBALL108,D
|
|
LWLWLWLW FBALL109,D,FBALL110,D,FBALL111,D,FBALL112,D
|
|
LWLWLWLW FBALL113,D,FBALL114,D,FBALL115,D,FBALL116,D
|
|
LWLWLWLW FBALL117,D,FBALL118,D,FBALL119,D,FBALL120,D
|
|
LWLWLWLW FBALL121,D,FBALL122,D,FBALL123,D,FBALL124,D
|
|
LWLWLWLW FBALL125,D,FBALL126,D,FBALL127,D,FBALL128,D
|
|
LWLW FBALL129,D,FBALL130,D
|
|
.long 0
|
|
|
|
#bf2_l
|
|
LWLWLWLW FBALL201,D,FBALL202,D,FBALL203,D,FBALL204,D
|
|
LWLWLWLW FBALL205,D,FBALL206,D,FBALL207,D,FBALL208,D
|
|
LWLWLWLW FBALL209,D,FBALL210,D,FBALL211,D,FBALL212,D
|
|
LWLWLWLW FBALL213,D,FBALL214,D,FBALL215,D,FBALL216,D
|
|
LWLWLWLW FBALL217,D,FBALL218,D,FBALL219,D,FBALL220,D
|
|
LWLWLWLW FBALL221,D,FBALL222,D,FBALL223,D,FBALL224,D
|
|
LWLWLWLW FBALL225,D,FBALL226,D,FBALL227,D,FBALL228,D
|
|
LWLW FBALL229,D,FBALL230,D
|
|
.long 0
|
|
|
|
#bf3_l
|
|
LWLWLWLW FBALL301,D,FBALL302,D,FBALL303,D,FBALL304,D
|
|
LWLWLWLW FBALL305,D,FBALL306,D,FBALL307,D,FBALL308,D
|
|
LWLWLWLW FBALL309,D,FBALL310,D,FBALL311,D,FBALL312,D
|
|
LWLWLWLW FBALL313,D,FBALL314,D,FBALL315,D,FBALL316,D
|
|
LWLWLWLW FBALL317,D,FBALL318,D,FBALL319,D,FBALL320,D
|
|
LWLWLWLW FBALL321,D,FBALL322,D,FBALL323,D,FBALL324,D
|
|
LWLWLWLW FBALL325,D,FBALL326,D,FBALL327,D,FBALL328,D
|
|
LWLW FBALL329,D,FBALL330,D
|
|
.long 0
|
|
|
|
#bf4_l
|
|
LWLWLWLW FBALL401,D,FBALL402,D,FBALL403,D,FBALL404,D
|
|
LWLWLWLW FBALL405,D,FBALL406,D,FBALL407,D,FBALL408,D
|
|
LWLWLWLW FBALL409,D,FBALL410,D,FBALL411,D,FBALL412,D
|
|
LWLWLWLW FBALL413,D,FBALL414,D,FBALL415,D,FBALL416,D
|
|
LWLWLWLW FBALL417,D,FBALL418,D,FBALL419,D,FBALL420,D
|
|
LWLWLWLW FBALL421,D,FBALL422,D,FBALL423,D,FBALL424,D
|
|
LWLWLWLW FBALL425,D,FBALL426,D,FBALL427,D,FBALL428,D
|
|
LWLW FBALL429,D,FBALL430,D
|
|
.long 0
|
|
|
|
#bf5_l
|
|
LWLWLWLW FBALL501,D,FBALL502,D,FBALL503,D,FBALL504,D
|
|
LWLWLWLW FBALL505,D,FBALL506,D,FBALL507,D,FBALL508,D
|
|
LWLWLWLW FBALL509,D,FBALL510,D,FBALL511,D,FBALL512,D
|
|
LWLWLWLW FBALL513,D,FBALL514,D,FBALL515,D,FBALL516,D
|
|
LWLWLWLW FBALL517,D,FBALL518,D,FBALL519,D,FBALL520,D
|
|
LWLWLWLW FBALL521,D,FBALL522,D,FBALL523,D,FBALL524,D
|
|
LWLWLWLW FBALL525,D,FBALL526,D,FBALL527,D,FBALL528,D
|
|
LWLW FBALL529,D,FBALL530,D
|
|
.long 0
|
|
|
|
#bf6_l
|
|
LWLWLWLW FBALL601,D,FBALL602,D,FBALL603,D,FBALL604,D
|
|
LWLWLWLW FBALL605,D,FBALL606,D,FBALL607,D,FBALL608,D
|
|
LWLWLWLW FBALL609,D,FBALL610,D,FBALL611,D,FBALL612,D
|
|
LWLWLWLW FBALL613,D,FBALL614,D,FBALL615,D,FBALL616,D
|
|
LWLWLWLW FBALL617,D,FBALL618,D,FBALL619,D,FBALL620,D
|
|
LWLWLWLW FBALL621,D,FBALL622,D,FBALL623,D,FBALL624,D
|
|
LWLWLWLW FBALL625,D,FBALL626,D,FBALL627,D,FBALL628,D
|
|
LWLW FBALL629,D,FBALL630,D
|
|
.long 0
|
|
|
|
#bf7_l
|
|
LWLWLWLW FBALL701,D,FBALL702,D,FBALL703,D,FBALL704,D
|
|
LWLWLWLW FBALL705,D,FBALL706,D,FBALL707,D,FBALL708,D
|
|
LWLWLWLW FBALL709,D,FBALL710,D,FBALL711,D,FBALL712,D
|
|
LWLWLWLW FBALL713,D,FBALL714,D,FBALL715,D,FBALL716,D
|
|
LWLWLWLW FBALL717,D,FBALL718,D,FBALL719,D,FBALL720,D
|
|
LWLWLWLW FBALL721,D,FBALL722,D,FBALL723,D,FBALL724,D
|
|
LWLWLWLW FBALL725,D,FBALL726,D,FBALL727,D,FBALL728,D
|
|
LWLW FBALL729,D,FBALL730,D
|
|
.long 0
|
|
|
|
#bf8_l
|
|
LWLWLWLW FBALL801,D,FBALL802,D,FBALL803,D,FBALL804,D
|
|
LWLWLWLW FBALL805,D,FBALL806,D,FBALL807,D,FBALL808,D
|
|
LWLWLWLW FBALL809,D,FBALL810,D,FBALL811,D,FBALL812,D
|
|
LWLWLWLW FBALL813,D,FBALL814,D,FBALL815,D,FBALL816,D
|
|
LWLWLWLW FBALL817,D,FBALL818,D,FBALL819,D,FBALL820,D
|
|
LWLWLWLW FBALL821,D,FBALL822,D,FBALL823,D,FBALL824,D
|
|
LWLWLWLW FBALL825,D,FBALL826,D,FBALL827,D,FBALL828,D
|
|
LWLW FBALL829,D,FBALL830,D
|
|
.long 0
|
|
|
|
;;#bf9_l
|
|
;; LWLWLWLW FBALL901,D,FBALL902,D,FBALL903,D,FBALL904,D
|
|
;; LWLWLWLW FBALL905,D,FBALL906,D,FBALL907,D,FBALL908,D
|
|
;; LWLWLWLW FBALL909,D,FBALL910,D,FBALL911,D,FBALL912,D
|
|
;; LWLWLWLW FBALL913,D,FBALL914,D,FBALL915,D,FBALL916,D
|
|
;; LWLWLWLW FBALL917,D,FBALL918,D,FBALL919,D,FBALL920,D
|
|
;; LWLWLWLW FBALL921,D,FBALL922,D,FBALL923,D,FBALL924,D
|
|
;; LWLWLWLW FBALL925,D,FBALL926,D,FBALL927,D,FBALL928,D
|
|
;; LWLW FBALL929,D,FBALL930,D
|
|
;; .long 0
|
|
;;
|
|
;;#bf10_l
|
|
;; LWLWLWLW FBALL1001,D,FBALL1002,D,FBALL1003,D,FBALL1004,D
|
|
;; LWLWLWLW FBALL1005,D,FBALL1006,D,FBALL1007,D,FBALL1008,D
|
|
;; LWLWLWLW FBALL1009,D,FBALL1010,D,FBALL1011,D,FBALL1012,D
|
|
;; LWLWLWLW FBALL1013,D,FBALL1014,D,FBALL1015,D,FBALL1016,D
|
|
;; LWLWLWLW FBALL1017,D,FBALL1018,D,FBALL1019,D,FBALL1020,D
|
|
;; LWLWLWLW FBALL1021,D,FBALL1022,D,FBALL1023,D,FBALL1024,D
|
|
;; LWLWLWLW FBALL1025,D,FBALL1026,D,FBALL1027,D,FBALL1028,D
|
|
;; LWLW FBALL1029,D,FBALL1030,D
|
|
;; .long 0
|
|
|
|
|
|
#ania_t
|
|
.long #ba1_l
|
|
|
|
.long #ba1_l,#ba1_l,#ba1_l,#ba2_l,#ba2_l,#ba3_l
|
|
.long #ba3_l,#ba4_l,#ba5_l,#ba6_l,#ba7_l
|
|
|
|
.long #ba8_l,#ba8_l,#ba8_l,#ba8_l,#ba8_l,#ba8_l
|
|
|
|
; .long #ba1_l
|
|
;
|
|
; .long #ba2_l,#ba2_l,#ba3_l,#ba3_l,#ba4_l,#ba4_l
|
|
; .long #ba5_l,#ba6_l,#ba7_l,#ba8_l,#ba9_l
|
|
;
|
|
; .long #ba10_l,#ba10_l,#ba10_l,#ba10_l,#ba10_l,#ba10_l
|
|
|
|
.asg 2,D
|
|
|
|
#ba1_l
|
|
LWLWLWLW ABALL101,D,ABALL102,D,ABALL103,D,ABALL104,D
|
|
LWLWLWLW ABALL105,D,ABALL106,D,ABALL107,D,ABALL108,D
|
|
LWLWLWLW ABALL109,D,ABALL110,D,ABALL111,D,ABALL112,D
|
|
LWLWLWLW ABALL113,D,ABALL114,D,ABALL115,D,ABALL116,D
|
|
LWLWLWLW ABALL117,D,ABALL118,D,ABALL119,D,ABALL120,D
|
|
LWLWLWLW ABALL121,D,ABALL122,D,ABALL123,D,ABALL124,D
|
|
LWLWLWLW ABALL125,D,ABALL126,D,ABALL127,D,ABALL128,D
|
|
LWLW ABALL129,D,ABALL130,D
|
|
.long 0
|
|
|
|
#ba2_l
|
|
LWLWLWLW ABALL201,D,ABALL202,D,ABALL203,D,ABALL204,D
|
|
LWLWLWLW ABALL205,D,ABALL206,D,ABALL207,D,ABALL208,D
|
|
LWLWLWLW ABALL209,D,ABALL210,D,ABALL211,D,ABALL212,D
|
|
LWLWLWLW ABALL213,D,ABALL214,D,ABALL215,D,ABALL216,D
|
|
LWLWLWLW ABALL217,D,ABALL218,D,ABALL219,D,ABALL220,D
|
|
LWLWLWLW ABALL221,D,ABALL222,D,ABALL223,D,ABALL224,D
|
|
LWLWLWLW ABALL225,D,ABALL226,D,ABALL227,D,ABALL228,D
|
|
LWLW ABALL229,D,ABALL230,D
|
|
.long 0
|
|
|
|
#ba3_l
|
|
LWLWLWLW ABALL301,D,ABALL302,D,ABALL303,D,ABALL304,D
|
|
LWLWLWLW ABALL305,D,ABALL306,D,ABALL307,D,ABALL308,D
|
|
LWLWLWLW ABALL309,D,ABALL310,D,ABALL311,D,ABALL312,D
|
|
LWLWLWLW ABALL313,D,ABALL314,D,ABALL315,D,ABALL316,D
|
|
LWLWLWLW ABALL317,D,ABALL318,D,ABALL319,D,ABALL320,D
|
|
LWLWLWLW ABALL321,D,ABALL322,D,ABALL323,D,ABALL324,D
|
|
LWLWLWLW ABALL325,D,ABALL326,D,ABALL327,D,ABALL328,D
|
|
LWLW ABALL329,D,ABALL330,D
|
|
.long 0
|
|
|
|
#ba4_l
|
|
LWLWLWLW ABALL401,D,ABALL402,D,ABALL403,D,ABALL404,D
|
|
LWLWLWLW ABALL405,D,ABALL406,D,ABALL407,D,ABALL408,D
|
|
LWLWLWLW ABALL409,D,ABALL410,D,ABALL411,D,ABALL412,D
|
|
LWLWLWLW ABALL413,D,ABALL414,D,ABALL415,D,ABALL416,D
|
|
LWLWLWLW ABALL417,D,ABALL418,D,ABALL419,D,ABALL420,D
|
|
LWLWLWLW ABALL421,D,ABALL422,D,ABALL423,D,ABALL424,D
|
|
LWLWLWLW ABALL425,D,ABALL426,D,ABALL427,D,ABALL428,D
|
|
LWLW ABALL429,D,ABALL430,D
|
|
.long 0
|
|
|
|
#ba5_l
|
|
LWLWLWLW ABALL501,D,ABALL502,D,ABALL503,D,ABALL504,D
|
|
LWLWLWLW ABALL505,D,ABALL506,D,ABALL507,D,ABALL508,D
|
|
LWLWLWLW ABALL509,D,ABALL510,D,ABALL511,D,ABALL512,D
|
|
LWLWLWLW ABALL513,D,ABALL514,D,ABALL515,D,ABALL516,D
|
|
LWLWLWLW ABALL517,D,ABALL518,D,ABALL519,D,ABALL520,D
|
|
LWLWLWLW ABALL521,D,ABALL522,D,ABALL523,D,ABALL524,D
|
|
LWLWLWLW ABALL525,D,ABALL526,D,ABALL527,D,ABALL528,D
|
|
LWLW ABALL529,D,ABALL530,D
|
|
.long 0
|
|
|
|
#ba6_l
|
|
LWLWLWLW ABALL601,D,ABALL602,D,ABALL603,D,ABALL604,D
|
|
LWLWLWLW ABALL605,D,ABALL606,D,ABALL607,D,ABALL608,D
|
|
LWLWLWLW ABALL609,D,ABALL610,D,ABALL611,D,ABALL612,D
|
|
LWLWLWLW ABALL613,D,ABALL614,D,ABALL615,D,ABALL616,D
|
|
LWLWLWLW ABALL617,D,ABALL618,D,ABALL619,D,ABALL620,D
|
|
LWLWLWLW ABALL621,D,ABALL622,D,ABALL623,D,ABALL624,D
|
|
LWLWLWLW ABALL625,D,ABALL626,D,ABALL627,D,ABALL628,D
|
|
LWLW ABALL629,D,ABALL630,D
|
|
.long 0
|
|
|
|
#ba7_l
|
|
LWLWLWLW ABALL701,D,ABALL702,D,ABALL703,D,ABALL704,D
|
|
LWLWLWLW ABALL705,D,ABALL706,D,ABALL707,D,ABALL708,D
|
|
LWLWLWLW ABALL709,D,ABALL710,D,ABALL711,D,ABALL712,D
|
|
LWLWLWLW ABALL713,D,ABALL714,D,ABALL715,D,ABALL716,D
|
|
LWLWLWLW ABALL717,D,ABALL718,D,ABALL719,D,ABALL720,D
|
|
LWLWLWLW ABALL721,D,ABALL722,D,ABALL723,D,ABALL724,D
|
|
LWLWLWLW ABALL725,D,ABALL726,D,ABALL727,D,ABALL728,D
|
|
LWLW ABALL729,D,ABALL730,D
|
|
.long 0
|
|
|
|
#ba8_l
|
|
LWLWLWLW ABALL801,D,ABALL802,D,ABALL803,D,ABALL804,D
|
|
LWLWLWLW ABALL805,D,ABALL806,D,ABALL807,D,ABALL808,D
|
|
LWLWLWLW ABALL809,D,ABALL810,D,ABALL811,D,ABALL812,D
|
|
LWLWLWLW ABALL813,D,ABALL814,D,ABALL815,D,ABALL816,D
|
|
LWLWLWLW ABALL817,D,ABALL818,D,ABALL819,D,ABALL820,D
|
|
LWLWLWLW ABALL821,D,ABALL822,D,ABALL823,D,ABALL824,D
|
|
LWLWLWLW ABALL825,D,ABALL826,D,ABALL827,D,ABALL828,D
|
|
LWLW ABALL829,D,ABALL830,D
|
|
.long 0
|
|
|
|
;;#ba9_l
|
|
;; LWLWLWLW ABALL901,D,ABALL902,D,ABALL903,D,ABALL904,D
|
|
;; LWLWLWLW ABALL905,D,ABALL906,D,ABALL907,D,ABALL908,D
|
|
;; LWLWLWLW ABALL909,D,ABALL910,D,ABALL911,D,ABALL912,D
|
|
;; LWLWLWLW ABALL913,D,ABALL914,D,ABALL915,D,ABALL916,D
|
|
;; LWLWLWLW ABALL917,D,ABALL918,D,ABALL919,D,ABALL920,D
|
|
;; LWLWLWLW ABALL921,D,ABALL922,D,ABALL923,D,ABALL924,D
|
|
;; LWLWLWLW ABALL925,D,ABALL926,D,ABALL927,D,ABALL928,D
|
|
;; LWLW ABALL929,D,ABALL930,D
|
|
;; .long 0
|
|
;;
|
|
;;#ba10_l
|
|
;; LWLWLWLW ABALL1001,D,ABALL1002,D,ABALL1003,D,ABALL1004,D
|
|
;; LWLWLWLW ABALL1005,D,ABALL1006,D,ABALL1007,D,ABALL1008,D
|
|
;; LWLWLWLW ABALL1009,D,ABALL1010,D,ABALL1011,D,ABALL1012,D
|
|
;; LWLWLWLW ABALL1013,D,ABALL1014,D,ABALL1015,D,ABALL1016,D
|
|
;; LWLWLWLW ABALL1017,D,ABALL1018,D,ABALL1019,D,ABALL1020,D
|
|
;; LWLWLWLW ABALL1021,D,ABALL1022,D,ABALL1023,D,ABALL1024,D
|
|
;; LWLWLWLW ABALL1025,D,ABALL1026,D,ABALL1027,D,ABALL1028,D
|
|
;; LWLW ABALL1029,D,ABALL1030,D
|
|
;; .long 0
|
|
|
|
|
|
#shad_t
|
|
.long ballshad7
|
|
|
|
.long ballshad7,ballshad7,ballshad7,ballshad6,ballshad6,ballshad5
|
|
.long ballshad5,ballshad4,ballshad4,ballshad3,ballshad2
|
|
|
|
.long ballshad2,ballshad2,ballshad2,ballshad2,ballshad2,ballshad2
|
|
|
|
; .long ballshad9
|
|
;
|
|
; .long ballshad8,ballshad8,ballshad7,ballshad7,ballshad7,ballshad7
|
|
; .long ballshad6,ballshad5,ballshad4,ballshad4,ballshad2
|
|
;
|
|
; .long ballshad2,ballshad2,ballshad2,ballshad2,ballshad2,ballshad2
|
|
|
|
|
|
#*******************************
|
|
* Show halftime intro and clips (JSRP)
|
|
|
|
|
|
CLIPTEST .equ 0
|
|
|
|
SUBR halftime_showclips
|
|
|
|
movi 4*60,a10
|
|
|
|
#stop SLEEPK 1
|
|
subk 1,a10
|
|
jrle #tvout
|
|
move @tvpanelon,a0,L
|
|
jrnz #stop
|
|
#tvout
|
|
|
|
RETP
|
|
|
|
|
|
**************************************************************
|
|
*
|
|
**************************************************************
|
|
SUBR seq_handle_fadeaside
|
|
|
|
move *a13(plyr_seq),a0
|
|
cmpi SHOOT_SEQ,a0
|
|
jrne #nofdsd
|
|
move *a13(plyr_num),a14
|
|
move @PSTATUS,a0
|
|
btst a14,a0
|
|
jrz #nofdsd ;br=a drone!
|
|
move *a13(plyr_num),a0
|
|
.ref get_stick_val_cur
|
|
calla get_stick_val_cur ;ret. a0=joy switch value
|
|
|
|
move *a13(plyr_num),a14
|
|
srl 1,a14
|
|
jrnz #fdtm2 ;br=team 1
|
|
|
|
cmpi JOY_LEFT,a0
|
|
jrne #nofdsd ;br=dont do fade-aside
|
|
movi -2500h*6,a1 ;x velocity
|
|
jruc #fdtm1
|
|
#fdtm2
|
|
cmpi JOY_RIGHT,a0
|
|
jrne #nofdsd
|
|
movi 2500h*6,a1 ;x velocity
|
|
addk 32,b4 ;skip over fade-away seq. ptr
|
|
#fdtm1
|
|
move *b4,b4,L ;set new seq.
|
|
move a1,*a8(OXVEL),L
|
|
rets
|
|
|
|
#nofdsd
|
|
addi 32*2,b4
|
|
rets
|
|
|
|
|
|
**************************************************************
|
|
*
|
|
**************************************************************
|
|
SUBR seq_handle_fade_away
|
|
|
|
move *a13(plyr_seq),a0
|
|
cmpi SHOOT_SEQ,a0
|
|
jrne #nofadwy
|
|
|
|
move *a13(plyr_ohpdist),a14
|
|
cmpi 25,a14 ;too close to hoop ?
|
|
jrlt #nofadwy ;br=yes
|
|
|
|
move *a13(plyr_num),a14
|
|
move @PSTATUS,a0
|
|
btst a14,a0
|
|
jrnz #humn ;br=not a drone!
|
|
move *a13(plyr_ohpdist),a14
|
|
cmpi >ff,a14 ;too far from hoop ?
|
|
jrgt #nofadwy ;br=yes
|
|
|
|
move *a13(PA8),a2,L
|
|
move *a2(OXANI+16),a1
|
|
move *a2(OXPOS),a2 ;my X pos.
|
|
add a1,a2
|
|
|
|
movk 2,a14 ;team 2
|
|
move *a13(plyr_num),a5
|
|
srl 1,a5 ;get opponents proc.
|
|
jrz #drnf2 ;br=team 1
|
|
clr a14
|
|
#drnf2
|
|
sll 5,a14
|
|
addi plyrobj_t,a14
|
|
move *a14+,a5,L ;get opponent #1's X
|
|
move *a5(OXANI+16),a1
|
|
move *a5(OXPOS),a5
|
|
add a1,a5
|
|
|
|
move *a14,a3,L ;get opponent #2's X
|
|
move *a3(OXANI+16),a1
|
|
move *a3(OXPOS),a3
|
|
add a1,a3
|
|
|
|
move *a13(plyr_seqdir),a14
|
|
move a14,a0
|
|
|
|
move *a13(plyr_o1dist),a1
|
|
cmpi 70,a1
|
|
jrgt #ckop2 ;br=opponent #1 to far
|
|
move *a13(plyr_anirevff),a1
|
|
jrnz #lhp ;br=team 2
|
|
cmp a5,a2 ;is opponent #1 behind me ?
|
|
jrgt #fdin ;br=yes
|
|
jruc #drnfd2
|
|
#lhp
|
|
cmp a2,a5 ;is opponent #1 behind me ?
|
|
jrgt #fdin ;br=yes
|
|
jruc #drnfd2
|
|
|
|
#ckop2
|
|
move *a13(plyr_o2dist),a1
|
|
cmpi 70,a1
|
|
jrgt #nofadwy ;br=opponent #2 to far
|
|
move *a13(plyr_anirevff),a1
|
|
jrnz #lhp2 ;br=team 2
|
|
cmp a3,a2 ;is opponent #2 behind me ?
|
|
jrgt #fdin ;br=yes
|
|
jruc #drnfd2
|
|
#lhp2
|
|
cmp a2,a3 ;is opponent #2 behind me ?
|
|
jrlt #drnfd2 ;br=no
|
|
|
|
#fdin
|
|
xori 4,a0 ;change to opp. dir (FADE IN)
|
|
jruc #drnfd2
|
|
#humn
|
|
move *a13(plyr_seqdir),a14
|
|
|
|
move *a13(plyr_num),a0
|
|
calla get_stick_val_cur ;ret. a0=joy switch value
|
|
|
|
sll 32-4,a0
|
|
srl 32-4-4,a0
|
|
addi joy_dir_tbl,a0
|
|
move *a0,a0
|
|
jrn #nofadwy ;br=joy. not in correct dir.
|
|
|
|
;This is a lean in or fade away, reduce % only if a 3 pt shot
|
|
movk 1,a4
|
|
.ref reduce_3ptr
|
|
move a4,@reduce_3ptr
|
|
|
|
#drnfd2
|
|
move a0,a2
|
|
sll 6,a0
|
|
addi vels_tbl,a0
|
|
move *a0+,a1,L ;get X vel
|
|
move *a0,a0,L ;get Z vel
|
|
|
|
cmp a2,a14
|
|
jreq #fdawy
|
|
xori 4,a2 ;change to opposite dir
|
|
cmp a2,a14
|
|
jrne #nofadwy
|
|
|
|
move *a13(plyr_ohpdist),a14
|
|
cmpi 60,a14 ;too close for fade-in ?
|
|
jrlt #nofadwy ;br=yes
|
|
addk 32,b4 ;do FADE-IN seq
|
|
#fdawy
|
|
move *b4,b4,L
|
|
move a1,*a8(OXVEL),L
|
|
;#nox
|
|
move a0,*a8(OZVEL),L
|
|
rets
|
|
#nofadwy
|
|
addi 32*2,b4
|
|
rets
|
|
|
|
|
|
joy_dir_tbl
|
|
.word -1,-1,-1,-1,2,3,1,-1,6,5,7,-1,-1,-1,-1,-1,-1,-1
|
|
|
|
vels_tbl
|
|
.long 0 , 0 ;direction 1
|
|
.long -21efh*7, 21efh*7 ;^ 2 (3000h * .707)
|
|
.long -3000h*6, 0 ;^ 3
|
|
.long -21efh*7,-21efh*7 ;^ 4
|
|
.long 0 , 0 ;^ 5
|
|
.long 21efh*7,-21efh*7 ;^ 6
|
|
.long 3000h*6, 0 ;^ 7
|
|
.long 21efh*7, 21efh*7 ;^ 8
|
|
|
|
|
|
#*******************************
|
|
* Dispatch salt explosions from rim at on fire time
|
|
* A8=*Ball object
|
|
|
|
SUBR rim_salt
|
|
|
|
movk 8,a9
|
|
#lp CREATE0 #do_salt
|
|
SLEEPK 2
|
|
dsj a9,#lp
|
|
DIE
|
|
|
|
#do_salt
|
|
movi #salt_t,a9
|
|
movi DMAWNZ|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
|
|
movi 10000h,a0
|
|
calla RNDRNG0
|
|
move a0,a6
|
|
movi 60000h,a0
|
|
calla RNDRNG0
|
|
addi 10000h,a0
|
|
move a0,a7
|
|
btst 0,a7
|
|
jrz #1
|
|
movi #salt2_t,a9
|
|
#1
|
|
move *a8(OZPOS),a3
|
|
addk 1h,a3
|
|
move *a8(OYVAL),a1,L
|
|
move *a8(OXVAL),a0,L
|
|
addi [10,0],a0
|
|
|
|
move *a8(OXPOS),a14
|
|
cmpi WRLDMID,a14
|
|
jrlt #lft
|
|
addi [6,0],a0
|
|
movi DMAWNZ|M_FLIPH|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
#lft
|
|
movi SALTA01,a2
|
|
movi CLSDEAD,a5
|
|
calla BEGINOBJ2
|
|
|
|
SLEEPK 1
|
|
jauc FRQDELDIE
|
|
|
|
|
|
#salt_t
|
|
.ref SALTTR_P
|
|
LW SALTA01,1
|
|
LW SALTA02,2
|
|
LW SALTA03,2
|
|
LW SALTA04,2
|
|
LW SALTA05,2
|
|
LW SALTA06,2
|
|
LW SALTA07,2
|
|
LW SALTA08,3
|
|
LW SALTA09,3
|
|
LWL0 SALTA10,3
|
|
|
|
#salt2_t
|
|
LW SALTB01,2
|
|
LW SALTB02,2
|
|
LW SALTB03,2
|
|
LW SALTB04,2
|
|
LW SALTB05,2
|
|
LW SALTB06,2
|
|
LW SALTB07,2
|
|
LW SALTB08,3
|
|
LW SALTB09,3
|
|
LW SALTB10,3
|
|
LWL0 SALTB11,3
|
|
|
|
|
|
;DJT Start
|
|
#*******************************
|
|
* Shot hotspots powerup
|
|
|
|
.ref ballpnum,pup_showhotspots,amodeloop
|
|
|
|
SUBR plyr_showhotspots
|
|
|
|
SLEEPK 8 ;Wait for things to init
|
|
|
|
movi pup_showhotspots,a11,L ;Ptr for checking the pup
|
|
|
|
;;; move @GAMSTATE,a14
|
|
;;; subk INAMODE,a14
|
|
;;; jrnz #nam
|
|
;;; jrz amode_showhotspots ;!!!
|
|
;;; move @amodeloop,a14
|
|
;;; andi 3,a14
|
|
;;; subk 3,a14
|
|
;;; jrz amode_showhotspots
|
|
;;;#nam
|
|
|
|
.if HOTSPOT
|
|
move @plyrproc_t,a10,L
|
|
.ref hotspot_xz_t
|
|
movi hotspot_xz_t,a9,L
|
|
#s1
|
|
move *a9(0),*a10(plyr_hotspotx) ;hotspot X
|
|
move *a9(16),*a10(plyr_hotspotz) ;hotspot Z
|
|
CREATE0 show_hotspot_proc_coor
|
|
SLEEPK 1
|
|
addk 32,a9
|
|
.ref hotspot_xz_tend
|
|
cmpi hotspot_xz_tend,a9,L
|
|
jrnz #s1
|
|
#s99
|
|
.endif
|
|
.if DEBUG
|
|
movk >f,a14
|
|
move a14,*a11
|
|
.endif
|
|
move *a11,a14 ;Any players have it enabled?
|
|
jaz SUCIDE ; br=no
|
|
|
|
#lpclr
|
|
movi -1,a8 ;Plyr# thats showing hotspot
|
|
#lp
|
|
SLEEPK 4
|
|
move @game_time,a14,L ;Die for sure at end of 1st qrtr
|
|
jrz #kill_showhotspot
|
|
|
|
move @ballpnum,a6 ;Anyone have the ball?
|
|
jrnn #chkplyr ; br=yes
|
|
move a8,a8 ;Need to kill a show?
|
|
jrn #lp ; br=no show going
|
|
#kill
|
|
movk 1,a14 ;Kill show next time through
|
|
move a14,*a9(PA11)
|
|
jruc #lpclr
|
|
|
|
#chkplyr
|
|
cmp a6,a8 ;Is a show going?
|
|
jrne #noshow ; br=not for this guy anyway
|
|
move *a11,a14 ;Is plyr pup still active?
|
|
jrz #kill_showhotspot ; br=no plyrs are!
|
|
btst a6,a14
|
|
jrz #kill ; br=this plyr isn't
|
|
movk 2,a14 ;Keep plyr hotspot active
|
|
move a14,*a9(PA11)
|
|
jruc #lp
|
|
|
|
#noshow
|
|
move a8,a8 ;Need to kill a show?
|
|
jrn #newplyr ; br=no show going
|
|
movk 1,a14 ;Kill show next time through
|
|
move a14,*a9(PA11)
|
|
#newplyr
|
|
move *a11,a14 ;Is plyr pup active?
|
|
jrz #kill_showhotspot ; br=no plyrs are!
|
|
btst a6,a14
|
|
jrz #lpclr ; br=this plyr isn't
|
|
|
|
move a6,a8 ;Set up a new show
|
|
sll 5,a6
|
|
addi plyrproc_t,a6,L
|
|
move *a6,a10,L ;Get plyr *proc
|
|
.if DEBUG
|
|
.ref CLOCK_OFF
|
|
move @CLOCK_OFF,a14
|
|
jrz #t99
|
|
move *a10(plyr_hotspot_p),a14,L
|
|
move a14,a9
|
|
jrnz #lp
|
|
#t99
|
|
.endif
|
|
CREATE0 show_hotspot_proc_coor
|
|
move a0,a9
|
|
jruc #lp
|
|
|
|
#kill_showhotspot
|
|
|
|
DIE
|
|
|
|
;;;#*
|
|
;;; .asg CLSDEAD|555,CLSHSM
|
|
;;;
|
|
;;; SUBRP amode_showhotspots
|
|
;;;
|
|
;;; move *a11,a14 ;Any players have it enabled?
|
|
;;; jaz SUCIDE ; br=no
|
|
;;;
|
|
;;; movi #hsmes,a9,L
|
|
;;; clr a10
|
|
;;; clr a3
|
|
;;; movi >8000|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
;;; movi CLSHSM,a5
|
|
;;; clr a0
|
|
;;; clr a6
|
|
;;; clr a7
|
|
;;;#mkhsm
|
|
;;; move *a9+,a2,L
|
|
;;; jrz #lpclr
|
|
;;; clr a1
|
|
;;; PUSH a0
|
|
;;; calla BEGINOBJ2
|
|
;;; PULL a0
|
|
;;; move *a8(OSIZEX),a14
|
|
;;; sll 16,a14
|
|
;;; add a14,a0
|
|
;;; movi 50,a14 ;stupid K!!!
|
|
;;; move a14,*a8(OMISC) ;save Z offset
|
|
;;; move a10,*a8(ODATA_p),L ;Link the obj list
|
|
;;; move a8,a10
|
|
;;; jruc #mkhsm
|
|
;;;
|
|
;;;#lpclr
|
|
;;; movi -1,a8 ;Plyr# thats showing hotspot
|
|
;;;#lp
|
|
;;; SLEEPK 4
|
|
;;; move @game_time,a14,L ;Die for sure at end of 1st qrtr
|
|
;;; jrz #kill_showhotspot
|
|
;;;
|
|
;;; move @ballpnum,a6 ;Anyone have the ball?
|
|
;;; jrnn #chkplyr ; br=yes
|
|
;;; move a8,a8 ;Need to kill a show?
|
|
;;; jrn #lp ; br=no show going
|
|
;;;#kill
|
|
;;; movk 1,a14 ;Kill show next time through
|
|
;;; move a14,*a9(PA11)
|
|
;;;#kill1
|
|
;;; move a10,a0
|
|
;;;#khsm
|
|
;;; move *a0(OCTRL),a14 ;Turn off hotspot msg
|
|
;;; andni 3,a14
|
|
;;; move a14,*a0(OCTRL)
|
|
;;; move *a0(ODATA_p),a0,L
|
|
;;; jrnz #khsm
|
|
;;; jruc #lpclr
|
|
;;;
|
|
;;;#chkplyr
|
|
;;; move a8,a14 ;Is a hotspot showing?
|
|
;;; jrn #nohsm ; br=no
|
|
;;; sll 5,a14
|
|
;;; addi plyrproc_t,a14,L ;Get plyr hotspot *obj
|
|
;;; move *a14,a14,L
|
|
;;; move *a14(plyr_hotspot_p),a14,L
|
|
;;; jrz #nohsm
|
|
;;; move *a14(PA8),a14,L
|
|
;;;
|
|
;;; move *a14(OXVAL),a0,L ;Get hotspot coords
|
|
;;; move *a14(OYVAL),a1,L
|
|
;;; move *a14(OZVAL),a2,L
|
|
;;; subk 10,a1
|
|
;;; move a10,a3
|
|
;;; move *a3(OXVAL),a5,L
|
|
;;;#mhsm
|
|
;;; move *a3(OXVAL),a4,L
|
|
;;; sub a5,a0
|
|
;;; add a4,a0
|
|
;;; move a4,a5
|
|
;;; move a0,*a3(OXVAL),L ;Move hotspot msg
|
|
;;; move a1,*a3(OYVAL),L
|
|
;;; move a2,*a3(OZVAL),L
|
|
;;; move *a3(ODATA_p),a3,L
|
|
;;; jrnz #mhsm
|
|
;;;#nohsm
|
|
;;; cmp a6,a8 ;Is a show going?
|
|
;;; jrne #noshow ; br=not for this guy anyway
|
|
;;; move *a11,a14 ;Is plyr pup still active?
|
|
;;; jrz #kill_showhotspot ; br=no plyrs are!
|
|
;;; btst a6,a14
|
|
;;; jrz #kill ; br=this plyr isn't
|
|
;;; movk 2,a14 ;Keep plyr hotspot active
|
|
;;; move a14,*a9(PA11)
|
|
;;; jruc #lp
|
|
;;;
|
|
;;;#noshow
|
|
;;; move a8,a8 ;Need to kill a show?
|
|
;;; jrn #newplyr ; br=no show going
|
|
;;; movk 1,a14 ;Kill show next time through
|
|
;;; move a14,*a9(PA11)
|
|
;;;#newplyr
|
|
;;; move *a11,a14 ;Is plyr pup active?
|
|
;;; jrz #kill_showhotspot ; br=no plyrs are!
|
|
;;; btst a6,a14
|
|
;;; jrz #kill1 ;lpclr ; br=this plyr isn't
|
|
;;;
|
|
;;; move a6,a8 ;Set up a new show
|
|
;;; sll 5,a6
|
|
;;; addi plyrproc_t,a6,L
|
|
;;; move a10,a5
|
|
;;; move *a6,a10,L ;Get plyr *proc
|
|
;;; CREATE0 show_hotspot_proc_coor
|
|
;;; move a0,a9
|
|
;;; move a5,a10
|
|
;;;#ahsm
|
|
;;; move *a5(OCTRL),a14 ;Turn on hotspot msg
|
|
;;; ori 2,a14
|
|
;;; move a14,*a5(OCTRL)
|
|
;;; move *a5(ODATA_p),a5,L
|
|
;;; jrnz #ahsm
|
|
;;; jruc #lp
|
|
;;;
|
|
;;;#kill_showhotspot
|
|
;;; movi CLSHSM,a0
|
|
;;; calla obj_del1c
|
|
;;;
|
|
;;; DIE
|
|
;;;
|
|
;;; .ref B8TCYC_H,B8TCYC_O,B8TCYC_P,B8TCYC_S,B8TCYC_T
|
|
;;;#hsmes
|
|
;;; .long B8TCYC_H
|
|
;;; .long B8TCYC_O
|
|
;;; .long B8TCYC_T
|
|
;;; .long B8TCYC_S
|
|
;;; .long B8TCYC_P
|
|
;;; .long B8TCYC_O
|
|
;;; .long B8TCYC_T
|
|
;;; .long 0
|
|
|
|
|
|
#*******************************
|
|
* Hotspot disc under feet
|
|
* A10=*Plyr process
|
|
|
|
SUBR show_hotspot_proc_coor
|
|
|
|
move *a10(plyr_hotspotx),a0 ;hotspot X
|
|
move *a10(plyr_hotspotz),a3 ;hotspot Z
|
|
jruc #dospot
|
|
|
|
SUBR show_hotspot_plyr_coor
|
|
|
|
move *a10(plyr_num),a8 ;Get plyr *obj
|
|
sll 5,a8
|
|
addi plyrobj_t,a8,L
|
|
move *a8,a8,L
|
|
|
|
move *a8(OZPOS),a3 ;hotspot Z
|
|
|
|
move *a10(plyr_shadobj_p),a8,L
|
|
|
|
move *a8(OXPOS),a0 ;hotspot X
|
|
move *a8(OXANI+16),a2
|
|
add a2,a0
|
|
|
|
#dospot
|
|
sll 16,a0
|
|
subi 50,a3
|
|
|
|
clr a1 ;hotspot Y
|
|
|
|
move *a10(plyr_num),a11
|
|
sll 5,a11
|
|
addi #hotspot_t,a11,L
|
|
.ref TWOPLAYERS
|
|
move @TWOPLAYERS,a14 ;0 = NO, 1 = YES 2 players
|
|
jrz #nkit
|
|
addi #2p_t-#hotspot_t,a11
|
|
#nkit
|
|
move *a11,a11,L ;Get hotspot pal ptr
|
|
movi #hotspot_ani,a9,L ;Starting *ani
|
|
|
|
move a11,b0
|
|
move *a9+,a2,L
|
|
movi DMAWNZ|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
movi CLSDEAD,a5
|
|
clr a6
|
|
clr a7
|
|
calla BEGINOBJP2
|
|
movi 50,a0 ;stupid K!!!
|
|
move a0,*a8(OMISC) ;save Z offset
|
|
|
|
move a13,*a10(plyr_hotspot_p),L ;give plyr proc access
|
|
|
|
movk 3,a11 ;!!! timeout counter
|
|
#lp
|
|
SLEEPK 1
|
|
|
|
move @game_time,a14,L
|
|
jrz kill_hotspot
|
|
move *a9+,a0,L
|
|
jrnz #lp1
|
|
movi #hotspot_ani,a9,L ;Starting *ani
|
|
move *a9+,a0,L
|
|
move @HALT,A14
|
|
jrnz #lp1
|
|
.if DEBUG
|
|
move @CLOCK_OFF,a14
|
|
jrnz #lp1
|
|
.endif
|
|
subk 1,a11
|
|
jrz kill_hotspot
|
|
#lp1
|
|
move *a0(IANIOFFX),*a8(OXANI+16)
|
|
move *a8(OCTRL),a1
|
|
calla obj_aniq_cnoff
|
|
jruc #lp
|
|
|
|
kill_hotspot
|
|
clr a14
|
|
move a14,*a10(plyr_hotspot_p),L ;kill plyr proc access
|
|
jauc DELOBJDIE
|
|
|
|
;--------------------
|
|
* A13=*Plyr process
|
|
*Trashes A0,A14
|
|
|
|
SUBR update_hotspot_plyr_coor
|
|
|
|
move *a13(plyr_hotspot_p),a0,L ;get plyr hotspot *proc
|
|
|
|
movk 3,a14 ;!!! Reset timeout counter
|
|
move a14,*a0(PA11),L
|
|
|
|
rets
|
|
|
|
|
|
.ref HOTC_B_P,HOTC_G_P,HOTC_B_P,HOTC_G_P
|
|
#hotspot_t
|
|
.long HOTC_B_P,HOTC_G_P
|
|
.long HOTC_Y_P,HOTC_R_P
|
|
#2p_t
|
|
.long HOTC_B_P,HOTC_B_P
|
|
.long HOTC_R_P,HOTC_R_P
|
|
|
|
#hotspot_ani
|
|
.long HOTCRC01
|
|
.long HOTCRC02
|
|
.long HOTCRC03
|
|
.long HOTCRC04
|
|
.long HOTCRC05
|
|
.long HOTCRC06
|
|
.long HOTCRC07
|
|
.long HOTCRC08
|
|
.long HOTCRC09
|
|
.long HOTCRC10
|
|
.long HOTCRC11
|
|
.long HOTCRC12
|
|
.long HOTCRC13
|
|
.long HOTCRC12
|
|
.long HOTCRC11
|
|
.long HOTCRC10
|
|
.long HOTCRC09
|
|
.long HOTCRC08
|
|
.long HOTCRC07
|
|
.long HOTCRC06
|
|
.long HOTCRC05
|
|
.long HOTCRC04
|
|
.long HOTCRC03
|
|
.long HOTCRC02
|
|
.long 0
|
|
|
|
;; move *a10(plyr_shadobj_p),a8,L
|
|
;;
|
|
;; move *a8(OXANI+16),a1 ;X
|
|
;; move *a8(OXPOS),a0
|
|
;; add a1,a0
|
|
;; addi 14,a0
|
|
;; sll 16,a0
|
|
;;
|
|
;; clr a1 ;Y
|
|
;;
|
|
;; move *a8(OZPOS),a3 ;Z
|
|
;; addi 22h,a3
|
|
;;
|
|
;; move *a10(plyr_num),a9
|
|
;; sll 6,a9
|
|
;; addi #hotspot_disc_t,a9,L
|
|
;; .ref TWOPLAYERS
|
|
;; move @TWOPLAYERS,a14 ;0 = NO, 1 = YES 2 players
|
|
;; jrz #nkit
|
|
;; addi 2p_hd_t-hotspot_disc_t,a9
|
|
;;#nkit
|
|
;; move *a9+,a2,L ;Get hotspot img ptr
|
|
;; move *a9,a9,L ;Get cycle RAM ptr
|
|
;; move *a2(ICMAP),a11,L ;Get img *pal
|
|
;;
|
|
;; movi DMAWNZ|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
;; movi CLSDEAD,a5
|
|
;; clr a6
|
|
;; clr a7
|
|
;; calla BEGINOBJ2
|
|
;; move a8,*a13(PDATA),L ;Save *obj
|
|
;;
|
|
;; move a11,a8 ;Get obj *pal
|
|
;; movi [1,15],a10 ;1st,last color
|
|
;; movk 2,a11 ;Rate
|
|
;; CREATE CYCPID,COLCYC
|
|
;; move a0,a11 ;Save *proc
|
|
;;
|
|
;; movi 50,a0 ;!!! Stupid K
|
|
;;#lp
|
|
;; calla PRCSLP
|
|
;; movk 1,a0
|
|
;; .ref game_time
|
|
;; move @game_time,a14,L
|
|
;; jrz kill_hotspot
|
|
;; move @HALT,A14
|
|
;; jrnz #lp
|
|
;;
|
|
;;kill_hotspot
|
|
;; move a11,a0 ;Get *proc & kill it
|
|
;; calla KILL
|
|
;;
|
|
;; move *a13(PDATA),a8,L ;Get *obj & kill it
|
|
;; jauc DELOBJDIE
|
|
;;
|
|
;;
|
|
;; .bss spotcycram1,15*2*16 ;Palette cycle mem
|
|
;; .bss spotcycram2,15*2*16
|
|
;; .bss spotcycram3,15*2*16
|
|
;; .bss spotcycram4,15*2*16
|
|
;;
|
|
;;#hotspot_disc_t
|
|
;; .ref HOTblu,HOTgrn,HOTyel,HOTred
|
|
;; .long HOTblu,spotcycram1,HOTgrn,spotcycram2
|
|
;; .long HOTyel,spotcycram3,HOTred,spotcycram4
|
|
;;#2p_hd_t
|
|
;; .long HOTblu,spotcycram1,HOTblu,spotcycram2
|
|
;; .long HOTred,spotcycram3,HOTred,spotcycram4
|
|
|
|
;DJT End
|
|
#*******************************
|
|
* Fire circle under feet
|
|
* A8=*Src obj
|
|
* A10=*Plyr process
|
|
|
|
SUBR fire_circle
|
|
|
|
|
|
move @pup_court,a14
|
|
jrz #notd
|
|
|
|
CREATE0 #foot_smoke
|
|
CREATE0 #foot_smoke2
|
|
#notd
|
|
|
|
movi #fire_circle_t,a9
|
|
|
|
move *a10(plyr_shadobj_p),a8,L
|
|
move *a8(OXANI+16),a0
|
|
move *a8(OXPOS),a2
|
|
add a0,a2
|
|
addi 14,a2
|
|
move a2,a0
|
|
sll 16,a0
|
|
|
|
clr a1
|
|
|
|
move *a8(OZPOS),a3
|
|
addi 22h,a3
|
|
|
|
movi HOTNA_01,a2
|
|
movi DMAWNZ|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
movi CLSDEAD,a5
|
|
clr a6
|
|
clr a7
|
|
calla BEGINOBJ2
|
|
|
|
; movi scale50_t,a0
|
|
; move a0,*a8(ODATA_p),L
|
|
SLEEPK 1
|
|
jauc FRQDELDIE
|
|
|
|
|
|
#fire_circle_t
|
|
.ref HOT_P
|
|
LW HOTNA_01,1
|
|
LW HOTNA_02,2
|
|
LW HOTNA_03,2
|
|
LW HOTNA_04,2
|
|
LW HOTNA_05,2
|
|
LW HOTNA_06,2
|
|
LW HOTNA_07,2
|
|
LW HOTNA_08,3
|
|
LW HOTNA_09,3
|
|
LW HOTNA_10,3
|
|
LW HOTNA_11,3
|
|
LW HOTNA_12,4
|
|
LWL0 HOTNA_13,4
|
|
|
|
#foot_smoke
|
|
SLEEPK 2
|
|
#foot_smoke2
|
|
movi #smoke_t,a9
|
|
|
|
movi 20000h,a0
|
|
calla RNDRNG0
|
|
subi 10000h,a0
|
|
move a0,a6
|
|
movi 60000h,a0
|
|
calla RNDRNG0
|
|
neg a0
|
|
move a0,a7
|
|
|
|
move *a10(plyr_shadobj_p),a8,L
|
|
move *a8(OXANI+16),a0
|
|
move *a8(OXPOS),a2
|
|
add a0,a2
|
|
addi 8,a2
|
|
move a2,a0
|
|
sll 16,a0
|
|
|
|
clr a1
|
|
|
|
move *a8(OZPOS),a3
|
|
addi 22h,a3
|
|
|
|
movi SMOKE01,a2
|
|
movi DMAWNZ|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
movi CLSDEAD,a5
|
|
calla BEGINOBJ2
|
|
|
|
SLEEPK 1
|
|
jauc FRQDELDIE
|
|
|
|
|
|
#smoke_t
|
|
.ref SMOKE_P
|
|
LW SMOKE01,1
|
|
LW SMOKE02,2
|
|
LW SMOKE03,2
|
|
LW SMOKE04,2
|
|
LW SMOKE05,2
|
|
LW SMOKE06,2
|
|
LW SMOKE07,2
|
|
LW SMOKE08,3
|
|
LW SMOKE09,3
|
|
LWL0 SMOKE10,3
|
|
|
|
#*******************************
|
|
* Smoke trail (Process)
|
|
* A8=*Src obj
|
|
;* A10=*Plyr process
|
|
|
|
; SUBR ball_smoketrail
|
|
;
|
|
; movi 8000,a11
|
|
;#lp CREATE0 ball_smokepuff
|
|
; SLEEPK 2
|
|
; dsj a11,#lp
|
|
; DIE
|
|
|
|
|
|
;#*******************************
|
|
;* Start sparks in AMODE
|
|
;
|
|
; SUBR do_ball_spark
|
|
;
|
|
; movi 45,a11
|
|
;#lp CREATE0 ball_spark
|
|
; SLEEPK 4
|
|
; dsj a11,#lp
|
|
; DIE
|
|
|
|
|
|
#*******************************
|
|
* Smoke trail puff (Process)
|
|
* A8=*Src obj
|
|
|
|
SUBR ball_smokepuff
|
|
|
|
move a8,a11
|
|
|
|
; move @HCOUNT,a0
|
|
; sll 32-1,a0
|
|
; jrnz #nosprk
|
|
; CREATE0 ball_spark
|
|
;#nosprk
|
|
movk 3,a0
|
|
callr rnd
|
|
sll 5,a0
|
|
|
|
|
|
.ref balltmshotcnt
|
|
move @balltmshotcnt,a14
|
|
subk TMFIRE_MINCNT,a14
|
|
jrn #reg
|
|
|
|
;Use blue smoke for team on fire
|
|
addi smoke_team_t,a0
|
|
jruc #cont
|
|
#reg
|
|
|
|
addi smoke_t,a0
|
|
#cont move *a0,a9,L
|
|
|
|
move *a8(OZPOS),a3 ;puff ZPOS
|
|
movk 3,a0
|
|
callr rnd
|
|
; subk 2,a0 ;-2 to 1
|
|
add a0,a3
|
|
|
|
move *a8(OXVAL),a0,L ;puff XPOS @ ball mid X
|
|
move *a8(OSIZEX),a2
|
|
sll 16-1,a2
|
|
add a2,a0
|
|
|
|
move *a8(OYVAL),a1,L ;puff YPOS @ ball mid Y
|
|
move *a8(OSIZEY),a2
|
|
sll 16-1,a2
|
|
add a2,a1
|
|
|
|
move *a9+,a2,L ;puff IMG
|
|
|
|
move *a2(IANIOFF),a6,L ;Add ani X,Y so obj X,Y is still
|
|
clr a7 ; ball mid X,Y
|
|
movy a6,a7
|
|
sll 16,a6
|
|
add a6,a0
|
|
add a7,a1
|
|
|
|
movi DMAWNZ|M_3D|M_NOCOLL,a4
|
|
movi CLSDEAD,a5
|
|
move *a8(OXVEL),a6,L ;puff XVEL & YVEL
|
|
move *a8(OYVEL),a7,L
|
|
sra 2,a6
|
|
sra 2,a7
|
|
calla BEGINOBJ2
|
|
|
|
movi scale50_t,a0 ;puff *scale
|
|
move a0,*a8(ODATA_p),L
|
|
move *a11(OZVEL),a0,L ;puff ZVEL
|
|
sra 2,a0
|
|
move a0,*a8(OZVEL),L
|
|
|
|
calla anipt_getsclxy ;Adjust for scaled puff ani X,Y
|
|
move *a8(OXVAL),a14,L
|
|
sub a0,a14
|
|
move a14,*a8(OXVAL),L
|
|
move *a8(OYVAL),a14,L
|
|
sub a1,a14
|
|
move a14,*a8(OYVAL),L
|
|
|
|
move *a11(OXANI),a14,L ;Get ball ani X
|
|
jrz #alp ; br=skip if 0
|
|
move a14,*a8(OXANI),L ;Save it to puff & go resolve for X
|
|
move a8,a0
|
|
.ref convfmprel
|
|
calla convfmprel
|
|
jruc #alp
|
|
|
|
#lp
|
|
move *a8(OCTRL),a1
|
|
move *a0(ICTRL),a14
|
|
andi >8003,a1
|
|
or a14,a1
|
|
move a1,*a8(OCTRL)
|
|
calla obj_aniq_scld
|
|
clr a0
|
|
move a0,*a8(OXANI),L ;Clr scaled anipt
|
|
#alp
|
|
move *a9+,a0 ;Any flags with sleep cnt?
|
|
jrnn #slp ; br=no
|
|
move a0,a2
|
|
move *a9+,a0,L
|
|
calla pal_getf
|
|
move a0,*a8(OPAL)
|
|
move a2,a0
|
|
sll 32-8,a0 ;Keep 8 lsbs for sleep cnt
|
|
srl 32-8,a0
|
|
#slp
|
|
calla PRCSLP
|
|
move *a9+,a0,L
|
|
jrnz #lp
|
|
jauc DELOBJDIE
|
|
|
|
|
|
smoke_t
|
|
.long smoko_l,smokw_l,smoko_l,smokp_l
|
|
smoke_team_t
|
|
.long smokb_l,smokw_l,smokb_l,smokb_l
|
|
|
|
smoko_l
|
|
LW XPLOD_YEL,2
|
|
LWL SMOK1_01,2+>8000,SMOK_O_P
|
|
LW SMOK1_02,2
|
|
LW SMOK1_03,2
|
|
LWL SMOK1_04,2+>8000,SMOK_W_P
|
|
LW SMOK1_05,2
|
|
LW SMOK1_06,1 ;2
|
|
LW SMOK1_07,1 ;2
|
|
LW SMOK1_08,1 ;2
|
|
LW SMOK1_09,1 ;2
|
|
LW SMOK1_10,1 ;2
|
|
LW SMOK1_11,1 ;2
|
|
LWL0 SMOK1_12,1 ;2
|
|
smokw_l
|
|
LW XPLOD_BRT,2
|
|
LWL SMOK1_02,2+>8000,SMOK_W_P
|
|
LW SMOK1_03,2
|
|
LW SMOK1_04,2
|
|
LW SMOK1_05,2
|
|
LW SMOK1_06,2
|
|
LW SMOK1_07,2
|
|
LW SMOK1_08,1 ;2
|
|
LW SMOK1_09,1 ;2
|
|
LW SMOK1_10,1 ;2
|
|
LW SMOK1_11,1 ;2
|
|
LWL0 SMOK1_12,1 ;2
|
|
smokb_l
|
|
LW XPLOD_BLU,2
|
|
LWL SMOK1_01,2+>8000,SMOK_B_P
|
|
LW SMOK1_02,2
|
|
LW SMOK1_03,2
|
|
LWL SMOK1_04,2+>8000,SMOK_W_P
|
|
LW SMOK1_05,2
|
|
LW SMOK1_06,2
|
|
LW SMOK1_07,1 ;2
|
|
LW SMOK1_08,1 ;2
|
|
LW SMOK1_09,1 ;2
|
|
LW SMOK1_10,1 ;2
|
|
LW SMOK1_11,1 ;2
|
|
LWL0 SMOK1_12,1 ;2
|
|
smokp_l
|
|
LW XPLOD_BLU,2
|
|
LWL SMOK1_02,2+>8000,SMOK_P_P
|
|
LW SMOK1_03,2
|
|
LW SMOK1_04,2
|
|
LWL SMOK1_05,2+>8000,SMOK_W_P
|
|
LW SMOK1_06,2
|
|
LW SMOK1_07,2
|
|
LW SMOK1_08,1 ;2
|
|
LW SMOK1_09,1 ;2
|
|
LW SMOK1_10,1 ;2
|
|
LW SMOK1_11,1 ;2
|
|
LWL0 SMOK1_12,1 ;2
|
|
|
|
|
|
SCLT .macro sx,sy,sxa,sya
|
|
.eval :sx:*1048,X ;Convert (has slight error)
|
|
.eval :sy:*1048,Y
|
|
.eval :sxa:*1048,XA
|
|
.eval :sya:*1048,YA
|
|
.loop 10
|
|
.word >10000000/X,>10000000/Y
|
|
.word >100000/(>10000000/X),>100000/(>10000000/Y)
|
|
.eval X+XA*1/4,X
|
|
.eval Y+YA*1/4,Y
|
|
.endloop
|
|
.loop 10
|
|
.word >10000000/X,>10000000/Y
|
|
.word >100000/(>10000000/X),>100000/(>10000000/Y)
|
|
.eval X+XA*2/4,X
|
|
.eval Y+YA*2/4,Y
|
|
.endloop
|
|
.loop 10
|
|
.word >10000000/X,>10000000/Y
|
|
.word >100000/(>10000000/X),>100000/(>10000000/Y)
|
|
.eval X+XA*3/4,X
|
|
.eval Y+YA*3/4,Y
|
|
.endloop
|
|
.loop 10
|
|
.word >10000000/X,>10000000/Y
|
|
.word >100000/(>10000000/X),>100000/(>10000000/Y)
|
|
.eval X+XA,X
|
|
.eval Y+YA,Y
|
|
.endloop
|
|
.endm
|
|
|
|
;--------------------
|
|
; Generate scale tables
|
|
|
|
;scale30_t
|
|
; SCLT 300,300,19,19
|
|
|
|
;scale50_t
|
|
; SCLT 500,500,31,31
|
|
|
|
scale50_t
|
|
SCLT 330,330,18,18
|
|
|
|
|
|
********************************
|
|
* Get random # with mask
|
|
* A0=Mask
|
|
* >A0=Rnd # (Pass CC)
|
|
* Trashes scratch
|
|
|
|
SUBRP rnd
|
|
|
|
move @RAND,a1,L
|
|
rl a1,a1
|
|
move @HCOUNT,a14
|
|
rl a14,a1
|
|
add sp,a1
|
|
move a1,@RAND,L
|
|
|
|
and a1,a0
|
|
rets
|
|
|
|
#*******************************
|
|
*
|
|
* A3 - direction
|
|
* >a0 - dunk seq.
|
|
|
|
SUBR getdunkseq
|
|
|
|
|
|
move *a13(plyr_num),a0 ;If on fire, don't use turbo on run
|
|
.ref plyr_onfire
|
|
move @plyr_onfire,a1
|
|
btst a0,a1
|
|
jrnz set5 ;br=player is on fire!!
|
|
|
|
move *a13(plyr_attrib_p),a0,L
|
|
move *a0(PAT_DUNKSKILL),a0
|
|
|
|
; movk 9,a0
|
|
|
|
sll 5,a0
|
|
addi jmp_t,a0
|
|
move *a0,a0,L
|
|
jump a0
|
|
|
|
set5
|
|
addi d5u_t,a3
|
|
|
|
cmpi 40,a4
|
|
jrle #shortd ;Under hoop?
|
|
addi d5s_t-d5u_t,a3
|
|
|
|
cmpi 70,a4 ;Short range
|
|
; cmpi 60,a4 ;Short range
|
|
jrle #shortd
|
|
|
|
move *a13(plyr_turbon),a14
|
|
jrz #sj
|
|
|
|
addi d5m_t-d5s_t,a3,W
|
|
|
|
cmpi 100,a4 ;Med range
|
|
jrle #shortd
|
|
addi d5l_t-d5m_t,a3,W
|
|
jruc #shortd
|
|
;
|
|
set4
|
|
addi d4u_t,a3
|
|
|
|
cmpi 40,a4
|
|
jrle #shortd ;Under hoop?
|
|
addi d4s_t-d4u_t,a3
|
|
|
|
cmpi 70,a4 ;Short range
|
|
jrle #shortd
|
|
|
|
move *a13(plyr_turbon),a14
|
|
jrz #sj
|
|
|
|
addi d4m_t-d4s_t,a3,W
|
|
|
|
cmpi 100,a4 ;Med range
|
|
jrle #shortd
|
|
addi d4l_t-d4m_t,a3,W
|
|
jruc #shortd
|
|
|
|
;
|
|
set3
|
|
addi d3u_t,a3
|
|
|
|
cmpi 40,a4
|
|
jrle #shortd ;Under hoop?
|
|
addi d3s_t-d3u_t,a3
|
|
|
|
cmpi 70,a4 ;Short range
|
|
jrle #shortd
|
|
|
|
move *a13(plyr_turbon),a14
|
|
jrz #sj
|
|
|
|
addi d3m_t-d3s_t,a3,W
|
|
|
|
cmpi 100,a4 ;Med range
|
|
jrle #shortd
|
|
addi d3l_t-d3m_t,a3,W
|
|
jruc #shortd
|
|
|
|
;
|
|
set2
|
|
addi d3u_t,a3
|
|
|
|
cmpi 40,a4
|
|
jrle #shortd ;Under hoop?
|
|
addi d2s_t-d2u_t,a3
|
|
|
|
cmpi 70,a4 ;Short range
|
|
jrle #shortd
|
|
|
|
move *a13(plyr_turbon),a14
|
|
jrz #sj
|
|
|
|
addi d2m_t-d2s_t,a3,W
|
|
|
|
cmpi 100,a4 ;Med range
|
|
jrle #shortd
|
|
addi d2l_t-d2m_t,a3,W
|
|
jruc #shortd
|
|
|
|
;
|
|
set1
|
|
addi d1u_t,a3
|
|
|
|
cmpi 40,a4
|
|
; cmpi 60,a4
|
|
jrle #shortd ;Under hoop?
|
|
addi d1s_t-d1u_t,a3
|
|
|
|
cmpi 70,a4 ;Short range
|
|
; cmpi 80,a4 ;Short range
|
|
jrle #shortd
|
|
|
|
move *a13(plyr_turbon),a14
|
|
jrz #sj
|
|
|
|
addi d1m_t-d1s_t,a3,W
|
|
|
|
cmpi 100,a4 ;Med range
|
|
; cmpi 110,a4 ;Med range
|
|
jrle #shortd
|
|
|
|
addi d1l_t-d1m_t,a3,W
|
|
|
|
|
|
#shortd clr a0
|
|
rets
|
|
#sj movk 1,a0
|
|
rets
|
|
|
|
|
|
;
|
|
; Which set of dunks to use based on 0-10 attribute level
|
|
;
|
|
jmp_t .long set1,set1,set1,set2,set2
|
|
.long set3,set4,set4,set5,set5,set5
|
|
|
|
|
|
#****************************************************************************
|
|
|
|
|
|
;Set of dunks for #5 skill level
|
|
|
|
d5u_t .long #d1u_t,#d2u_t,#d3u_t,#d4u_t
|
|
.long #d5u_t,#d4u_t,#d3u_t,#d2u_t, #d1u_t
|
|
|
|
d5s_t .long #d1s_t,#d2s_t,#d3s_t,#d4s_t
|
|
.long #d5s_t,#d4s_t,#d3s_t,#d2s_t, #d1s_t
|
|
|
|
d5m_t .long #d1m_t,#d2m_t,#d3m_t,#d4m_t
|
|
.long #d5m_t,#d4m_t,#d3m_t,#d2m_t, #d1m_t
|
|
|
|
d5l_t .long #d1l_t,#d2l_t,#d3l_t,#d4l_t
|
|
.long #d5l_t,#d4l_t,#d3l_t,#d2l_t, #d1l_t
|
|
|
|
;UNDER hoop
|
|
#d1u_t .word 3-1
|
|
.word DUNKA3_SEQ,DUNKS2_SEQ,DUNKU3_SEQ
|
|
|
|
#d2u_t .word 4-1
|
|
.word DUNKA3_SEQ,DUNKL3_SEQ,DUNKP2_SEQ,DUNKU3_SEQ
|
|
|
|
#d3u_t .word 3-1
|
|
.word DUNKD2_SEQ,DUNKL3_SEQ,DUNKU3_SEQ
|
|
|
|
#d4u_t .word 4-1
|
|
.word DUNKD2_SEQ,DUNKE_SEQ,DUNKL3_SEQ,DUNKP2_SEQ
|
|
|
|
#d5u_t .word 2-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
|
|
;NEAR hoop
|
|
#d1s_t .word 6-1
|
|
.word DUNKA2_SEQ,DUNKP2_SEQ,DUNKA2_SEQ,DUNKP2_SEQ
|
|
.word DUNKS2_SEQ,DUNKU3_SEQ
|
|
|
|
#d2s_t .word 3-1
|
|
.word DUNKA2_SEQ,DUNKP2_SEQ,DUNKU3_SEQ
|
|
|
|
#d3s_t .word 1-1
|
|
.word DUNKU3_SEQ
|
|
|
|
#d4s_t .word 3-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ,DUNKP2_SEQ
|
|
|
|
#d5s_t .word 2-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
|
|
;MEDIUM to hoop
|
|
#d1m_t
|
|
.word 13-1
|
|
.word DUNKA_SEQ,DUNKA2_SEQ,DUNKC_SEQ,DUNKK_SEQ
|
|
.word DUNKK2_SEQ,DUNKK_SEQ,DUNKZ3_SEQ,DUNKR2_SEQ
|
|
.word DUNKU2_SEQ,DUNKY2_SEQ,DUNKLAY_SEQ,DUNKC_SEQ
|
|
.word DUNKZ3_SEQ
|
|
|
|
|
|
#d2m_t
|
|
.word 14-1
|
|
.word DUNKA_SEQ,DUNKA2_SEQ,DUNKB_SEQ,DUNKJ2_SEQ
|
|
.word DUNKK_SEQ,DUNKN_SEQ,DUNKC_SEQ,DUNKP_SEQ
|
|
.word DUNKT_SEQ,DUNKT2_SEQ,DUNKZ3_SEQ,DUNKZ2_SEQ
|
|
.word DUNKY2_SEQ,DUNKZ2_SEQ
|
|
|
|
|
|
#d3m_t
|
|
.word 12-1
|
|
.word DUNKB_SEQ,DUNKJ_SEQ,DUNKQ_SEQ,DUNKV_SEQ
|
|
.word DUNKLAY_SEQ,DUNKY2_SEQ,DUNKJ2_SEQ,DUNKD_SEQ
|
|
.word DUNKK_SEQ,DUNKX2_SEQ,DUNKX3_SEQ,DUNKT_SEQ
|
|
|
|
|
|
#d4m_t
|
|
.word 9-1
|
|
.word DUNKJ2_SEQ,DUNKP_SEQ,DUNKQ_SEQ,DUNKT2_SEQ
|
|
.word DUNKP_SEQ,DUNKX2_SEQ,DUNKX3_SEQ,DUNKD_SEQ
|
|
.word DUNKE2_SEQ
|
|
|
|
|
|
#d5m_t
|
|
.word 3-1
|
|
.word DUNKE2_SEQ,DUNKP_SEQ,DUNKZ_SEQ
|
|
|
|
|
|
;FAR from hoop
|
|
#d1l_t .word 11-1
|
|
.word DUNKB3_SEQ,DUNKU2_SEQ,DUNKK2_SEQ,DUNKN_SEQ
|
|
.word DUNKY2_SEQ,DUNKN3_SEQ,DUNKO_SEQ,DUNKP3_SEQ
|
|
.word DUNKY_SEQ,DUNKLAY_SEQ,DUNKZ3_SEQ
|
|
|
|
|
|
#d2l_t .word 32-1
|
|
.word DUNKA_SEQ,DUNKB_SEQ,DUNKK2_SEQ,DUNKB3_SEQ
|
|
.word DUNKN_SEQ,DUNKN2_SEQ,DUNKN3_SEQ,DUNKO_SEQ
|
|
.word DUNKP_SEQ,DUNKP3_SEQ,DUNKG2_SEQ,DUNKF_SEQ
|
|
.word DUNKS_SEQ,DUNKT_SEQ,DUNKT3_SEQ,DUNKLAY2_SEQ
|
|
.word DUNKT5_SEQ,DUNKU2_SEQ,DUNKW3_SEQ,DUNKJ2_SEQ
|
|
.word DUNKLAY3_SEQ,DUNKY2_SEQ,DUNKZ2_SEQ,DUNKY_SEQ
|
|
.word DUNKLAY6_SEQ,DUNKX3_SEQ,DUNKZ3_SEQ,DUNKLAY_SEQ
|
|
.word DUNKT4_SEQ,DUNKU8_SEQ,DUNKU8_SEQ,DUNKT4_SEQ
|
|
|
|
|
|
#d3l_t .word 37-1
|
|
.word DUNKB_SEQ,DUNKK2_SEQ,DUNKD_SEQ,DUNKG2_SEQ
|
|
.word DUNKL_SEQ,DUNKN_SEQ,DUNKN2_SEQ,DUNKJ_SEQ
|
|
.word DUNKN3_SEQ,DUNKO_SEQ,DUNKP3_SEQ,DUNKQ_SEQ
|
|
.word DUNKQ2_SEQ,DUNKS_SEQ,DUNKT_SEQ,DUNKQ3_SEQ
|
|
.word DUNKT3_SEQ,DUNKV_SEQ,DUNKT5_SEQ,DUNKU2_SEQ
|
|
.word DUNKV_SEQ,DUNKV2_SEQ,DUNKV3_SEQ,DUNKW_SEQ
|
|
.word DUNKW2_SEQ,DUNKW3_SEQ,DUNKX_SEQ,DUNKP3_SEQ
|
|
.word DUNKY_SEQ,DUNKLAY_SEQ,DUNKLAY2_SEQ,DUNKY2_SEQ
|
|
.word DUNKLAY3A_SEQ,DUNKV_SEQ,DUNKLAY7_SEQ,DUNKO2_SEQ
|
|
.word DUNKL2_SEQ
|
|
|
|
|
|
#d4l_t .word 21-1
|
|
.word DUNKG2_SEQ,DUNKJ_SEQ,DUNKK2_SEQ,DUNKY_SEQ
|
|
.word DUNKP_SEQ,DUNKQ_SEQ,DUNKQ2_SEQ,DUNKX2_SEQ
|
|
.word DUNKW_SEQ,DUNKW2_SEQ,DUNKW3_SEQ,DUNKX_SEQ
|
|
.word DUNKP3_SEQ,DUNKT5_SEQ,DUNKJ_SEQ,DUNKY2_SEQ
|
|
.word DUNKT4_SEQ,DUNKU8_SEQ,DUNKU8_SEQ,DUNKT4_SEQ
|
|
.word DUNKD_SEQ
|
|
|
|
|
|
#d5l_t .word 6-1
|
|
.word DUNKP_SEQ,DUNKW_SEQ,DUNKW2_SEQ,DUNKW3_SEQ
|
|
.word DUNKX_SEQ,DUNKZ_SEQ
|
|
|
|
|
|
#****************************************************************************
|
|
;Set of dunks for #4 skill players
|
|
|
|
d4u_t .long #d1u_t,#d2u_t,#d3u_t,#d4u_t
|
|
.long #d5u_t,#d4u_t,#d3u_t,#d2u_t, #d1u_t
|
|
|
|
d4s_t .long #d1s_t,#d2s_t,#d3s_t,#d4s_t
|
|
.long #d5s_t,#d4s_t,#d3s_t,#d2s_t, #d1s_t
|
|
|
|
d4m_t .long #d1m_t,#d2m_t,#d3m_t,#d4m_t
|
|
.long #d5m_t,#d4m_t,#d3m_t,#d2m_t, #d1m_t
|
|
|
|
d4l_t .long #d1l_t,#d2l_t,#d3l_t,#d4l_t
|
|
.long #d5l_t,#d4l_t,#d3l_t,#d2l_t, #d1l_t
|
|
|
|
;UNDER hoop
|
|
#d1u_t .word 3-1
|
|
.word DUNKA3_SEQ,DUNKS2_SEQ,DUNKU3_SEQ
|
|
|
|
#d2u_t .word 3-1
|
|
.word DUNKA3_SEQ,DUNKL3_SEQ,DUNKP2_SEQ
|
|
|
|
#d3u_t .word 3-1
|
|
.word DUNKD2_SEQ,DUNKL3_SEQ,DUNKU3_SEQ
|
|
|
|
#d4u_t .word 4-1
|
|
.word DUNKD2_SEQ,DUNKE_SEQ,DUNKL3_SEQ,DUNKP2_SEQ
|
|
|
|
#d5u_t .word 2-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
|
|
;NEAR hoop
|
|
#d1s_t .word 4-1
|
|
.word DUNKA2_SEQ,DUNKS2_SEQ,DUNKU3_SEQ,DUNKLAY3C_SEQ
|
|
|
|
#d2s_t .word 6-1
|
|
.word DUNKA2_SEQ,DUNKP2_SEQ,DUNKU3_SEQ,DUNKR_SEQ
|
|
.word DUNKLAY3C_SEQ,DUNKP2_SEQ
|
|
|
|
#d3s_t .word 2-1
|
|
.word DUNKU3_SEQ,DUNKLAY3C_SEQ
|
|
|
|
#d4s_t .word 2-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
#d5s_t .word 2-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
|
|
;MEDIUM to hoop
|
|
#d1m_t .word 12-1
|
|
.word DUNKA_SEQ,DUNKA2_SEQ,DUNKB3_SEQ,DUNKC_SEQ
|
|
.word DUNKK_SEQ,DUNKR2_SEQ,DUNKU2_SEQ,DUNKY2_SEQ
|
|
.word DUNKZ3_SEQ,DUNKR2_SEQ,DUNKZ3_SEQ,DUNKLAY3A_SEQ
|
|
|
|
|
|
#d2m_t .word 16-1
|
|
.word DUNKA_SEQ,DUNKA2_SEQ,DUNKB_SEQ,DUNKC_SEQ
|
|
.word DUNKK_SEQ,DUNKR_SEQ,DUNKT_SEQ,DUNKJ2_SEQ
|
|
.word DUNKLAY_SEQ,DUNKZ2_SEQ,DUNKZ3_SEQ,DUNKLAY8_SEQ
|
|
.word DUNKP_SEQ,DUNKY2_SEQ,DUNKJ2_SEQ,DUNKT2_SEQ
|
|
|
|
|
|
#d3m_t .word 11-1
|
|
.word DUNKB_SEQ,DUNKD_SEQ,DUNKJ2_SEQ,DUNKV_SEQ
|
|
.word DUNKY2_SEQ,DUNKT_SEQ,DUNKT2_SEQ,DUNKX2_SEQ
|
|
.word DUNKQ_SEQ,DUNKLAY_SEQ,DUNKX3_SEQ
|
|
|
|
|
|
#d4m_t .word 8-1
|
|
.word DUNKJ2_SEQ,DUNKX3_SEQ,DUNKE2_SEQ,DUNKD_SEQ
|
|
.word DUNKP_SEQ,DUNKQ_SEQ,DUNKX2_SEQ,DUNKT2_SEQ
|
|
|
|
|
|
#d5m_t .word 3-1
|
|
.word DUNKP_SEQ,DUNKE2_SEQ,DUNKZ_SEQ
|
|
|
|
|
|
;FAR from hoop
|
|
#d1l_t .word 12-1
|
|
.word DUNKB3_SEQ,DUNKU2_SEQ,DUNKK2_SEQ,DUNKN_SEQ
|
|
.word DUNKN2_SEQ,DUNKP3_SEQ,DUNKU2_SEQ,DUNKY2_SEQ
|
|
.word DUNKY_SEQ,DUNKLAY_SEQ,DUNKZ3_SEQ,DUNKP3_SEQ
|
|
|
|
|
|
#d2l_t .word 25-1
|
|
.word DUNKZ3_SEQ,DUNKB_SEQ,DUNKK2_SEQ,DUNKB3_SEQ
|
|
.word DUNKF_SEQ,DUNKG_SEQ,DUNKG2_SEQ,DUNKJ2_SEQ
|
|
.word DUNKY2_SEQ,DUNKK2_SEQ,DUNKT3_SEQ,DUNKT5_SEQ
|
|
.word DUNKN2_SEQ,DUNKP_SEQ,DUNKP3_SEQ,DUNKT_SEQ
|
|
.word DUNKY_SEQ,DUNKLAY_SEQ,DUNKZ2_SEQ,DUNKS_SEQ
|
|
.word DUNKT4_SEQ,DUNKU8_SEQ,DUNKU8_SEQ,DUNKT4_SEQ
|
|
.word DUNKU2_SEQ
|
|
|
|
|
|
#d3l_t .word 28-1
|
|
.word DUNKB_SEQ,DUNKJ_SEQ,DUNKD_SEQ,DUNKQ_SEQ
|
|
.word DUNKG_SEQ,DUNKG2_SEQ,DUNKJ_SEQ,DUNKY2_SEQ
|
|
.word DUNKK2_SEQ,DUNKL_SEQ,DUNKN2_SEQ,DUNKP3_SEQ
|
|
.word DUNKQ2_SEQ,DUNKS_SEQ,DUNKT_SEQ,DUNKQ3_SEQ
|
|
.word DUNKY_SEQ,DUNKT3_SEQ,DUNKT5_SEQ,DUNKU2_SEQ
|
|
.word DUNKV_SEQ,DUNKV2_SEQ,DUNKW_SEQ,DUNKW3_SEQ
|
|
.word DUNKX_SEQ,DUNKLAY8_SEQ,DUNKO2_SEQ,DUNKL2_SEQ
|
|
|
|
#d4l_t .word 21-1
|
|
.word DUNKJ_SEQ,DUNKD_SEQ,DUNKG_SEQ,DUNKP_SEQ
|
|
.word DUNKG2_SEQ,DUNKJ_SEQ,DUNKD_SEQ,DUNKK2_SEQ
|
|
.word DUNKQ_SEQ,DUNKQ2_SEQ,DUNKT3_SEQ,DUNKY2_SEQ
|
|
.word DUNKT5_SEQ,DUNKW_SEQ,DUNKW3_SEQ,DUNKX_SEQ
|
|
.word DUNKT4_SEQ,DUNKU8_SEQ,DUNKU8_SEQ,DUNKT4_SEQ
|
|
.word DUNKY_SEQ
|
|
|
|
|
|
#d5l_t .word 5-1
|
|
.word DUNKP_SEQ,DUNKW_SEQ,DUNKW3_SEQ,DUNKX_SEQ
|
|
.word DUNKZ_SEQ
|
|
|
|
|
|
#****************************************************************************
|
|
;Set of dunks for #3 skill players
|
|
|
|
d3u_t .long #d1u_t,#d2u_t,#d3u_t,#d4u_t
|
|
.long #d5u_t,#d4u_t,#d3u_t,#d2u_t, #d1u_t
|
|
|
|
d3s_t .long #d1s_t,#d2s_t,#d3s_t,#d4s_t
|
|
.long #d5s_t,#d4s_t,#d3s_t,#d2s_t, #d1s_t
|
|
|
|
d3m_t .long #d1m_t,#d2m_t,#d3m_t,#d4m_t
|
|
.long #d5m_t,#d4m_t,#d3m_t,#d2m_t, #d1m_t
|
|
|
|
d3l_t .long #d1l_t,#d2l_t,#d3l_t,#d4l_t
|
|
.long #d5l_t,#d4l_t,#d3l_t,#d2l_t, #d1l_t
|
|
|
|
;UNDER hoop
|
|
#d1u_t .word 2-1
|
|
.word DUNKS2_SEQ,DUNKU3_SEQ
|
|
|
|
#d2u_t .word 1-1
|
|
.word DUNKA3_SEQ
|
|
|
|
#d3u_t .word 2-1
|
|
.word DUNKD2_SEQ,DUNKU3_SEQ
|
|
|
|
#d4u_t .word 1-1
|
|
.word DUNKD2_SEQ
|
|
|
|
#d5u_t .word 1-1
|
|
.word DUNKE_SEQ
|
|
|
|
|
|
;NEAR hoop
|
|
#d1s_t .word 4-1
|
|
.word DUNKA2_SEQ,DUNKS2_SEQ,DUNKU3_SEQ,DUNKLAY3C_SEQ
|
|
|
|
#d2s_t .word 4-1
|
|
.word DUNKA2_SEQ,DUNKP2_SEQ,DUNKU3_SEQ,DUNKLAY3C_SEQ
|
|
|
|
#d3s_t .word 2-1
|
|
.word DUNKU3_SEQ,DUNKLAY3C_SEQ
|
|
|
|
#d4s_t .word 3-1
|
|
.word DUNKE_SEQ,DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
#d5s_t .word 2-1
|
|
.word DUNKE_SEQ,DUNKP2_SEQ
|
|
|
|
|
|
;MEDIUM to hoop
|
|
#d1m_t .word 12-1
|
|
.word DUNKA_SEQ,DUNKA2_SEQ,DUNKB3_SEQ,DUNKC_SEQ
|
|
.word DUNKK_SEQ,DUNKLAY6_SEQ,DUNKR2_SEQ,DUNKZ3_SEQ
|
|
.word DUNKLAY_SEQ,DUNKLAY3A_SEQ,DUNKLAY7_SEQ,DUNKLAY3B_SEQ
|
|
|
|
|
|
#d2m_t .word 16-1
|
|
.word DUNKA2_SEQ,DUNKB_SEQ,DUNKK_SEQ,DUNKC_SEQ
|
|
.word DUNKP_SEQ,DUNKR_SEQ,DUNKJ2_SEQ,DUNKZ3_SEQ
|
|
.word DUNKLAY_SEQ,DUNKLAY2_SEQ,DUNKZ3_SEQ,DUNKLAY3A_SEQ
|
|
.word DUNKLAY3C_SEQ,DUNKLAY5_SEQ,DUNKLAY7_SEQ,DUNKLAY8_SEQ
|
|
|
|
|
|
#d3m_t .word 15-1
|
|
.word DUNKD_SEQ,DUNKJ2_SEQ,DUNKK_SEQ,DUNKLAY3B_SEQ
|
|
.word DUNKQ_SEQ,DUNKV_SEQ,DUNKX3_SEQ,DUNKB_SEQ
|
|
.word DUNKLAY2_SEQ,DUNKLAY3_SEQ,DUNKX2_SEQ,DUNKLAY8_SEQ
|
|
.word DUNKLAY6_SEQ,DUNKLAY7A_SEQ,DUNKX2_SEQ
|
|
|
|
|
|
#d4m_t .word 11-1
|
|
.word DUNKD_SEQ,DUNKE2_SEQ,DUNKX3_SEQ,DUNKP_SEQ
|
|
.word DUNKT2_SEQ,DUNKJ2_SEQ,DUNKLAY6_SEQ,DUNKX2_SEQ
|
|
.word DUNKQ_SEQ,DUNKQ_SEQ,DUNKX2_SEQ
|
|
|
|
#d5m_t .word 4-1
|
|
.word DUNKE2_SEQ,DUNKP_SEQ,DUNKLAY6_SEQ,DUNKZ_SEQ
|
|
|
|
|
|
;FAR from hoop
|
|
#d1l_t .word 11-1
|
|
.word DUNKB3_SEQ,DUNKB3_SEQ,DUNKK2_SEQ,DUNKN2_SEQ
|
|
.word DUNKP3_SEQ,DUNKU2_SEQ,DUNKY_SEQ,DUNKLAY7_SEQ
|
|
.word DUNKLAY_SEQ,DUNKLAY3_SEQ,DUNKLAY3B_SEQ
|
|
|
|
|
|
#d2l_t .word 28-1
|
|
.word DUNKA_SEQ,DUNKB_SEQ,DUNKB_SEQ,DUNKB3_SEQ
|
|
.word DUNKG_SEQ,DUNKG2_SEQ,DUNKJ2_SEQ,DUNKP3_SEQ
|
|
.word DUNKP_SEQ,DUNKK2_SEQ,DUNKN2_SEQ,DUNKY_SEQ
|
|
.word DUNKS_SEQ,DUNKT_SEQ,DUNKT_SEQ,DUNKT3_SEQ
|
|
.word DUNKLAY_SEQ,DUNKLAY2_SEQ,DUNKLAY3_SEQ,DUNKLAY3A_SEQ
|
|
.word DUNKLAY3B_SEQ,DUNKLAY8_SEQ,DUNKLAY6_SEQ,DUNKLAY7_SEQ
|
|
.word DUNKT4_SEQ,DUNKU8_SEQ,DUNKU2_SEQ,DUNKX3_SEQ
|
|
|
|
|
|
#d3l_t .word 29-1
|
|
.word DUNKB_SEQ,DUNKB2_SEQ,DUNKD_SEQ,DUNKX_SEQ
|
|
.word DUNKG_SEQ,DUNKG2_SEQ,DUNKJ_SEQ,DUNKW_SEQ
|
|
.word DUNKK2_SEQ,DUNKL_SEQ,DUNKN2_SEQ,DUNKP3_SEQ
|
|
.word DUNKQ_SEQ,DUNKQ2_SEQ,DUNKS_SEQ,DUNKT_SEQ
|
|
.word DUNKT_SEQ,DUNKT3_SEQ,DUNKT5_SEQ,DUNKU2_SEQ
|
|
.word DUNKV_SEQ,DUNKV2_SEQ,DUNKW3_SEQ,DUNKLAY8_SEQ
|
|
.word DUNKY_SEQ,DUNKLAY_SEQ,DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
.word DUNKLAY7A_SEQ
|
|
|
|
|
|
#d4l_t .word 18-1
|
|
.word DUNKD_SEQ,DUNKG_SEQ,DUNKP_SEQ,DUNKQ_SEQ
|
|
.word DUNKG2_SEQ,DUNKJ_SEQ,DUNKK2_SEQ,DUNKX_SEQ
|
|
.word DUNKQ2_SEQ,DUNKT3_SEQ,DUNKLAY6_SEQ,DUNKY_SEQ
|
|
.word DUNKT5_SEQ,DUNKW_SEQ,DUNKW3_SEQ,DUNKX2_SEQ
|
|
.word DUNKT4_SEQ,DUNKU8_SEQ
|
|
|
|
|
|
#d5l_t .word 6-1
|
|
.word DUNKP_SEQ,DUNKW_SEQ,DUNKW3_SEQ,DUNKX_SEQ
|
|
.word DUNKLAY6_SEQ,DUNKZ_SEQ
|
|
|
|
|
|
#****************************************************************************
|
|
;Set of dunks for #2 skill players
|
|
|
|
d2u_t .long #d1u_t,#d2u_t,#d3u_t,#d4u_t
|
|
.long #d5u_t,#d4u_t,#d3u_t,#d2u_t, #d1u_t
|
|
|
|
d2s_t .long #d1s_t,#d2s_t,#d3s_t,#d4s_t
|
|
.long #d5s_t,#d4s_t,#d3s_t,#d2s_t, #d1s_t
|
|
|
|
d2m_t .long #d1m_t,#d2m_t,#d3m_t,#d4m_t
|
|
.long #d5m_t,#d4m_t,#d3m_t,#d2m_t, #d1m_t
|
|
|
|
d2l_t .long #d1l_t,#d2l_t,#d3l_t,#d4l_t
|
|
.long #d5l_t,#d4l_t,#d3l_t,#d2l_t, #d1l_t
|
|
|
|
;UNDER hoop
|
|
#d1u_t .word 1-1
|
|
.word DUNKS2_SEQ
|
|
|
|
#d2u_t .word 1-1
|
|
.word DUNKA3_SEQ
|
|
|
|
#d3u_t .word 1-1
|
|
.word DUNKU3_SEQ
|
|
|
|
#d4u_t .word 1-1
|
|
.word DUNKE_SEQ
|
|
|
|
#d5u_t .word 1-1
|
|
.word DUNKE_SEQ
|
|
|
|
|
|
;NEAR hoop
|
|
#d1s_t .word 2-1
|
|
.word DUNKU3_SEQ,DUNKLAY3C_SEQ
|
|
|
|
#d2s_t .word 1-1
|
|
.word DUNKLAY3C_SEQ
|
|
|
|
#d3s_t .word 1-1
|
|
.word DUNKLAY3C_SEQ
|
|
|
|
#d4s_t .word 1-1
|
|
.word DUNKA2_SEQ
|
|
|
|
#d5s_t .word 1-1
|
|
.word DUNKE_SEQ
|
|
|
|
|
|
;MEDIUM to hoop
|
|
#d1m_t .word 6-1
|
|
.word DUNKA2_SEQ,DUNKC_SEQ,DUNKLAY3_SEQ,DUNKLAY3A_SEQ
|
|
.word DUNKLAY5_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
#d2m_t .word 13-1
|
|
.word DUNKP_SEQ,DUNKR_SEQ,DUNKA2_SEQ,DUNKC_SEQ,DUNKA_SEQ
|
|
.word DUNKLAY8_SEQ,DUNKLAY_SEQ,DUNKLAY2_SEQ,DUNKLAY7A_SEQ
|
|
.word DUNKLAY5_SEQ,DUNKLAY6_SEQ,DUNKLAY7_SEQ,DUNKJ2_SEQ
|
|
.word DUNKLAY3_SEQ
|
|
|
|
|
|
#d3m_t .word 14-1
|
|
.word DUNKJ2_SEQ,DUNKP3_SEQ,DUNKQ_SEQ,DUNKLAY8_SEQ
|
|
.word DUNKLAY_SEQ,DUNKLAY2_SEQ,DUNKLAY3_SEQ,DUNKLAY3A_SEQ
|
|
.word DUNKLAY5_SEQ,DUNKLAY6_SEQ,DUNKLAY7_SEQ,DUNKLAY7A_SEQ
|
|
.word DUNKT_SEQ,DUNKD_SEQ
|
|
|
|
|
|
#d4m_t .word 5-1
|
|
.word DUNKQ_SEQ,DUNKE2_SEQ,DUNKJ_SEQ,DUNKD_SEQ
|
|
.word DUNKLAY6_SEQ
|
|
|
|
|
|
#d5m_t .word 2-1
|
|
.word DUNKE2_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
;FAR from hoop
|
|
#d1l_t .word 7-1
|
|
.word DUNKP3_SEQ,DUNKU2_SEQ,DUNKLAY_SEQ,DUNKLAY3C_SEQ
|
|
.word DUNKLAY3_SEQ,DUNKLAY3B_SEQ,DUNKLAY7_SEQ
|
|
|
|
|
|
#d2l_t .word 10-1
|
|
.word DUNKLAY2_SEQ,DUNKLAY3_SEQ,DUNKLAY3A_SEQ,DUNKLAY7A_SEQ
|
|
.word DUNKLAY7_SEQ,DUNKLAY8_SEQ,DUNKA_SEQ,DUNKB3_SEQ
|
|
.word DUNKB2_SEQ,DUNKLAY_SEQ
|
|
|
|
|
|
#d3l_t .word 12-1
|
|
.word DUNKG_SEQ,DUNKG2_SEQ,DUNKJ_SEQ,DUNKQ_SEQ
|
|
.word DUNKD_SEQ,DUNKLAY_SEQ,DUNKLAY2_SEQ,DUNKLAY3_SEQ
|
|
.word DUNKLAY3A_SEQ,DUNKLAY6_SEQ,DUNKLAY7_SEQ,DUNKLAY8_SEQ
|
|
|
|
|
|
#d4l_t .word 3-1
|
|
.word DUNKJ_SEQ,DUNKLAY6_SEQ,DUNKG_SEQ
|
|
|
|
|
|
#d5l_t .word 3-1
|
|
.word DUNKP_SEQ,DUNKW3_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
#****************************************************************************
|
|
;Set of dunks for #1 skill players
|
|
|
|
d1u_t .long #d1u_t,#d2u_t,#d3u_t,#d4u_t
|
|
.long #d5u_t,#d4u_t,#d3u_t,#d2u_t, #d1u_t
|
|
|
|
d1s_t .long #d1s_t,#d2s_t,#d3s_t,#d4s_t
|
|
.long #d5s_t,#d4s_t,#d3s_t,#d2s_t, #d1s_t
|
|
|
|
d1m_t .long #d1m_t,#d2m_t,#d3m_t,#d4m_t
|
|
.long #d5m_t,#d4m_t,#d3m_t,#d2m_t, #d1m_t
|
|
|
|
d1l_t .long #d1l_t,#d2l_t,#d3l_t,#d4l_t
|
|
.long #d5l_t,#d4l_t,#d3l_t,#d2l_t, #d1l_t
|
|
|
|
;UNDER hoop
|
|
#d1u_t .word 1-1
|
|
.word DUNKS2_SEQ
|
|
|
|
#d2u_t .word 1-1
|
|
.word DUNKA3_SEQ
|
|
|
|
#d3u_t .word 1-1
|
|
.word DUNKD2_SEQ
|
|
|
|
#d4u_t .word 1-1
|
|
.word DUNKE_SEQ
|
|
|
|
#d5u_t .word 1-1
|
|
.word DUNKE_SEQ
|
|
|
|
|
|
;NEAR hoop
|
|
#d1s_t .word 2-1
|
|
.word DUNKLAY7_SEQ,DUNKLAY6_SEQ
|
|
|
|
#d2s_t .word 1-1
|
|
.word DUNKLAY6_SEQ
|
|
|
|
#d3s_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY7_SEQ
|
|
|
|
#d4s_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
|
|
#d5s_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
;MEDIUM to hoop
|
|
#d1m_t .word 2-1
|
|
.word DUNKLAY6_SEQ,DUNKLAY7_SEQ
|
|
|
|
|
|
#d2m_t .word 2-1
|
|
.word DUNKLAY5_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
#d3m_t .word 3-1
|
|
.word DUNKLAY5_SEQ,DUNKLAY6_SEQ,DUNKLAY3C_SEQ
|
|
|
|
|
|
#d4m_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
|
|
#d5m_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
;FAR from hoop
|
|
#d1l_t .word 2-1
|
|
.word DUNKLAY5_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
#d2l_t .word 2-1
|
|
.word DUNKLAY6_SEQ,DUNKLAY7_SEQ
|
|
|
|
|
|
#d3l_t .word 2-1
|
|
.word DUNKLAY6_SEQ,DUNKLAY8_SEQ
|
|
|
|
|
|
#d4l_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
#d5l_t .word 2-1
|
|
.word DUNKLAY3C_SEQ,DUNKLAY6_SEQ
|
|
|
|
|
|
;Small heads!
|
|
.def Gug_h
|
|
.def BEdwrds_h
|
|
.def Brown_h
|
|
.def KAnderson_h
|
|
.def Willis_h
|
|
.def Mourn_h
|
|
.def Kukoc_h
|
|
.def Jack_h
|
|
.def Mash_h
|
|
.def Dumars_h
|
|
.def Rodman_h
|
|
.def Webber_h
|
|
.def Horry_h
|
|
.def Smits_h
|
|
.def Campbell_h
|
|
.def Baker_h
|
|
.def Rider_h
|
|
.def Morris_h
|
|
.def Mason_h
|
|
.def Starks_h
|
|
.def AHard_h
|
|
.def NAnders_h
|
|
.def Weath_h
|
|
.def Brad_h
|
|
.def KJohn_h
|
|
.def CRobinson_h
|
|
.def Rich_h
|
|
.def Payton_h
|
|
.def Mckey_h
|
|
.def Benoit_h
|
|
.def Cheaney_h
|
|
|
|
|
|
.def Robertson_h
|
|
.def Chapman_h
|
|
.def Lang_h
|
|
.def Scott_h
|
|
.def Webb_h
|
|
; .def MJohnson_h
|
|
.def Ruffin_h
|
|
|
|
Robertson_h
|
|
HDMAC Robertsn1
|
|
Chapman_h
|
|
HDMAC Chapman1
|
|
Lang_h
|
|
HDMAC Lang1
|
|
Scott_h
|
|
HDMAC Scott1
|
|
Webb_h
|
|
HDMAC Webb1
|
|
;MJohnson_h
|
|
; HDMAC MJohnson1
|
|
Ruffin_h
|
|
HDMAC Ruffin1
|
|
|
|
|
|
|
|
Gug_h
|
|
HDMAC gug1
|
|
BEdwrds_h
|
|
HDMAC BEdwrd1
|
|
Brown_h
|
|
HDMAC BROWN1
|
|
KAnderson_h
|
|
HDMAC K_AND1
|
|
Willis_h
|
|
HDMAC WILLIS1
|
|
Mourn_h
|
|
HDMAC MOURN1
|
|
Kukoc_h
|
|
HDMAC KUKOC1
|
|
Jack_h
|
|
HDMAC JACK1
|
|
Mash_h
|
|
HDMAC MASH1
|
|
Dumars_h
|
|
HDMAC DUMARS1
|
|
Rodman_h
|
|
; HDMAC ALIEN01
|
|
HDMAC RODMAN1
|
|
Webber_h
|
|
HDMAC WEBBER1
|
|
Horry_h
|
|
HDMAC HORRY1
|
|
Smits_h
|
|
HDMAC SMITS1
|
|
Campbell_h
|
|
HDMAC CAMP1
|
|
Baker_h
|
|
HDMAC BAKER1
|
|
Rider_h
|
|
HDMAC RIDER1
|
|
Morris_h
|
|
HDMAC MORRIS1
|
|
Mason_h
|
|
HDMAC MASON1
|
|
Starks_h
|
|
HDMAC STARKS1
|
|
AHard_h
|
|
HDMAC A_HARD1
|
|
NAnders_h
|
|
HDMAC N_AND1
|
|
Weath_h
|
|
HDMAC WEATH1
|
|
Brad_h
|
|
HDMAC BRAD1
|
|
KJohn_h
|
|
HDMAC K_JOHN1
|
|
CRobinson_h
|
|
HDMAC C_ROB1
|
|
Rich_h
|
|
HDMAC RICH1
|
|
Payton_h
|
|
HDMAC PAYTON1
|
|
Mckey_h
|
|
HDMAC MCKEY1
|
|
Benoit_h
|
|
HDMAC BENOIT1
|
|
Cheaney_h
|
|
HDMAC CHEAN1
|
|
|
|
|
|
; This table contains the SMALL head img. table ptrs. for the heads in
|
|
; 'CREATE PLAYER' (coresponds with mugshots_tbl in select3.asm)
|
|
;
|
|
plr_heads_small
|
|
.long Cow_h
|
|
.long Alien_h
|
|
.long Pippen_h
|
|
.long Chk_h
|
|
.long kim_h
|
|
.long fifi_h
|
|
.long Gor_h
|
|
.long LJohnson_h
|
|
.long Mik_h
|
|
.long Lis_h
|
|
.long madball_h
|
|
.long Old_h
|
|
.long jackjr_h
|
|
.long clown_h
|
|
.long mar_h
|
|
.long Ghill_h
|
|
.long Ber_h
|
|
.long Olajuwon_h
|
|
.long Fat_h
|
|
.long Ang_h
|
|
.long ape_h
|
|
.long Mourn_h
|
|
.long Fra_h
|
|
.long AHard_h
|
|
.long Guido_h
|
|
.long Gre_h
|
|
.long Pig_h
|
|
.long Kemp_h
|
|
.long cheech_h
|
|
.long Mel_h
|
|
.long Wiz_h
|
|
.long Webber_h
|
|
.long Joe_h
|
|
.long mxv_h
|
|
.long eddie_h
|
|
.long oursler_h
|
|
.long bardo_h
|
|
.long willy_h
|
|
.long eric_h
|
|
.long sean_h
|
|
.long mike_h
|
|
.long dim_h
|
|
|
|
plr_heads_small_end
|
|
.long Cow_h
|
|
.long Alien_h
|
|
.long Pippen_h
|
|
.long Chk_h
|
|
plr_heads_small_end2
|
|
|
|
|
|
SM_HEADS_CNT equ ((plr_heads_small_end-plr_heads_small)/32)
|
|
|
|
;
|
|
; This table contains the SMALL head flesh pal table ptrs. for the heads in
|
|
; 'CREATE PLAYER' (coresponds with mugshots_tbl in select3.asm)
|
|
;
|
|
.def plr_flesh_pal_tbl
|
|
plr_flesh_pal_tbl
|
|
.long COW_F
|
|
.long ALIEN_F
|
|
.long pippin_f
|
|
.long CHK_F
|
|
.long KIM_F
|
|
.long FIFI_F
|
|
.long GOR_F
|
|
.long johnson_f
|
|
.long MIK_F
|
|
.long LIS_F
|
|
.long MADBAL_F
|
|
.long OLD_F
|
|
.long JACKJR_F
|
|
.long CLOWN_F
|
|
.long MAR_F
|
|
.long GHILL_F
|
|
.long BER_F
|
|
.long Hakeem_f
|
|
.long FAT_F
|
|
.long ANG_F
|
|
.long VIKAPE_F
|
|
.long MOURN_F
|
|
.long FRA_F
|
|
.long A_HARD_F
|
|
.long GUIDO_F
|
|
.long GRE_F
|
|
.long PIG_F
|
|
.long kemp_f
|
|
.long CHEECH_F
|
|
.long MEL_F
|
|
.long WIZ_F
|
|
.long WEBBER_F
|
|
.long JOE_F
|
|
.long MXV_F
|
|
.long EDDIE_F
|
|
.long OURSL_F
|
|
.long BARD_F
|
|
.long WIL_F
|
|
.long ERI_F
|
|
.long SEA_F
|
|
.long MIKE_F
|
|
.long DIM_F
|
|
|
|
.long COW_F
|
|
.long ALIEN_F
|
|
.long pippin_f
|
|
.long CHK_F
|
|
plr_flesh_pal_tbl_end
|
|
|
|
#*****************************************************************************
|
|
*
|
|
* a9 = meter to display on which side? 0 or 1
|
|
* a11 = player number (0 - 3 )
|
|
|
|
GETUP_SIZE equ 80 ;102 ;174 ;99
|
|
MAX_TIME equ 6*TSEC
|
|
INV_MULT equ 256*GETUP_SIZE/MAX_TIME
|
|
ONSCR_X equ 173+1
|
|
OFFSCR_X equ 221
|
|
|
|
STRUCTPD
|
|
LONG IPTR_FRAME
|
|
LONG IPTR_GREEN
|
|
WORD DISPLAY_VAL
|
|
LONG BUTN_PROC
|
|
|
|
SUBR jumpball_meter
|
|
|
|
clr a0
|
|
move a0,@meter_maxxed
|
|
|
|
;Human players only!
|
|
.ref PSTATUS
|
|
.ref plyrproc_t
|
|
SLEEPK 11
|
|
.ref HALT
|
|
#lpx move @HALT,a0
|
|
jrz #contx
|
|
SLEEPK 1
|
|
jruc #lpx
|
|
#contx
|
|
|
|
|
|
; move @PSTATUS,a0
|
|
; btst a11,a0
|
|
; jaz SUCIDE
|
|
|
|
SLEEP 40
|
|
|
|
clr a0
|
|
move a0,*a13(DISPLAY_VAL)
|
|
|
|
;set our x-position based on PLYR_SIDE
|
|
movi [OFFSCR_X,0],a10
|
|
move a9,a9
|
|
jrnz #p2
|
|
|
|
dec a10
|
|
neg a10
|
|
#p2
|
|
|
|
.ref RECVRBLK,JMPBAL_R,JMPBAL_L
|
|
|
|
movi RECVRBLK,a2 ;* image (green bar)
|
|
movi [109,0],a1 ;y pos
|
|
movi 1801h,a3 ;z pos
|
|
callr #begin_obj
|
|
move a8,*a13(IPTR_GREEN),L
|
|
movi JMPBAL_R,a2 ;* image (frame)
|
|
move a9,a9
|
|
jrnz #p2_meter
|
|
movi JMPBAL_L,a2 ;* image (frame)
|
|
#p2_meter
|
|
movi [189,0],a1 ;y pos
|
|
movi 1800h,a3 ;z pos
|
|
callr #begin_obj
|
|
move a8,*a13(IPTR_FRAME),L
|
|
|
|
move a11,a10
|
|
sll 5,a10
|
|
addi plyrproc_t,a10
|
|
move *a10,a10,L
|
|
move a13,*a10(plyr_meter_proc),L
|
|
|
|
movi 200,a0
|
|
move a0,*a10(plyr_meter_time)
|
|
|
|
CREATE0 #ck_butns
|
|
move a0,*a13(BUTN_PROC),L
|
|
|
|
|
|
SUBR slide_offscr
|
|
|
|
;Don't allow a meter to come out for awhile (unless flung)
|
|
|
|
movk 10,a11
|
|
|
|
#offscr_loop
|
|
move a11,a11
|
|
jrz #update
|
|
dec a11
|
|
jruc #cont
|
|
#update
|
|
movi [OFFSCR_X,0],a0
|
|
callr #set_x
|
|
|
|
move *a10(plyr_meter_time),a14
|
|
jrnz #onscr
|
|
|
|
#cont
|
|
SLEEPK 1
|
|
jruc #offscr_loop
|
|
|
|
#exit_offscr
|
|
SLEEP 40
|
|
movk 10,a11
|
|
#exit_loop
|
|
movi [OFFSCR_X,0],a0
|
|
callr #set_x
|
|
SLEEPK 1
|
|
dsjs a11,#exit_loop
|
|
|
|
move *a13(IPTR_FRAME),a0,L
|
|
calla DELOBJ
|
|
move *a13(IPTR_GREEN),a0,L
|
|
calla DELOBJ
|
|
move *a13(BUTN_PROC),a0,L
|
|
calla KILL
|
|
DIE
|
|
|
|
#onscr
|
|
move a14,a11
|
|
|
|
movi GETUP_SIZE,a0
|
|
move a0,*a13(DISPLAY_VAL)
|
|
|
|
; MOVI 0BDH,A0 ;Meter announce sound
|
|
; CALLA triple_sound
|
|
|
|
movi 120,a6
|
|
move *a10(plyr_meter_time),a5
|
|
|
|
#onscr_loop
|
|
|
|
movi [ONSCR_X,0],a0
|
|
callr #set_x
|
|
|
|
move *a10(plyr_meter_time),a7
|
|
|
|
movi GETUP_SIZE,a0
|
|
mpyu a0,a7 ;* GETUP_SIZE
|
|
divu a11,a7 ;/ INITIAL GETUP TIME
|
|
|
|
move *a13(DISPLAY_VAL),a0
|
|
move a0,a2
|
|
move a0,a4
|
|
cmp a0,a7 ;has getup been incremented?
|
|
jrle #ok1
|
|
|
|
move a7,a11
|
|
movi GETUP_SIZE,a0
|
|
mpyu a0,a7 ;* GETUP_SIZE
|
|
divu a11,a7 ;/ INITIAL GETUP TIME
|
|
|
|
move a7,a3
|
|
sub a2,a3
|
|
cmpi 10,a3
|
|
jrlt #ok0
|
|
addk 9,a2
|
|
move a2,a7
|
|
move a7,a3
|
|
sub a4,a3
|
|
#ok0
|
|
srl 1,a3
|
|
sub a3,a7
|
|
|
|
#ok1
|
|
|
|
subk 1,a6
|
|
jrnz #dont_bother
|
|
move *a10(plyr_meter_time),a0
|
|
sub a0,a5
|
|
|
|
#dont_bother
|
|
|
|
PUSH a5,a6
|
|
callr #update_meter
|
|
PULL a5,a6
|
|
|
|
move a7,a7
|
|
jrz #exit_offscr
|
|
move @ditch_meter,a0
|
|
jrnz #exit_offscr
|
|
|
|
|
|
PUSHP a5,a6
|
|
SLEEPK 1
|
|
PULLP a5,a6
|
|
jruc #onscr_loop
|
|
|
|
**********
|
|
#ck_butns
|
|
|
|
movk 20,a8
|
|
#lp1 move *a10(plyr_meter_time),a0
|
|
subk 6,a0
|
|
move a0,*a10(plyr_meter_time)
|
|
SLEEPK 1
|
|
dsj a8,#lp1
|
|
|
|
#ck_butns2
|
|
.ref PCNT
|
|
move @PCNT,a0
|
|
ANDK 1,a0
|
|
jrnz #no
|
|
|
|
move *a10(plyr_meter_time),a0
|
|
inc a0
|
|
cmpi 155,a0
|
|
jrge #stop2
|
|
move a0,*a10(plyr_meter_time)
|
|
;DJT Start
|
|
#no
|
|
move @PSTATUS,a14
|
|
btst a11,a14
|
|
jrnz #conta
|
|
;Jumpball player is not in game
|
|
;Check teammate 0 or 3
|
|
movk 1,a0
|
|
xor a11,a0
|
|
btst a0,a14
|
|
jrnz #getbut
|
|
;drone
|
|
srl 1,a0
|
|
sll 4,a0
|
|
neg a0
|
|
.ref t1ispro
|
|
addi t1ispro+16,a0,L
|
|
move *a0,a14
|
|
movi 190,a0 ;!!! regular
|
|
move a14,a14
|
|
jrn #drnchk
|
|
movi 260,a0 ;!!! pro
|
|
move a14,a14
|
|
jrp #drnchk
|
|
movi 390,a0 ;!!! champ
|
|
#drnchk
|
|
;DJT End
|
|
.ref RNDPER
|
|
calla RNDPER
|
|
jrhi #yes
|
|
jruc #no2
|
|
|
|
#conta move a11,a0
|
|
.ref get_but_val_down
|
|
#getbut calla get_but_val_down
|
|
jrz #no2
|
|
#yes
|
|
move *a10(plyr_meter_time),a0
|
|
subk 4,a0
|
|
jrz #stop
|
|
jrn #stop
|
|
move a0,*a10(plyr_meter_time)
|
|
#no2
|
|
|
|
SLEEPK 1
|
|
jruc #ck_butns2
|
|
|
|
#stop
|
|
clr a0
|
|
#stop2
|
|
move a0,*a10(plyr_meter_time)
|
|
|
|
; move a0,a0
|
|
; jrnz #notmax
|
|
|
|
BSSX meter_maxxed,16
|
|
move @meter_maxxed,a0
|
|
jrnz #notmax
|
|
move a11,@meter_maxxed
|
|
|
|
#notmax
|
|
|
|
;Killed by creating process
|
|
SLEEP 7fffh
|
|
|
|
DIE
|
|
|
|
|
|
|
|
**********
|
|
SUBRP #set_x
|
|
|
|
move a9,a9
|
|
jrnz #p22
|
|
neg a0
|
|
#p22
|
|
; addi [200-1,0],a0 ;center of screen
|
|
addi [0afh,0],a0 ;center of screen
|
|
move a13,a14
|
|
addi IPTR_FRAME,a14
|
|
move *a14,a8,L
|
|
move *a8(OXVAL),a1,L
|
|
sub a1,a0
|
|
sra 2,a0
|
|
movk 3-1,a1
|
|
#lp move *a14+,a8,L
|
|
move *a8(OXVAL),a2,L
|
|
add a0,a2
|
|
move a2,*a8(OXVAL),L
|
|
dsj a1,#lp
|
|
rets
|
|
|
|
|
|
**********
|
|
SUBRP #begin_obj
|
|
|
|
movi [200-1,0],a0 ;x pos
|
|
add a10,a0
|
|
|
|
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
|
|
clr a5 ;object ID
|
|
clr a6 ;x vel
|
|
clr a7 ;y vel
|
|
calla BEGINOBJ2
|
|
rets
|
|
|
|
|
|
**********
|
|
SUBRP #update_meter
|
|
|
|
move *a13(DISPLAY_VAL),a0
|
|
add a0,a7
|
|
srl 1,a7
|
|
move a7,*a13(DISPLAY_VAL)
|
|
move a7,a1
|
|
|
|
neg a1
|
|
addi GETUP_SIZE,a1
|
|
jrp #ok
|
|
clr a1
|
|
#ok movi GETUP_SIZE,a0
|
|
cmp a0,a1 ;meter can't be taller
|
|
jrle #ok2 ;than GETUP_SIZE pixels
|
|
move a0,a1
|
|
#ok2 move *a13(IPTR_GREEN),a8,L
|
|
|
|
MOVI GETUP_SIZE,A2
|
|
SUB A1,A2
|
|
MOVE A2,*A8(OSIZEY)
|
|
MOVI RECVRBLK,A0
|
|
MOVE *A0(ICTRL),A5
|
|
SRL 12,A5
|
|
MOVE A1,A3
|
|
MPYU A5,A3
|
|
MOVE *A0(ISIZEX),A5
|
|
MPYU A5,A3
|
|
MOVE *A0(ISAG),A0,L
|
|
ADD A3,A0
|
|
MOVE A0,*A8(OSAG),L
|
|
|
|
rets
|
|
|
|
#*****************************************************************************
|
|
*
|
|
* a0 = # ticks to add
|
|
* a13 = * wrestler process
|
|
|
|
SUBR inc_getup_time
|
|
|
|
PUSH a14
|
|
move *a13(plyr_meter_time),a14
|
|
cmpi 20,a14
|
|
jrlt #exit
|
|
add a0,a14
|
|
move a14,*a13(plyr_meter_time)
|
|
#exit
|
|
PULL a14
|
|
rets
|
|
|
|
|
|
;#*****************************************************************************
|
|
;*
|
|
;* makes your getup meter go away if you've got one out.
|
|
;
|
|
; SUBR ditch_getup_meter_a9
|
|
; PUSH a13
|
|
; move a9,a13
|
|
; callr ditch_getup_meter
|
|
; PULL a13
|
|
; rets
|
|
;
|
|
; SUBR ditch_getup_meter
|
|
;
|
|
; move *a13(GETUP_TIME),a0
|
|
; jrz #cont
|
|
; move *a13(PLYR_DIZZY),a0
|
|
; jrnz #cont
|
|
;
|
|
;;This guy has a getup meter on screen and is running out of control!
|
|
;;Cause getup meter to slide off screen.
|
|
;
|
|
; move *a13(METER_PROC),a0,L
|
|
; jrz #cont ;skip if we don't have a 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
|
|
;
|
|
;#cont rets
|
|
|
|
|
|
|
|
|
|
|
|
;********************************
|
|
;* Spark from flaming ball (Process)
|
|
;* A8/A11=*Ball obj
|
|
;
|
|
; SUBR ball_spark
|
|
;
|
|
; movi spark_l,a9
|
|
;
|
|
; move *a11(OXVEL),a6,L
|
|
; sra 2,a6
|
|
; movk >a,a0
|
|
; callr rnd
|
|
; subk 5,a0
|
|
; sll 14,a0 ;XVel
|
|
; add a0,a6
|
|
;
|
|
;; movk 3,a0
|
|
;; callr rnd
|
|
;; jrnz #xnorm
|
|
;; sll 2,a6 ;*4
|
|
;#xnorm
|
|
;
|
|
; move *a11(OYVEL),a7,L
|
|
; movk >3,a0
|
|
; callr rnd
|
|
; sll 16,a0 ;YVel
|
|
; neg a0
|
|
; add a0,a7
|
|
;
|
|
;
|
|
;; move *a11(OYVEL),a7,L
|
|
;; sra 2,a7
|
|
;; movk >a,a0
|
|
;; callr rnd
|
|
;; subk 5,a0
|
|
;; sll 15,a0 ;YVel
|
|
;; add a0,a7
|
|
;; neg a7
|
|
;;
|
|
;; movk 3,a0
|
|
;; callr rnd
|
|
;; jrnz #ynorm
|
|
;; sll 2,a7 ;*4
|
|
;#ynorm
|
|
; move *a8(OZPOS),a3
|
|
; movk 3,a0
|
|
; callr rnd
|
|
; subk 2,a0
|
|
; add a0,a3 ;-2 to 1
|
|
;
|
|
; move *a8(OXPOS),a0
|
|
;; move *a8(OSIZEX),a2
|
|
;; srl 1,a2 ;/2
|
|
;; add a2,a0
|
|
; move *a8(OXANI+16),a2
|
|
; add a2,a0
|
|
; move *a8(OYPOS),a1
|
|
; move *a8(OSIZEY),a2
|
|
; srl 1,a2 ;/2
|
|
; add a2,a1
|
|
;
|
|
; sll 16,a0
|
|
; sll 16,a1
|
|
; movi spark1,a2
|
|
; movi DMAWNZ|M_3D|M_NOSCALE,a4
|
|
; movi CLSDEAD,a5
|
|
; calla BEGINOBJ2
|
|
;
|
|
; move *a11(OZVEL),a2,L
|
|
; sra 2,a2 ;/4
|
|
; movk >f,a0
|
|
; callr rnd
|
|
; subk 7,a0
|
|
; sll 14,a0
|
|
; add a0,a2
|
|
; move a2,*a8(OZVEL),L
|
|
;
|
|
;
|
|
; movk 3,a11
|
|
;; callr rnd
|
|
;; addk 1,a0
|
|
;; move a0,a11
|
|
; jruc #strt
|
|
;
|
|
;#lp dsj a10,#noani
|
|
;#strt
|
|
; move a11,a10
|
|
; move *a9,a0,L
|
|
; jrz #die ;noani
|
|
; addk 32,a9
|
|
;
|
|
; move *a8(OCTRL),a1
|
|
; calla obj_aniq
|
|
;#noani
|
|
; SLEEPK 3
|
|
; move *a8(OYVEL),a2,L
|
|
; addi GRAV*2,a2
|
|
; move a2,*a8(OYVEL),L
|
|
; jrn #lp ;Going up?
|
|
; move *a8(OYVAL),a1,L
|
|
; jrlt #lp ;Above gnd?
|
|
; clr a1
|
|
; move a1,*a8(OYVAL),L
|
|
;
|
|
;; move @HCOUNT,a14
|
|
;; sll 32-2,a14
|
|
;; jrz #die
|
|
;; neg a2
|
|
;; sra 3,a2
|
|
;; move a2,*a8(OYVEL),L
|
|
;; cmpi -(GRAV*2),a2
|
|
;; jrlt #lp
|
|
;;
|
|
;
|
|
;#die
|
|
; clr a0
|
|
; move a0,*a8(OXVEL),L
|
|
; move a0,*a8(OYVEL),L
|
|
; move a0,*a8(OZVEL),L
|
|
;; SLEEPK 4
|
|
;
|
|
; jauc DELOBJDIE
|
|
;
|
|
;
|
|
;spark_l
|
|
; .long spark1
|
|
; .long spark2
|
|
; .long spark3
|
|
; .long spark4
|
|
; .long spark5
|
|
; .long spark1
|
|
; .long spark2
|
|
; .long spark3
|
|
; .long spark4
|
|
; .long spark5
|
|
; .long spark1
|
|
; .long spark2
|
|
; .long spark3
|
|
; .long spark4
|
|
; .long spark5,0
|
|
|
|
; .endif
|
|
|
|
; movi STATIC_p,a8
|
|
; movi cycram,a9
|
|
; movi [1,62],a10 ;1st,last color
|
|
; movk 5,a11 ;Rate
|
|
; CREATE CYCPID,COLCYC
|
|
|
|
;---------------------------------------
|
|
|
|
.if 0 ;vid clips .if 0
|
|
|
|
jruc #x ;Skip clips for ROMKIT
|
|
|
|
calla READ_DIP
|
|
btst DPNOVIDCLIPS_B,a0
|
|
jrnz #x ;Clips off?
|
|
|
|
|
|
calla system_savegame
|
|
|
|
movi >12345678,a0
|
|
move a0,@clipsrunning,L
|
|
|
|
|
|
movk INPLYRINFO,a0
|
|
move a0,@GAMSTATE
|
|
|
|
clr a0
|
|
move a0,@dtype ;2D
|
|
|
|
move a0,@WORLDTLX,L
|
|
move a0,@WORLDTLY,L
|
|
|
|
JSRP scrn_scaleininit
|
|
|
|
movi half_mod,a0
|
|
move a0,@BAKMODS,L
|
|
calla BGND_UD1
|
|
SLEEPK 2
|
|
|
|
JSRP scrn_scalein
|
|
|
|
; movi 4<<10+4<<5+4,a0
|
|
clr a0
|
|
move a0,@IRQSKYE ;background color
|
|
|
|
|
|
CREATE0 plyr_jscrowdsnda
|
|
|
|
SLEEPK 10
|
|
|
|
; SOUND1 report_snd
|
|
|
|
movi -1,a0
|
|
move a0,@dpageflip ;No erasure
|
|
|
|
#test
|
|
movk 2,a5 ;# clips to show
|
|
clr a6
|
|
#lp
|
|
move a6,a0
|
|
addk 1,a6
|
|
sll 5,a0
|
|
addi #xy_t,a0
|
|
move *a0+,a10,L ;XY
|
|
|
|
move @clipbits,a2,L
|
|
cmpi >3ffff,a2 ;18 bits
|
|
jrlo #ok
|
|
clr a2
|
|
#ok
|
|
#crlp movk 18-1,a0 ;Total # clips
|
|
calla RNDRNG0
|
|
btst a0,a2
|
|
jrnz #crlp ;Have already shown?
|
|
|
|
movk 1,a14 ;Set bit
|
|
sll a0,a14
|
|
or a14,a2
|
|
move a2,@clipbits,L
|
|
|
|
.if CLIPTEST
|
|
clr a0
|
|
.endif
|
|
|
|
sll 5,a0
|
|
addi #mv_t,a0
|
|
move *a0,a8,L
|
|
|
|
clr a9
|
|
PUSHP a5,a6
|
|
PUSHP a8
|
|
|
|
move a10,a0
|
|
sll 32-12,a0
|
|
srl 7,a0 ;X
|
|
move a10,a1
|
|
srl 12,a1
|
|
sll 16,a1 ;Y
|
|
movi scobars,a2
|
|
movi 500,a3 ;Z
|
|
movi DMAWNZ|M_NOCOLL|M_SCRNREL,a4
|
|
movi CLSDEAD,a5
|
|
clr a6
|
|
clr a7
|
|
calla BEGINOBJ2
|
|
SLEEPK 30
|
|
calla DELOBJA8
|
|
|
|
PULLP a8
|
|
PUSHP a10
|
|
|
|
.ref movie_run
|
|
|
|
JSRP movie_run
|
|
PULLP a10
|
|
|
|
PULLP a5,a6
|
|
|
|
dsj a5,#lp
|
|
|
|
.if CLIPTEST
|
|
jruc #test ;Infinite loop
|
|
.endif
|
|
|
|
movi TSEC*1+30,a10
|
|
#butlp
|
|
SLEEPK 1
|
|
.ref get_all_buttons_cur
|
|
calla get_all_buttons_cur
|
|
move a0,a0
|
|
jrnz #exit1
|
|
dsj a10,#butlp
|
|
#exit1
|
|
|
|
calla display_blank
|
|
|
|
clr a0
|
|
move a0,@clipsrunning,L
|
|
|
|
calla system_restoregame
|
|
|
|
#x RETP
|
|
|
|
|
|
plyr_jscrowdsnda
|
|
CREATE0 scrms
|
|
SLEEP 40
|
|
SOUND1 cheer1_snd
|
|
SOUND1 cheer2_snd
|
|
SLEEP 35
|
|
SOUND1 cheer1_snd
|
|
SOUND1 cheer2_snd
|
|
; SLEEP 24
|
|
; SOUND1 cheer1_snd
|
|
; SOUND1 cheer2_snd
|
|
DIE
|
|
|
|
scrms
|
|
SOUND1 scrm1_snd
|
|
SLEEP 15
|
|
SOUND1 scrm2_snd
|
|
SLEEP 15
|
|
SOUND1 scrm3_snd
|
|
SLEEP 15
|
|
SOUND1 scrm4_snd
|
|
SLEEP 15
|
|
DIE
|
|
|
|
.ref scrm1_snd,scrm2_snd,scrm3_snd,scrm4_snd
|
|
|
|
|
|
half_mod
|
|
.long htclipsBMOD
|
|
.word 0,0
|
|
.long 0
|
|
|
|
#xy_t .long (88+52*512)*8
|
|
; .long (212+52*512)*8
|
|
; .long (88+140*512)*8
|
|
.long (212+140*512)*8
|
|
#mv_t
|
|
.long V4C_F
|
|
.long V5C_F
|
|
.long V6C_F
|
|
.long V8C_F
|
|
.long V10C_F
|
|
.long V11C_F
|
|
.long V13C_F
|
|
.long V14C_F
|
|
.long V15C_F
|
|
.long V17C_F
|
|
.long V18C_F
|
|
.long V19C_F
|
|
.long V20C_F
|
|
.long V22C_F
|
|
.long V23C_F
|
|
.long VNEW2_F
|
|
.long V1C_F
|
|
.long V3C_F
|
|
|
|
; .long V7C_F
|
|
; .long VNEW1_F
|
|
|
|
|
|
.endif ;vid clips .if 0
|
|
|
|
;--------------------
|
|
|
|
.if 0 ;plyr smoketrail .if 0
|
|
|
|
#*******************************
|
|
* Smoke trail (Process)
|
|
* A8=*Src obj
|
|
* A10=*Plyr process
|
|
|
|
SUBR plyr_smoketrail
|
|
|
|
movk 15,a11
|
|
#lp CREATE0 plyr_smokepuff
|
|
SLEEPK 4
|
|
dsj a11,#lp
|
|
|
|
DIE
|
|
|
|
#*******************************
|
|
* Smoke trail (Process)
|
|
* A8=*Src obj
|
|
* A10=*Plyr process
|
|
|
|
SUBR plyr_smoketrail2
|
|
|
|
movk 20,a11
|
|
#lp CREATE0 plyr_smokepuff
|
|
SLEEPK 1
|
|
dsj a11,#lp
|
|
|
|
DIE
|
|
|
|
|
|
#*******************************
|
|
* Smoke trail puff (Process)
|
|
* A8=*Src obj
|
|
* A10=*Plyr process
|
|
|
|
SUBRP plyr_smokepuff
|
|
|
|
move *a10(plyr_dir),a10
|
|
srl 2,a10
|
|
|
|
move *a8(OZPOS),a3
|
|
movk 3,a0
|
|
callr rnd
|
|
subk 2,a0
|
|
add a0,a3 ;-2 to 1
|
|
|
|
movk 3,a0
|
|
callr rnd
|
|
sll 5,a0 ;*32
|
|
addi smoke_t,a0
|
|
move *a0,a9,L
|
|
|
|
move *a8(OXVEL),a6,L
|
|
move *a8(OYVEL),a7,L
|
|
sra 2,a6 ;/4
|
|
sra 2,a7
|
|
|
|
move *a8(OXPOS),a0
|
|
move *a8(OSIZEX),a2
|
|
srl 1,a2 ;/2
|
|
add a2,a0
|
|
move *a8(OYPOS),a1
|
|
move *a8(OSIZEY),a2
|
|
srl 1,a2 ;/2
|
|
add a2,a1
|
|
sll 4,a10 ;*16
|
|
addi mslstxy_t,a10
|
|
move *a10(8*16),a2
|
|
add a2,a0 ;+X offset
|
|
move *a10,a2
|
|
add a2,a1 ;+YO
|
|
sll 16,a0 ;X
|
|
sll 16,a1 ;Y
|
|
movi CLDB1ORNG,a2
|
|
movi DMAWNZ|M_3D|M_NOCOLL,a4 ;No collisions
|
|
movi CLSDEAD,a5
|
|
calla BEGINOBJ2
|
|
movi scale50_t,a0
|
|
move a0,*a8(ODATA_p),L
|
|
SLEEPK 3
|
|
jauc FRQDELDIE
|
|
|
|
mslstxy_t
|
|
.word 12,12,11,10,8,6,3,1 ;Y
|
|
.word 0,-1,-3,-6,-8,-10,-11,-12 ;X
|
|
.word -12,-12,-11,-10,-8,-6,-3,-1
|
|
.word 0,1,3,6,8,10,11,12
|
|
.word 12,12,11,10,8,6,3,1
|
|
|
|
.endif ;plyr smoketrail .if 0
|
|
|
|
;---------------------------------------
|
|
|
|
.if 0 ;NOP out free throw, plyr alignment dots
|
|
|
|
#*******************************
|
|
* Control players for free throws (Process)
|
|
* A11=Team who scored (0=2, !0=1)
|
|
|
|
STRUCTPD
|
|
WORD pft_pball ;Plyr # (0-3) who gets ball
|
|
WORD pft_pball2 ;P# who gets ball passed to him
|
|
APTR pft_bbobj ;*Backboard/crowd object
|
|
|
|
|
|
SUBR plyr_freethrow
|
|
|
|
jruc plyr_takeoutball
|
|
|
|
movi TSEC,a10 ;>Let shot finish
|
|
#lp movi -1,a0
|
|
move a0,@ballpnum
|
|
SLEEPK 1
|
|
dsj a10,#lp
|
|
|
|
|
|
movi [20,0],a0
|
|
movi [20,0],a1
|
|
; movi ftbackbd,a2
|
|
movi [500,0],a3 ;Z
|
|
movi DMAWNZ|M_NOCOLL|M_SCRNREL,a4
|
|
movi CLSDEAD,a5
|
|
clr a6
|
|
clr a7
|
|
calla BEGINOBJ2
|
|
move a8,*a13(pft_bbobj),L
|
|
|
|
|
|
movk 1,a0
|
|
callr plyr_setac
|
|
|
|
clr a2
|
|
movk 2,a9 ;A9=1st p# of team on defense
|
|
movi plyrproc_t,a0
|
|
move a11,a11
|
|
jrz #t1
|
|
movk 2,a2
|
|
clr a9
|
|
addi 32*2,a0
|
|
#t1
|
|
move *a0+,a8,L ;A8=*Proc of plyr who gets ball
|
|
move *a0+,a7,L
|
|
move *a8(plyr_balldist),a0
|
|
move *a7(plyr_balldist),a1
|
|
cmp a1,a0
|
|
jrle #1st ;Closer?
|
|
move a7,a8
|
|
addk 1,a2 ;2nd in team
|
|
#1st
|
|
move a2,*a13(pft_pball)
|
|
XORK 1,a2
|
|
move a2,*a13(pft_pball2)
|
|
|
|
|
|
movi TSEC*4,a10 ;>Get ball
|
|
|
|
#gblp
|
|
movi -1,a0
|
|
move a0,@ballpnum
|
|
SLEEPK 1
|
|
|
|
callr plyrtob_moveo3
|
|
|
|
move @ballobj_p,a3,L
|
|
move *a3(OXPOS),a0
|
|
addk 6,a0
|
|
move *a3(OZPOS),a1
|
|
move *a13(pft_pball),a2
|
|
callr plyrtob_seekxy
|
|
|
|
move @ballpnum,a0
|
|
jrn #gbcnt
|
|
cmp a0,a2
|
|
jreq #gotball
|
|
|
|
#gbcnt dsj a10,#gblp
|
|
|
|
#gotball
|
|
move *a13(pft_pball),a0
|
|
move a0,@ballpnum
|
|
|
|
|
|
movi TSEC*3,a10 ;>Run out of bounds
|
|
|
|
#outlp
|
|
SLEEPK 1
|
|
|
|
callr plyrtob_moveo3
|
|
|
|
movi -370,a0
|
|
move a11,a11
|
|
jrz #outl ;Team2 on def
|
|
neg a0
|
|
#outl addi WRLDMID,a0
|
|
move a0,a3
|
|
movi CZMID-20,a1
|
|
move *a13(pft_pball),a2
|
|
callr plyrtob_seekxy
|
|
jrz #outofb
|
|
|
|
; move *a8(PA8),a2,L ;Get * obj
|
|
; move *a2(OXPOS),a0
|
|
; move *a2(OXANI+16),a14
|
|
; add a14,a0
|
|
; abs a0
|
|
; abs a3
|
|
; sub a0,a3
|
|
; subk 20,a3
|
|
; jrlt #outofb
|
|
|
|
dsj a10,#outlp
|
|
|
|
#outofb
|
|
movi TSEC*3,a10 ;>Wait for other 3 to get in place
|
|
|
|
#wtlp SLEEPK 1
|
|
callr plyrtob_moveo3
|
|
jrz #inpos
|
|
dsj a10,#wtlp
|
|
#inpos
|
|
|
|
move *a13(pft_pball),a10 ;>Pass with turbo
|
|
sll 4,a10 ;*16
|
|
addi P1CTRL,a10
|
|
movi >60,a0
|
|
move a0,*a10
|
|
|
|
SLEEPK 10
|
|
clr a0
|
|
move a0,*a10
|
|
|
|
SLEEP 40
|
|
|
|
clr a0
|
|
callr plyr_setac
|
|
|
|
move *a13(pft_bbobj),a0,L
|
|
calla DELOBJ
|
|
|
|
DIE
|
|
|
|
|
|
********************************
|
|
* Start an alignment dot for a player
|
|
* A13=*Plyr proc
|
|
* Trashes scratch
|
|
|
|
SUBRP plyr_getgndaligndot
|
|
|
|
PUSH a2,a3,a4,a5,a6,a7,a8
|
|
|
|
clr a0 ;X
|
|
clr a1 ;Y
|
|
movi CZMIN,a3 ;Z
|
|
movi #alignimg_t,a2
|
|
movi >800c|M_NOCOLL|M_3D|M_NOSCALE,a4
|
|
movi CLSDEAD,a5
|
|
clr a6
|
|
clr a7
|
|
calla BEGINOBJ
|
|
movi >101,a0
|
|
move a0,*a8(OCONST)
|
|
movi -300,a0
|
|
move a0,*a8(OMISC) ;Z offset
|
|
|
|
move a8,*a13(plyr_aligndot_p),L
|
|
|
|
PULL a2,a3,a4,a5,a6,a7,a8
|
|
rets
|
|
|
|
|
|
********************************
|
|
* Set alignment dot to players position
|
|
* A8=*Plyr obj
|
|
* A13=*Plyr proc
|
|
* Trashes scratch
|
|
|
|
SUBRP plyr_setgndaligndot
|
|
|
|
PUSH a2,a3,a4,a5,a6,a7
|
|
|
|
callr anipt_getsclxy
|
|
move *a8(OXVAL),a14,L
|
|
add a14,a0
|
|
move *a13(plyr_aligndot_p),a2,L
|
|
move a0,*a2(OXVAL),L
|
|
|
|
move *a8(OZPOS),a14
|
|
addi 300,a14
|
|
move a14,*a2(OZPOS)
|
|
|
|
PULL a2,a3,a4,a5,a6,a7
|
|
rets
|
|
|
|
.endif
|
|
|
|
;---------------------------------------
|
|
|
|
.if 0 ;NOP out board shatter, shards
|
|
|
|
#*******************************
|
|
* Shatter backboard (Process)
|
|
|
|
SUBRP board_shatter
|
|
|
|
;FIX!!!
|
|
DIE
|
|
|
|
SOUND1 explode_snd
|
|
|
|
SOUND1 ohmy
|
|
|
|
CREATE0 board_glssnd
|
|
movk 10,a1
|
|
move a1,*a0(PTIME)
|
|
|
|
move @ballpnumshot,a11
|
|
movk 10,a8
|
|
move a11,a0
|
|
subk 2,a0
|
|
jrnz #n0
|
|
addk 1,a0
|
|
#n0 move a0,@bbshatter
|
|
#shlp
|
|
movk 13,a2
|
|
#shlp2 CREATE0 board_shard
|
|
dsj a2,#shlp2
|
|
SLEEPK 1
|
|
dsj a8,#shlp
|
|
|
|
DIE
|
|
|
|
board_glssnd
|
|
;Turmell
|
|
SLEEPK 10
|
|
SOUND1 explode_snd
|
|
SLEEPK 20
|
|
SOUND1 glass_snd
|
|
DIE
|
|
|
|
********************************
|
|
* Flying shard of glass (Process)
|
|
* A11=Plyr # who shot the ball (0-3)
|
|
|
|
STRUCTPD
|
|
APTR shd_ani1st_p ;*1st ani_l pos
|
|
|
|
SUBRP board_shard
|
|
|
|
movk 10,a0
|
|
callr rndrng0
|
|
sll 5,a0 ;*32
|
|
addi #shard_t,a0
|
|
move *a0,a9,L
|
|
move *a9+,a0,L
|
|
PUSHP a0
|
|
move a9,*a13(shd_ani1st_p),L
|
|
|
|
movk >f,a0
|
|
callr rnd
|
|
subk 5,a0
|
|
move a0,a6
|
|
sll 13,a6 ;XVel
|
|
|
|
movk 3,a0
|
|
callr rnd
|
|
jrnz #xnorm
|
|
sll 2,a6 ;*4
|
|
#xnorm
|
|
movk >f,a0
|
|
callr rnd
|
|
subk 6,a0
|
|
move a0,a7
|
|
sll 14,a7 ;YVel
|
|
|
|
movk 3,a0
|
|
callr rnd
|
|
jrnz #ynorm
|
|
sll 2,a7 ;*4
|
|
#ynorm
|
|
|
|
movi 36,a0
|
|
callr rndrng0
|
|
move a0,a1
|
|
neg a1 ;Y offset
|
|
|
|
movi HOOPLX-13,a0
|
|
subk 2,a11
|
|
jrge #p23
|
|
movi HOOPRX+13,a0
|
|
neg a6
|
|
#p23
|
|
sll 16,a0
|
|
addi HOOPY,a1
|
|
sll 16,a1
|
|
movi shard1_1,a2
|
|
movi CZMID,a3
|
|
movi DMAWNZ|M_3D|M_NOSCALE,a4
|
|
movi CLSDEAD,a5
|
|
calla BEGINOBJ2
|
|
|
|
movk 7,a0
|
|
callr rnd
|
|
subk 4,a0
|
|
sll 16,a0
|
|
move a0,*a8(OZVEL),L
|
|
|
|
movk 1,a0
|
|
callr rnd
|
|
addk 1,a0
|
|
move a0,a11
|
|
jruc #strt
|
|
|
|
#lp dsj a10,#noani
|
|
#strt
|
|
move a11,a10
|
|
; move *a9+,a10
|
|
; jrz #x
|
|
move *a9+,a0,L
|
|
jrnz #ani
|
|
move *a13(shd_ani1st_p),a9,L
|
|
move *a9+,a0,L
|
|
#ani
|
|
move *a8(OCTRL),a1
|
|
calla obj_aniq
|
|
#noani
|
|
SLEEPK 1
|
|
move *a8(OYVEL),a2,L
|
|
addi GRAV,a2
|
|
move a2,*a8(OYVEL),L
|
|
jrn #lp ;Going up?
|
|
move *a8(OYVAL),a1,L
|
|
jrlt #lp ;Above gnd?
|
|
clr a1
|
|
move a1,*a8(OYVAL),L
|
|
move @HCOUNT,a14
|
|
sll 32-2,a14
|
|
jrz #shatter
|
|
neg a2
|
|
sra 2,a2
|
|
move a2,*a8(OYVEL),L
|
|
cmpi -(GRAV*2),a2
|
|
jrlt #lp
|
|
|
|
#shatter
|
|
clr a0
|
|
move a0,*a8(OXVEL),L
|
|
move a0,*a8(OYVEL),L
|
|
move a0,*a8(OZVEL),L
|
|
|
|
; movk 3,a0
|
|
; callr rnd
|
|
; sll 5,a0 ;*32
|
|
; addi #shat_t,a0
|
|
; move *a0,a9,L
|
|
PULLP a9
|
|
movk 3,a10
|
|
jruc #strt2
|
|
|
|
#lp2
|
|
; dsj a10,#noani2
|
|
; movk 2,a10
|
|
move *a8(OCTRL),a1
|
|
calla obj_aniq
|
|
#noani2
|
|
SLEEPK 1
|
|
#strt2 move *a9+,a0,L
|
|
jrnz #lp2
|
|
|
|
|
|
jauc DELOBJDIE
|
|
|
|
|
|
#shard_t
|
|
.long s1_t,s2_t,s3_t,s4_t,s5_t,s6_t,s7_t,s8_t
|
|
.long s1_t,s6_t,s8_t
|
|
|
|
s1_t
|
|
.long st4_t
|
|
.long shard1_1
|
|
.long shard1_2
|
|
.long shard1_3
|
|
.long shard1_4
|
|
.long shard1_5
|
|
.long shard1_6
|
|
.long shard1_7
|
|
.long shard1_8
|
|
.long 0
|
|
s2_t
|
|
.long st3_t
|
|
.long shard2_1
|
|
.long shard2_2
|
|
.long shard2_3
|
|
.long shard2_4
|
|
.long shard2_5
|
|
.long shard2_6
|
|
.long shard2_7
|
|
.long shard2_8
|
|
.long 0
|
|
s3_t
|
|
.long st2_t
|
|
.long shard3_1
|
|
.long shard3_2
|
|
.long shard3_3
|
|
.long shard3_4
|
|
.long shard3_5
|
|
.long shard3_6
|
|
.long shard3_7
|
|
.long shard3_8
|
|
.long shard3_9
|
|
.long shard3_10
|
|
.long shard3_11
|
|
.long shard3_12
|
|
.long 0
|
|
s4_t
|
|
.long st1_t
|
|
.long shard4_1
|
|
.long shard4_2
|
|
.long shard4_3
|
|
.long shard4_4
|
|
.long shard4_5
|
|
.long shard4_6
|
|
.long shard4_7
|
|
.long shard4_8
|
|
.long shard4_9
|
|
.long shard4_10
|
|
.long 0
|
|
s5_t
|
|
.long st2_t
|
|
.long shard5_1
|
|
.long shard5_2
|
|
.long shard5_3
|
|
.long shard5_4
|
|
.long shard5_5
|
|
.long shard5_6
|
|
.long shard5_7
|
|
.long shard5_8
|
|
.long 0
|
|
s6_t
|
|
.long st4_t
|
|
.long shard6_1
|
|
.long shard6_2
|
|
.long shard6_3
|
|
.long shard6_4
|
|
.long shard6_5
|
|
.long shard6_6
|
|
.long shard6_7
|
|
.long shard6_8
|
|
.long 0
|
|
s7_t
|
|
.long st2_t
|
|
.long shard7_1
|
|
.long shard7_2
|
|
.long shard7_3
|
|
.long shard7_4
|
|
.long shard7_5
|
|
.long shard7_6
|
|
.long shard7_7
|
|
.long shard7_8
|
|
.long shard7_9
|
|
.long shard7_10
|
|
.long 0
|
|
s8_t
|
|
.long st4_t
|
|
.long shard8_1
|
|
.long shard8_2
|
|
.long shard8_3
|
|
.long shard8_4
|
|
.long shard8_5
|
|
.long shard8_6
|
|
.long shard8_7
|
|
.long shard8_8
|
|
.long shard8_9
|
|
.long shard8_10
|
|
.long 0
|
|
|
|
;#shat_t
|
|
; .long st1_t,st2_t,st3_t,st4_t
|
|
st1_t .long shat1_1
|
|
.long shat1_2
|
|
.long shat1_3
|
|
.long shat1_4
|
|
.long shat1_5
|
|
.long 0
|
|
st2_t .long shat2_1
|
|
.long shat2_2
|
|
.long shat2_3
|
|
.long shat2_4
|
|
.long shat2_5
|
|
.long 0
|
|
st3_t .long shat3_1
|
|
.long shat3_2
|
|
.long shat3_3
|
|
.long shat3_4
|
|
.long shat3_5
|
|
.long 0
|
|
st4_t .long shat4_1
|
|
.long shat4_2
|
|
.long shat4_3
|
|
.long shat4_4
|
|
.long shat4_5
|
|
.long 0
|
|
|
|
.endif
|
|
|
|
;---------------------------------------
|
|
|
|
|
|
.end
|