historicalsource
/
nba-jam
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
nba-jam/SELECT2.ASM

5544 lines
110 KiB
NASM
Executable File
Raw Permalink Blame History

This file contains invisible Unicode characters!

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

****************************************************************
*
* Owner: JOHNSON
*
* Software: Jeff Johnson/Jamie Rivett
* Initiated: ?
*
* Modified: ?
*
* COPYRIGHT (C) 1992 WILLIAMS ELECTRONICS GAMES, INC.
*
*.Last mod - 1/15/93 15:29
****************************************************************
.file "select2.asm"
.title "name & team selection"
.width 132
.option b,d,l,t
.mnolist
.include "mproc.equ"
.include "disp.equ"
.include "sys.equ"
.include "gsp.equ"
.include "game.equ"
.include "audit.equ"
.include "macros.hdr"
.include "world.equ"
.include "logos.tbl"
.include "names2.tbl" ;New names from pnames2.img
.include "names2.glo" ;New names from pnames2.img
.include "mugshot.glo"
.include "imgtbl.glo"
.include "imgtblp.glo"
.include "imgtbl2.glo"
.include "imgtbl7.glo"
.include "bgndtbl.glo"
.include "imgtblm.glo"
.include "bgndtbl7.glo"
.include "plyrnub.tbl"
.def CUST6,CUST7,CUST8,CUST9,CUST10
.def T_HAWKS,GAINED_TXT
.def attrib_off
.def attrib_on
.def update_attribs
.def team_sqaud_cnts
.def city_names_str_tbl
.def plyr_names_img_tbl
************************************************************************
.ref kp_qscrs2,PCNT
.ref HALT
.ref OUR_MUG,TOB_MUG,JAS_MUG,QUI_MUG,BOO_MUG,MARTY_MUG,CARL_MUG
.def logos
.def BALLBAK1
.def city_table_start
.def city_table_end
.def our_names ;table addr.
.def our_heads ;table addrs.
.def player_attribs ;table addr.
.def name_sort
.def init_x,kit_x
.def nub_img_tbl
.ref kp_ram
.ref snd_play1
.ref tm2set,tm1set
.ref credit1_obj
.ref credit2_obj
.ref credit3_obj
.ref name1_obj
.ref name2_obj
.ref name3_obj
.ref name4_obj
.ref attrib1_obj
.ref attrib2_obj
.ref attrib3_obj
.ref attrib4_obj
.ref CRED_P
.ref teamset1_obj
.ref teamset2_obj
.ref create_credits
.ref TWOPLAYERS ;0 = NO, 1 = YES 2 players
.ref concat_string
.ref copy_rom_string,concat_rom_string
.ref mess_cursy,mess_objid
.ref mess_line_spacing
.ref CYCLE_TABLE,COLTAB2
.ref pal_getf
; .ref get_initials_string
.ref dropout_stats
.ref conttimers
.ref PSTATUS2
.ref GET_ADJ
.ref game_purchased
.ref GAMSTATE
.ref monitor_fullgame
.ref message_buffer
.ref pleasewt
.ref game_over
.ref credits
.ref KILBGND,KILALL
.ref print_string_C2
.ref cntrs_delay
.ref can_enter_inits
.ref winningteam
.ref newptr,newplyrs
.ref CR_CONTP
.ref team_control
.ref plyrsdropped
.ref P1DATA
.ref pal_clean
.ref qtr_purchased
.ref credit_messages
.ref monitor_buyins
.ref COLRTEMP
.ref gmqrtr
.ref _4plyrsingame,_2plyr_competitive
.ref do_scrn_transition
.ref un_wipe_horizontal,wipe_horizontal
.ref wipe_stack_vertical
.ref NO_CREATE_DEL_OBJS,CREATE_NO_DEL_OBJS
.ref fade_up,fade_down
.ref calc_num_defeated
.ref RNDRNG0,BAKMODS
.ref team2,team1
.ref switches_cur
.ref inmatchup
.ref player1_data
.ref dec_to_asc
.ref cntdown_snd
.ref pal_set
.ref player2_data
.ref create_logos
.ref call_matchup
.ref pal_find
.ref special_heads
.ref player3_data
.ref create_player_heads
.ref update_player_heads
.ref create_names
.ref dpageflip
.ref IRQSKYE
.ref PSTATUS
.ref player4_data
.ref switches_down
.ref print_string_C
.ref BGND_UD1
.ref obj_on
.ref force_selection
.ref obj_off
.ref scores
.ref WIPEOUT
.ref mess_cursx
.ref update_logos
.ref setup_message
.ref copy_string
.ref animate_vs_logo
.ref get_name_string
.ref bast8_ascii
.ref plyr_get_combination
.ref set_plyrs_powerup_ram
.ref bast18_ascii,brush20_ascii
.ref bast10_ascii
.ref bounce_snd,tunegc_snd
.ref SOUNDSUP
.ref OVRTME,OVERW_P
.ref hide_ball_under_logo
.ref bast8t_ascii
.ref get_teams_pop,teams_pop
.ref kp_p1_crtplr,kp_p2_crtplr,kp_p3_crtplr,kp_p4_crtplr
;MJT Start
.ref kp_p1_name1,kp_p1_name2,kp_p1_name3,kp_p1_name4
.ref kp_p1_name5,kp_p1_name6,kp_p1_hdnbr
.ref kp_p2_name1,kp_p2_name2,kp_p2_name3,kp_p2_name4
.ref kp_p2_name5,kp_p2_name6,kp_p2_hdnbr
.ref kp_p3_name1,kp_p3_name2,kp_p3_name3,kp_p3_name4
.ref kp_p3_name5,kp_p3_name6,kp_p3_hdnbr
.ref kp_p4_name1,kp_p4_name2,kp_p4_name3,kp_p4_name4
.ref kp_p4_name5,kp_p4_name6,kp_p4_hdnbr
;MJT End
.ref kp_team1,kp_scores,kp_team2
.ref mess_cursx2,kern_chars
.ref print_string2b,hangfnt38_ascii
.ref brush50_ascii,mess_justify
.ref message_palette
.ref _TOR
.ref _VAN
.ref _DAL
.ref _MIN
.ref _MI
.ref _WAS
.ref _PHI
.ref _SAC
.ref _MIL
.ref _DEN
.ref _GOL
.ref _SAN
.ref _SEA
.ref _ATL
.ref _ORL
.ref _LAC
.ref _NJ
.ref _CHA
.ref _BOS
.ref _CLE
.ref _DET
.ref _HOU
.ref _IND
.ref _LAL
.ref _UTA
.ref _NY
.ref _POR
.ref _PHX
.ref _CHI
************************************************************************
.text
PNAME_W_P:
.word 4
.word 02C0BH,07FFFH,05294H,00H
GAINED_P:
.word 4
.word 00H,00H,07FFFH,07FE0H
IDIOTS_P:
.word 6
.word 0318CH,00H,07FFFH,07FE0H,02B1FH,07C00H
********************************
#*
MAX_CRTIME equ >7fff ;30*60
;TEAMSEL_PAGE equ 0*256
;NAMENT_PAGE equ 1*256
.asg >5e+5,x1
.asg >a1+5,x1a
.asg >e4+5,x2a
.asg >ad+5,x1b
.asg >12f5+2,y1
.asg >131f,y1a
.def ladder_imgs0
.def ladder_imgs1,ladder_imgs2,ladder_imgs3,ladder_imgs4
.def ladder_imgs5,ladder_imgs6
ladder_imgs0
ladder_imgs1
ladder_imgs2
ladder_imgs3
ladder_imgs4
ladder_imgs5
ladder_imgs6
;2
;
;
; .long HPR_DAL,x1+400,y1
; .long JAC_DAL,x1,y1
; .long MAS_DAL,x2a,y1
; .long T_MAVS,x1b,y1a
;
; .long THM_DET,x1,y1->b3
; .long DUM_DET,x1a,y1->b3
;
; .long ELL_DET,x2a,y1->b3
;; .long HOR_HOU,x2a,y1->b3
; .long T_PISS,x1b,y1a->b3
;
; .long 0
;
;ladder_imgs1
;;4
; .long BAK_MLW,x1,y1->b3*2-2
; .long EDW_MLW,x1a,y1->b3*2-2
; .long DAY_MLW,x2a,y1->b3*2-2
; .long T_BUCKS,x1b,y1a->b3*2-2
;
; .long GUG_WAS,x1,y1->b3*3-2
; .long ELL_WAS,x1a,y1->b3*3-2
; .long CHE_WAS,x2a,y1->b3*3-2
; .long T_BULTS,x1b,y1a->b3*3-2
;
; .long SIM_SAC,x1,y1->b3*4-4
; .long HUR_SAC,x1a,y1->b3*4-4
; .long RIC_SAC,x2a,y1->b3*4-4
; .long T_KINGS,x1b,y1a->b3*4-4
;
; .long LTN_MIN,x1,y1->b3*5-4
; .long PRS_MIN,x1a,y1->b3*5-4
; .long RID_MIN,x2a,y1->b3*5-4
; .long T_TWOLV,x1b,y1a->b3*5-4
;
; .long 0
;
;ladder_imgs2
;;4
; .long PEE_LAK,x1,y1->b3*6-6
; .long DIV_LAK,x1a,y1->b3*6-6
; .long CAM_LAK,x2a,y1->b3*6-6
; .long T_LAKS,x1b,y1a->b3*6-6
;
; .long WLK_ATL,x1,y1->b3*7-6
;; .long MAN_CLP,x1,y1->b3*7-6
; .long HRP_CLP,x1a,y1->b3*7-6
; .long ROB_CLP,x2a,y1->b3*7-6
; .long T_CLIPS,x1b,y1a->b3*7-6
;
; .long MCD_BOS,x1,y1->b3*8-8
; .long BRO_BOS,x1a,y1->b3*8-8
; .long GAM_BOS,x2a,y1->b3*8-8
; .long T_CELTS,x1b,y1a->b3*8-8
;
; .long WEA_PHL,x1,y1->b3*9-8
;; .long BRA_PHL,x1a,y1->b3*9-8
; .long BRA_PHL,x2a,y1->b3*9-8
; .long HRN_PHL,x2a+400,y1->b3*9-8
; .long T_76RS,x1b,y1a->b3*9-8
;
; .long 0
;
;ladder_imgs3
;;4
; .long MIL_IND,x1,y1->b3*10-10
; .long SMI_IND,x1a,y1->b3*10-10
; .long SEL_IND,x2a,y1->b3*10-10
; .long T_PACER,x1b,y1a->b3*10-10
;
; .long COL_NEJ,x1,y1->b3*11-10
; .long AND_NEJ,x1a,y1->b3*11-10
; .long MOR_NEJ,x2a,y1->b3*11-10
; .long T_NETS,x1b,y1a->b3*11-10
;
; .long PRC_CLE,x1,y1->b3*12-12
; .long DAU_CLE,x1a,y1->b3*12-12
; .long NAN_CLE,x2a,y1->b3*12-12
; .long T_CAVS,x1b,y1a->b3*12-12
;
; .long MUT_DEN,x1,y1->b3*13-12
; .long ELL_DEN,x1a,y1->b3*13-12
; .long ROG_DEN,x2a,y1->b3*13-12
; .long T_NUGS,x1b,y1a->b3*13-12
;
; .long 0
;
;ladder_imgs4
;;4
; .long HRD_GLD,x1,y1->b3*14-14
; .long MUL_GLD,x1a,y1->b3*14-14
; .long WEB_GLD,x2a,y1->b3*14-14
; .long T_WARS,x1b,y1a->b3*14-14
;
; .long DRX_PRT,x1,y1->b3*15-14
; .long POR_PRT,x1a,y1->b3*15-14
; .long ROB_PRT,x2a,y1->b3*15-14
; .long T_BLAZ,x1b,y1a->b3*15-14
;
; .long RCE_MIA,x1,y1->b3*16-16
; .long SKL_MIA,x1a,y1->b3*16-16
; .long MIN_MIA,x2a,y1->b3*16-16
; .long T_HEAT,x1b,y1a->b3*16-16
;
; .long JON_CHA,x1,y1->b3*17-16
; .long HWK_CHA,x1a,y1->b3*17-16
; .long MOU_CHA,x2a,y1->b3*17-16
; .long T_HORS,x1b,y1a->b3*17-16
;
; .long 0
;
;ladder_imgs5
;;4
; .long SKL_ORL,x1,y1->b3*18-18
; .long HAR_ORL,x1a,y1->b3*18-18
; .long AND_ORL,x2a,y1->b3*18-18
; .long T_MAGIC,x1b,y1a->b3*18-18
;
; .long ROB_SAN,x1,y1->b3*19-18
; .long ROD_SAN,x1a,y1->b3*19-18
; .long ELS_SAN,x2a,y1->b3*19-18
; .long T_SPURS,x1b,y1a->b3*19-18
;
; .long MLN_UTA,x1,y1->b3*20-20
; .long STK_UTA,x1a,y1->b3*20-20
; .long BEN_UTA,x2a,y1->b3*20-20
; .long T_JAZZ,x1b,y1a->b3*20-20
;
; .long EWG_NEY,x1,y1->b3*21-20
; .long MAS_NEY,x1a,y1->b3*21-20
; .long STA_NEY,x2a,y1->b3*21-20
; .long T_KNIKS,x1b,y1a->b3*21-20
;
; .long 0
;
;ladder_imgs6
;;4
; .long MAN_CLP,x1,y1->b3*22-22
;; .long WLK_ATL,x1,y1->b3*22-22
; .long AUG_ATL,x1a,y1->b3*22-22
; .long WLS_ATL,x2a,y1->b3*22-22
; .long T_HAWKS,x1b,y1a->b3*22-22
;
;; .long BRK_PHX,x1,y1->b3*23-22
;; .long MAJ_PHX,x1,y1->b3*23-22
; .long MAJ_PHX,x1a,y1->b3*23-22
; .long JOH_PHX,x2a,y1->b3*23-22
; .long T_SUNS,x1b,y1a->b3*23-22
;
; .long OLA_HOU,x1,y1->b3*24-24
; .long MAX_HOU,x1a,y1->b3*24-24
;; .long ELL_DET,x2a,y1->b3
;; .long ELL_DET,x2a,y1->b3*24-24
; .long HOR_HOU,x2a,y1->b3*24-24
; .long T_ROCKS,x1b,y1a->b3*24-24
;
; .long KMP_SEA,x1,y1->b3*25-24
; .long PAY_SEA,x1a,y1->b3*25-24
; .long GIL_SEA,x2a,y1->b3*25-24
; .long T_SONICS,x1b,y1a->b3*25-24
;
;
; .long 0
#*****************************************************************************
* a8 = sleep time
* a9 = palette to change
* a10 = * palette list
* a11 = * morf pal ram
START_PAL equ PDATA
CUR_PAL equ PDATA+20h
PAL_ADDR equ PDATA+40h
MORF_PAL equ PDATA+60h
SLEEP_TIME equ PDATA+80h
SUBR morf_pal
move a8,*a13(SLEEP_TIME)
move a10,*a13(START_PAL),L
move a10,*a13(CUR_PAL),L
move a11,*a13(MORF_PAL),L
#wait
SLEEPK 1
move a9,a0
calla pal_find
jrz #wait
srl 8,a0
sll 8,a0
move a0,*a13(PAL_ADDR),L
move *a13(MORF_PAL),a1,L
move *a10,a2,L
move *a2+,a3 ;num colours
#loop
move *a2+,*a1+
dsj a3,#loop
; SLEEP 4
move *a13(SLEEP_TIME),a10
#dly1
SLEEPK 1
dsj a10,#dly1
#next_pal
move *a13(CUR_PAL),a10,L
addi 20h,a10
move *a10,a0,L
jrn #ok
jrz #not_sleep
move a10,*a13(CUR_PAL),L
move a0,a10
jruc #dly1
#not_sleep
move *a13(START_PAL),a10,L
#ok
move a10,*a13(CUR_PAL),L
#again
; SLEEP 2
move *a13(SLEEP_TIME),a10
srl 1,a10
jrnz #dly2
movk 1,a10
#dly2
SLEEPK 1
dsj a10,#dly2
move *a13(MORF_PAL),a1,L
move *a13(CUR_PAL),a10,L
move *a10,a2,L
move *a2+,a0 ;num colours
clr a11
#morfit
move *a1,a3 ;CURRENT PALETTE
movi 0111110000000000b,a4 ;5 bits of red
and a3,a4
movi 0000001111100000b,a5 ;5 bits of green
and a3,a5
movi 0000000000011111b,a6 ;5 bits of blue
and a3,a6
move *a2+,a7 ;DEST PALETTE
movi 0111110000000000b,a8 ;5 bits of red
and a7,a8
movi 0000001111100000b,a9 ;5 bits of green
and a7,a9
movi 0000000000011111b,a10 ;5 bits of blue
and a7,a10
srl 10,a4
srl 10,a8
cmp a4,a8 ;a8-a4
jreq #redok
jrlt #decr
inc a11
inc a4
jruc #redok
#decr
inc a11
dec a4
#redok
sll 10,a4
srl 5,a5
srl 5,a9
cmp a5,a9
jreq #greenok
jrlt #decg
inc a11
inc a5
jruc #greenok
#decg
inc a11
dec a5
#greenok
sll 5,a5
cmp a6,a10
jreq #blueok
jrlt #decb
inc a11
inc a6
jruc #blueok
#decb
inc a11
dec a6
#blueok
or a5,a4
or a6,a4
move a4,*a1+
dsj a0,#morfit
move *a13(CUR_PAL),a0,L ;* palette list
move *a0,a0,L ;* palette
move *a0,a2 ;num colours
move *a13(MORF_PAL),a0,L ;* palette
move *a13(PAL_ADDR),a1,L ;dest palette
calla pal_set
move a11,a11
jrnz #again
jruc #next_pal
DIE
; movi GREENPAL,a0 ;* palette
; move *a0+,a2 ;num colours
; move a10,a1 ;dest palette
; calla pal_set
#*****************************************************************************
*
* RETURN: a0 = start button bits
*-----------------------------------------------------------------------------
SUBR get_all_starts_down
clr a1
move @PSTATUS,a2
btst 0,a2
jrz #no_player1
clr a0 ;player 1
calla get_start_down
or a0,a1
#no_player1
btst 1,a2
jrz #no_player2
movk 1,a0 ;player 2
calla get_start_down
or a0,a1
#no_player2
btst 2,a2
jrz #no_player3
movk 2,a0 ;player 3
calla get_start_down
or a0,a1
#no_player3
btst 3,a2
jrz #no_player4
movk 3,a0 ;player 4
calla get_start_down
or a0,a1
#no_player4
move a1,a0
rets
#*****************************************************************************
*
* RETURN: a0 = start bit
*-----------------------------------------------------------------------------
SUBR get_start_down
sll 4,a0 ;x 16 bits
addi start_offs,a0
move *a0,a0
addi switches_down,a0
move *a0,a0
andi 1,a0
rets
.if TUNIT
start_offs .word 12h,15h,19h,1ah
.else
start_offs .word 12h,15h,17h,27h
.endif
#*****************************************************************************
* RETURN: a0 = start bit
*-----------------------------------------------------------------------------
SUBR get_start_cur
sll 4,a0 ;x 16 bits
addi start_offs,a0
move *a0,a0
addi switches_cur,a0
move *a0,a0
andi 1,a0
rets
#*****************************************************************************
SUBR get_team1_turbo
clr a1
move @PSTATUS,a2
btst 0,a2
jrz #no_player1
clr a0 ;player 1
calla get_turbo_down
or a0,a1
#no_player1
btst 1,a2
jrz #no_player2
movk 1,a0 ;player 2
calla get_turbo_down
or a0,a1
#no_player2
move a1,a0
rets
#*****************************************************************************
SUBR get_team2_turbo
clr a1
move @PSTATUS,a2
btst 2,a2
jrz #no_player1
movk 2,a0 ;player 3
calla get_turbo_down
or a0,a1
#no_player1
btst 3,a2
jrz #no_player2
movk 3,a0 ;player 4
calla get_turbo_down
or a0,a1
#no_player2
move a1,a0
rets
#*****************************************************************************
* RETURN: a0 = start bit
*-----------------------------------------------------------------------------
SUBR get_turbo_down
sll 4,a0 ;x 16 bits
addi turbo_offs,a0
move *a0,a0
addi switches_down,a0
move *a0,a0
andi 1,a0
rets
.if TUNIT
turbo_offs .word 06h,0eh,26h,2eh
.else
turbo_offs .word 12h,15h,17h,27h
.endif
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_sticks_cur
clr a1
move @PSTATUS,a2
btst 0,a2
jrz #no_player1
clr a0 ;player 1
calla get_stick_val_cur
or a0,a1
#no_player1
btst 1,a2
jrz #no_player2
movk 1,a0 ;player 2
calla get_stick_val_cur
or a0,a1
#no_player2
btst 2,a2
jrz #no_player3
movk 2,a0 ;player 3
calla get_stick_val_cur
or a0,a1
#no_player3
btst 3,a2
jrz #no_player4
movk 3,a0 ;player 4
calla get_stick_val_cur
or a0,a1
#no_player4
move a1,a0
rets
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_sticks_cur2
clr a1
clr a0 ;player 1
calla get_stick_val_cur
or a0,a1
movk 1,a0 ;player 2
calla get_stick_val_cur
or a0,a1
movk 2,a0 ;player 3
calla get_stick_val_cur
or a0,a1
movk 3,a0 ;player 4
calla get_stick_val_cur
or a0,a1
move a1,a0
rets
#*****************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_stick_val_cur
sll 4,a0 ;x 16 bits
addi joy_offs,a0
move *a0,a0
addi switches_cur,a0
move *a0,a0
andi 01111b,a0
rets
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_sticks_down
clr a1
move @PSTATUS,a2
btst 0,a2
jrz #no_player1
clr a0 ;player 1
calla get_stick_val_down
or a0,a1
#no_player1
btst 1,a2
jrz #no_player2
movk 1,a0 ;player 2
calla get_stick_val_down
or a0,a1
#no_player2
btst 2,a2
jrz #no_player3
movk 2,a0 ;player 3
calla get_stick_val_down
or a0,a1
#no_player3
btst 3,a2
jrz #no_player4
movk 3,a0 ;player 4
calla get_stick_val_down
or a0,a1
#no_player4
move a1,a0
rets
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_sticks_down2
clr a1
clr a0 ;player 1
calla get_stick_val_down
or a0,a1
movk 1,a0
calla get_stick_val_down
or a0,a1
movk 2,a0
calla get_stick_val_down
or a0,a1
movk 3,a0
calla get_stick_val_down
or a0,a1
move a1,a0
rets
******************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_stick_val_down
sll 4,a0 ;x 16 bits
addi joy_offs,a0
move *a0,a0
addi switches_down,a0
move *a0,a0
andi 01111b,a0
rets
joy_offs .word 00h,08h,20h,28h
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_buttons_cur
clr a1
move @PSTATUS,a2
btst 0,a2
jrz #no_player1
clr a0 ;player 1
calla get_but_val_cur
or a0,a1
#no_player1
btst 1,a2
jrz #no_player2
movk 1,a0 ;player 2
calla get_but_val_cur
or a0,a1
#no_player2
btst 2,a2
jrz #no_player3
movk 2,a0 ;player 3
calla get_but_val_cur
or a0,a1
#no_player3
btst 3,a2
jrz #no_player4
movk 3,a0 ;player 4
calla get_but_val_cur
or a0,a1
#no_player4
move a1,a0
rets
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_buttons_cur2
clr a1
clr a0 ;player 1
calla get_but_val_cur
or a0,a1
movk 1,a0 ;player 2
calla get_but_val_cur
or a0,a1
movk 2,a0 ;player 3
calla get_but_val_cur
or a0,a1
movk 3,a0 ;player 4
calla get_but_val_cur
or a0,a1
move a1,a0
rets
#*****************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = button bits
*-----------------------------------------------------------------------------
SUBR get_but_val_cur
sll 4,a0 ;x 16 bits
addi but_offs,a0
move *a0,a0
addi switches_cur,a0
move *a0,a0
andi 0111b,a0
rets
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_buttons_down
clr a1
move @PSTATUS,a2
btst 0,a2
jrz #no_player1
clr a0 ;player 1
calla get_but_val_down
or a0,a1
#no_player1
btst 1,a2
jrz #no_player2
movk 1,a0 ;player 2
calla get_but_val_down
or a0,a1
#no_player2
btst 2,a2
jrz #no_player3
movk 2,a0 ;player 3
calla get_but_val_down
or a0,a1
#no_player3
btst 3,a2
jrz #no_player4
movk 3,a0 ;player 4
calla get_but_val_down
or a0,a1
#no_player4
move a1,a0
rets
#*****************************************************************************
* RETURN: a0 = joy switch bits
*-----------------------------------------------------------------------------
SUBR get_all_buttons_down2
clr a1
clr a0 ;player 1
calla get_but_val_down
or a0,a1
movk 1,a0 ;player 2
calla get_but_val_down
or a0,a1
movk 2,a0 ;player 3
calla get_but_val_down
or a0,a1
movk 3,a0 ;player 4
calla get_but_val_down
or a0,a1
move a1,a0
rets
******************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = button bits
*-----------------------------------------------------------------------------
SUBR get_but_val_down
sll 4,a0 ;x 16 bits
addi but_offs,a0
move *a0,a0
addi switches_down,a0
move *a0,a0
andi 0111b,a0
rets
.if TUNIT
but_offs .word 04h,0ch,24h,2ch
.else
but_offs .word 04h,0ch,1ch,24h
.endif
******************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = button bits
*-----------------------------------------------------------------------------
SUBR get_but_val_down_nt ;masks out turbo button
sll 4,a0 ;x 16 bits
addi but_offs,a0
move *a0,a0
addi switches_down,a0
move *a0,a0
; andi 011b,a0 ;mask out turbo
andi 01b,a0 ;mask out turbo and pass
rets
******************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = button bits
*-----------------------------------------------------------------------------
SUBR get_steal_but_cur
sll 4,a0 ;x 16 bits
addi but_offs,a0
move *a0,a0
addi switches_cur,a0
move *a0,a0
andi 010b,a0 ;mask out turbo & shoot
rets
******************************************************************************
* INPUT: a0 = player number (0-3)
*-----------------------------------------------------------------------------
* RETURN: a0 = button bits
*-----------------------------------------------------------------------------
SUBR get_block_but_cur
sll 4,a0 ;x 16 bits
addi but_offs,a0
move *a0,a0
addi switches_cur,a0
move *a0,a0
andi 01b,a0 ;mask out turbo and pass
rets
#*****************************************************************************
.asg 330,X1 ;89,X1
.asg 330,X2 ;307,X2
.asg 207,Y
.asg 217,Y2
SUBR result_screen
move @kp_scores,a0,L
move a0,@scores,L
move @scores,a0
move @scores+16,a14
add a0,a14
cmpi 20,a14
jrlt #x
move @kp_team1,a0
move a0,@team1
move @kp_team2,a0
move a0,@team2
;MJT Start
move @kp_p1_crtplr,a14
move a14,@player1_data+PR_CREATED_PLYR
move @kp_p1_name1,a14
move a14,@player1_data+PR_NAME1
move @kp_p1_name2,a14
move a14,@player1_data+PR_NAME2
move @kp_p1_name3,a14
move a14,@player1_data+PR_NAME3
move @kp_p1_name4,a14
move a14,@player1_data+PR_NAME4
move @kp_p1_name5,a14
move a14,@player1_data+PR_NAME5
move @kp_p1_name6,a14
move a14,@player1_data+PR_NAME6
move @kp_p1_hdnbr,a14
move a14,@player1_data+PR_HEAD_NBR
move @kp_p2_crtplr,a14
move a14,@player2_data+PR_CREATED_PLYR
move @kp_p2_name1,a14
move a14,@player2_data+PR_NAME1
move @kp_p2_name2,a14
move a14,@player2_data+PR_NAME2
move @kp_p2_name3,a14
move a14,@player2_data+PR_NAME3
move @kp_p2_name4,a14
move a14,@player2_data+PR_NAME4
move @kp_p2_name5,a14
move a14,@player2_data+PR_NAME5
move @kp_p2_name6,a14
move a14,@player2_data+PR_NAME6
move @kp_p2_hdnbr,a14
move a14,@player2_data+PR_HEAD_NBR
move @kp_p3_crtplr,a14
move a14,@player3_data+PR_CREATED_PLYR
move @kp_p3_name1,a14
move a14,@player3_data+PR_NAME1
move @kp_p3_name2,a14
move a14,@player3_data+PR_NAME2
move @kp_p3_name3,a14
move a14,@player3_data+PR_NAME3
move @kp_p3_name4,a14
move a14,@player3_data+PR_NAME4
move @kp_p3_name5,a14
move a14,@player3_data+PR_NAME5
move @kp_p3_name6,a14
move a14,@player3_data+PR_NAME6
move @kp_p3_hdnbr,a14
move a14,@player3_data+PR_HEAD_NBR
move @kp_p4_crtplr,a14
move a14,@player4_data+PR_CREATED_PLYR
move @kp_p4_name1,a14
move a14,@player4_data+PR_NAME1
move @kp_p4_name2,a14
move a14,@player4_data+PR_NAME2
move @kp_p4_name3,a14
move a14,@player4_data+PR_NAME3
move @kp_p4_name4,a14
move a14,@player4_data+PR_NAME4
move @kp_p4_name5,a14
move a14,@player4_data+PR_NAME5
move @kp_p4_name6,a14
move a14,@player4_data+PR_NAME6
move @kp_p4_hdnbr,a14
move a14,@player4_data+PR_HEAD_NBR
;MJT End
calla display_blank
calla WIPEOUT ;CLEAN SYSTEM OUT
movk 1,a0 ;page flipping on
move a0,@dpageflip
clr a0
move a0,@IRQSKYE ;background color
movi SCRNEND,a0 ;[256,405]
move a0,@SCRNLR,L
clr a0
move a0,@WORLDTLX,L
move a0,@WORLDTLY,L
SLEEPK 2
movi result_mod,a0
move a0,@BAKMODS,L
calla BGND_UD1
; clr a10
; movk 16,a11
; CREATE0 fade_up
movi finalres_str_setup,a2
calla setup_message
movi finalres_str,a4,L
calla print_string_C2
movk 3,a0
calla create_player_heads
movk 3,a0
calla create_logos
movi 170,a1
calla create_names
calla update_logos
calla update_player_heads
movi name_setup,a2
calla setup_message
movi 170,a0
move a0,@mess_cursy
movi player1_data+PR_NAME1,a4
move @player1_data+PR_CREATED_PLYR,a14
jrle #nxt
movi message_buffer,a3 ;* string dest
calla get_name_string
movi 56,a0
move a0,@mess_cursx
calla print_string_C
#nxt
movi player2_data+PR_NAME1,a4
move @player2_data+PR_CREATED_PLYR,a14
jrle #nxt2
movi message_buffer,a3 ;* string dest
calla get_name_string
movi 147,a0
move a0,@mess_cursx
calla print_string_C
#nxt2
movi player3_data+PR_NAME1,a4
move @player3_data+PR_CREATED_PLYR,a14
jrle #nxt3
movi message_buffer,a3 ;* string dest
calla get_name_string
movi 251,a0
move a0,@mess_cursx
calla print_string_C
#nxt3
movi player4_data+PR_NAME1,a4
move @player4_data+PR_CREATED_PLYR,a14
jrle #nxt4
movi message_buffer,a3 ;* string dest
calla get_name_string
movi 342,a0
move a0,@mess_cursx
calla print_string_C
#nxt4
; calla hide_ball_under_logo
movk 1,a10
callr create_player_nubs
CREATE0 final_scores
movk 1,a0
move a0,@DISPLAYON
SLEEPK 2
calla display_unblank
SLEEP 1*TSEC
movi 12*TSEC,a10
#lp SLEEPK 1
calla get_all_buttons_cur2
jrz #nob
SOUND1 bounce_snd
jruc #xb
#nob
dsj a10,#lp
#xb
clr a10
movk 16,a11
CREATE0 fade_down
SLEEPK 24
clr a14
move a14,@player1_data+PR_CREATED_PLYR ;stop plyr from being
move a14,@player2_data+PR_CREATED_PLYR ;seen in amode
move a14,@player3_data+PR_CREATED_PLYR
move a14,@player4_data+PR_CREATED_PLYR
#x
RETP
name_setup
PRINT_STR bast8t_ascii,8,1,200,4,BAST_W_P,0
finalres_str_setup
PRINT_STR brush20_ascii,10,0,200,7,BRSHGYOP,0
finalres_str
.string "FINAL RESULTS",0
.even
result_mod
.long finalresBMOD
.word 0,0
.long 0
#*****************************************************************************
* This routine creates the player number graphic (nub)
*
* INPUT:
* reg a10 - X pos. table nbr.
******************************************************************************
SUBR create_player_nubs
PUSH a9
movi 3500,a3 ;z pos
movi DMAWNZ|M_NOCOLL,a4
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
sll 5,a10
addi scr_x_tbl_ptrs,a10
move *a10,a10,L
movi nub_img_tbl,a9,L
move @TWOPLAYERS,a14 ;0 = NO, 1 = YES 2 players
jrz #nkit
movi nub_img_kit_tbl,a9,L
#nkit
move *a10+,a0,W ;get X pos.
sll 16,a0
move *a10+,a1,W ;get Y pos.
sll 16,a1
move *a9+,a2,L
calla BEGINOBJ2
move *a10+,a0,W ;get X pos.
sll 16,a0
move *a10+,a1,W ;get X pos.
sll 16,a1
move *a9+,a2,L
calla BEGINOBJ2
move *a10+,a0,W ;get X pos.
sll 16,a0
move *a10+,a1,W ;get X pos.
sll 16,a1
move *a9+,a2,L
calla BEGINOBJ2
move *a10+,a0,W ;get X pos.
sll 16,a0
move *a10,a1,W ;get X pos.
sll 16,a1
move *a9,a2,L
calla BEGINOBJ2
PULL a9
rets
nub_img_tbl
.long PLYRNUB1
.long PLYRNUB2
.long PLYRNUB3
.long PLYRNUB4
nub_img_kit_tbl
.long PLYRNUB1
.long PLYRNUB1
.long PLYRNUB2
.long PLYRNUB2
scr_x_tbl_ptrs
.long stat_x_tbl,result_x_tbl
;stat screen
stat_x_tbl
.word 13,103 ;plyr 1
.word 179,103 ;plyr 2
.word 208,103 ;plyr 3
.word 374,103 ;plyr 4
;final result screen
result_x_tbl
.word 12,168
.word 178,168
.word 208,168
.word 374,168
#*****************************************************************************
.if 0
SUBRP score_shadow
#SHAD1 equ PDATA
#SHAD2 equ #SHAD1+20h
.asg 40,X1
.asg 257,X2
.asg 205,Y
movi [X1,0],a0 ;x val
movi [Y,0],a1 ;y val
movi scorshad1,a2 ;* image
movi 300,a3 ;z pos
movi DMAWNZ,a4 ;DMA flags
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ
move a8,*a13(#SHAD1),L
movi [X2,0],a0 ;x val
movi [Y,0],a1 ;y val
movi scorshad1,a2 ;* image
movi 300,a3 ;z pos
movi DMAWNZ,a4 ;DMA flags
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ
move a8,*a13(#SHAD2),L
clr a10
#big_mac
SLEEPK 1
xori 1,a10
move a10,a0
sll 5,a0 ;x 32 bits
addi #shadows,a0
move *a0,a11,L ;* image
move *a13(#SHAD1),a8,L
calla #change_shad
move *a13(#SHAD2),a8,L
calla #change_shad
jruc #big_mac
#change_shad
move a11,a0
move *a8(OCTRL),a1 ;DMA flags
calla obj_aniq ;change object image
rets
#shadows
.long scorshad1,scorshad2
.endif
#*****************************************************************************
* Print the final scores
******************************************************************************
SUBRP final_scores
.asg 21,X1
.asg 364,XF
.asg 206,Y1
.asg 227,Y2
.asg 118,QTR1_X
.asg 153,QTR2_X
.asg 187,QTR3_X
.asg 221,QTR4_X
.asg 255,OT1_X
.asg 289,OT2_X
.asg 323,OT3_X
;
; Print team 1 city name
;
movi [X1,0],a0 ;x val
movi [Y1,0],a1 ;y val
move @team1,a2
move a2,a14
sll 4,a14 ;word length
sll 5,a2 ;LONG length
add a14,a2
addi city_table_start,a2
move *a2,a2,L
movi 300,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
movi BAST_W_P,b0,L
calla BEGINOBJP2 ;plot CITY NAME
;
; Print team 2 city name
;
movi [X1,0],a0 ;x val
movi [Y2,0],a1 ;y val
move @team2,a2
move a2,a14
sll 4,a14 ;word length
sll 5,a2 ;LONG length
add a14,a2
addi city_table_start,a2
move *a2,a2,L
movi BAST_W_P,b0,L
calla BEGINOBJP2 ;plot TEAM2 CITY NAME
;
; Print team scores, quarter by quarter
;
movi #score_setup,a2
calla setup_message
move @scores,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
calla print_string_C
move @scores+10h,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print 1st quarter
move @kp_qscrs2,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR1_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+16,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR1_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print 2nd quarter
move @kp_qscrs2+32,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR2_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+48,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR2_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print 3rd quarter
move @kp_qscrs2+64,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR3_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+80,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR3_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print 4th quarter
move @kp_qscrs2+96,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR4_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+112,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi QTR4_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print Overtime 1
move @kp_qscrs2+128,a0
move @kp_qscrs2+144,a14
add a14,a0
jrz ovr_2
move @kp_qscrs2+128,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi OT1_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+144,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi OT1_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print Overtime 2
ovr_2
move @kp_qscrs2+160,a0
move @kp_qscrs2+176,a14
add a14,a0
jrz ovr_3
move @kp_qscrs2+160,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi OT2_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+176,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi OT2_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
;Print Overtime 3
ovr_3
move @kp_qscrs2+192,a0
move @kp_qscrs2+208,a14
add a14,a0
jrz ovr_4
move @kp_qscrs2+192,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi OT3_X,a0
move a0,@mess_cursx
movi Y1-1,a0
move a0,@mess_cursy
calla print_string_C
move @kp_qscrs2+208,a0
movi 999,a1 ;max value
calla dec_to_asc
calla copy_string
movi OT3_X,a0
move a0,@mess_cursx
movi Y2-1,a0
move a0,@mess_cursy
calla print_string_C
ovr_4
DIE
#score_setup
PRINT_STR bast10_ascii,8,0,XF,Y1-1,BAST_W_P,0
#*****************************************************************************
SUBR matchup_screen
movk 1,a0
move a0,@inmatchup
clr a0
movi -1,a1
calla obj_delc ;delete all obj. expect transition obj
clr a1 ;kill all processes
calla KILALL
calla KILBGND ;Kill old background
clr a0
move a0,@dpageflip
move @dpage,a1
not a1 ;Flip
move a1,@dpage
;wipe obj. over screen
movi wipe_horizontal,a0,L
movi CREATE_NO_DEL_OBJS,a14 ;dont delete objs. when done
JSRP do_scrn_transition
SLEEPK 1
movk 1,a0 ;page flipping on
move a0,@dpageflip
; movk 1,a0 ;page flipping on
; move a0,@dtype
; clr a0
; move a0,@IRQSKYE ;background color
movi matchup_mod,a0
move a0,@BAKMODS,L
calla BGND_UD1
movk 1,a0
calla create_logos
calla update_logos
movi tnght_mat_str_setup,a2
calla setup_message
movi tonght_matchup_str,a4,L
calla print_string_C2
movi tm1_cty_str_setup,a2
calla setup_message
move @team1,a14
sll 6,a14
addi city_names_str_tbl,a14
move *a14,a4,L
calla print_string_C2
movi tm1_nme_str_setup,a2
calla setup_message
move @team1,a14
sll 6,a14
addi city_names_str_tbl,a14
move *a14(32),a4,L
calla print_string_C2
movi tm2_cty_str_setup,a2
calla setup_message
move @team2,a14
sll 6,a14
addi city_names_str_tbl,a14
move *a14,a4,L
calla print_string_C2
movi tm2_nme_str_setup,a2
calla setup_message
move @team2,a14
sll 6,a14
addi city_names_str_tbl,a14
move *a14(32),a4,L
calla print_string_C2
movi tm2_nme_str_setup,a2
calla setup_message
move @team2,a14
sll 6,a14
addi city_names_str_tbl,a14
move *a14(32),a4,L
calla print_string_C2
movi bsd_stat_str_setup,a2
calla setup_message
movi bsd_stat_str,a4,L
calla print_string_C2
move @mess_cursy,a14
addk 11,a14
move a14,@mess_cursy
calla get_teams_pop
move @team1,a0
sll 5,a0
addi teams_pop,a0,L
move *a0,a0,L ;get team 1 'picked count'
move @team2,a14
sll 5,a14
addi teams_pop,a14,L
move *a14,a14,L ;get team 2 'picked count'
move @team2,a4
cmp a0,a14 ;team 2 more popular ?
jrhs #tmpop ;br=yes
move @team1,a4
#tmpop
sll 6,a4
addi city_names_str_tbl,a4
move *a4,a4,L
calla copy_rom_string
movi favored_by_str,a4
calla concat_rom_string
movk 10,a0
calla RNDRNG0
inc a0
movk 15,a1 ;max value
calla dec_to_asc
calla concat_string
calla print_string_C
clr a10
CREATE0 plyr_get_combination
movk 1,a10
CREATE0 plyr_get_combination
movk 2,a10
CREATE0 plyr_get_combination
movk 3,a10
CREATE0 plyr_get_combination
; .ref tuneq1_snd
; SOUND1 tuneq1_snd
SLEEPK 1
;wipe objs off screen -- reveal new screen
movi un_wipe_horizontal,a0,L
movi NO_CREATE_DEL_OBJS,a14
JSRP do_scrn_transition
.ref start_powerups
CREATE SMOVE_PID,start_powerups
SLEEPK 1
; CREATE VS_LOGO_PID,animate_vs_logo
CREATE0 call_matchup
movi 5*TSEC,a10 ;!!! 4
#delay
SLEEPK 1
dsj a10,#delay
#exit
calla set_plyrs_powerup_ram
movi SMOVE_PID,a0
movi -1,a1
calla KILALL
RETP
#******************************************************************************
; a10 = sleep count
.asg 200-2,X
.asg 135,Y
#restart
calla DELOBJA8
SUBR timeout
clr a0
move a0,@force_selection
move a10,a11
#wait
SLEEPK 1
dsj a11,#wait
movi BRSH50R_P,b0
movi [X,0],a0 ;x val
movi [Y,0],a1 ;y val
movi BRSH50_9,a2 ;* image
movi 20700,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJP2
calla #center_image
move @PSTATUS,a9
movi 9,a11
#loop
SOUND1 cntdown_snd
SLEEP TSEC+25
move @PSTATUS,a0 ;if player buys in
cmp a9,a0 ;then restart timer
jrne #restart
calla obj_off
SOUND1 cntdown_snd
SLEEP (1*TSEC)/2
move @PSTATUS,a0
cmp a9,a0
jrne #restart
calla obj_on
move a11,a0
sll 5,a0
addi #nums-20h,a0
move *a0,a0,L ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
calla #center_image
dsj a11,#loop
SOUND1 cntdown_snd
SLEEP (1*TSEC+25)/2
movk 1,a0
move a0,@force_selection
calla DELOBJA8
DIE
#nums .long BRSH50_0,BRSH50_1,BRSH50_2
.long BRSH50_3,BRSH50_4,BRSH50_5
.long BRSH50_6,BRSH50_7,BRSH50_8,BRSH50_9
#center_image
move *a8(OSIZEX),a0
srl 1,a0
movi X,a1
sub a0,a1
move a1,*a8(OXPOS)
rets
#******************************************************************************
; a10 = sleep count
.asg 198,X
.asg 135,Y
SUBR timeout4
clr a0
move a0,@force_selection
move a10,a11
#wait
SLEEPK 1
dsj a11,#wait ;wait before count down
movi BRSH50R_P,b0
movi [X,0],a0 ;x val
movi [Y,0],a1 ;y val
movi BRSH50_5,a2 ;* image
movi 20700,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TRIVIA_TIMER,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJP2
calla #center_image
movi 5,a11
#loop
SOUND1 cntdown_snd
SLEEP TSEC+25
calla obj_off
SOUND1 cntdown_snd
SLEEP (1*TSEC)/2
calla obj_on
move a11,a0
sll 5,a0
addi #nums-20h,a0
move *a0,a0,L ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
calla #center_image
dsj a11,#loop
SOUND1 cntdown_snd
SLEEP (1*TSEC+25)/2 ;Give'm a grace period
movk 1,a0
move a0,@force_selection
calla DELOBJA8
DIE
#center_image
move *a8(OSIZEX),a0
srl 1,a0
movi X,a1
sub a0,a1
move a1,*a8(OXPOS)
rets
#nums .long BRSH50_0,BRSH50_1,BRSH50_2
.long BRSH50_3,BRSH50_4,BRSH50_5
.long BRSH50_6,BRSH50_7,BRSH50_8,BRSH50_9
#******************************************************************************
; a10 = sleep count
.asg 200-2,X
.asg 135,Y
#restart
PULLP a0
calla DELOBJA8
SUBR timeout2
clr a0
move a0,@force_selection
move a10,a11
#wait
SLEEPK 1
dsj a11,#wait
movi BRSH50R_P,b0
movi [X,0],a0 ;x val
movi [Y,0],a1 ;y val
movi BRSH50_9,a2 ;* image
movi 30001,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJP2
calla #center_image
move @PSTATUS,a9
movi 9,a0
#loop
PUSHP a0
SOUND1 cntdown_snd
movi TSEC+25,a11
#loop2
SLEEPK 1
calla get_all_starts_down
jrnz #xit1
dsj a11,#loop2
#xit1
SOUND1 cntdown_snd
move @PSTATUS,a0 ;if player buys in
cmp a9,a0 ;then restart timer
jrne #restart
calla obj_off
movi (1*TSEC)/2,a11
#loop3
SLEEPK 1
calla get_all_starts_down
jrnz #xit2
dsj a11,#loop3
#xit2
move @PSTATUS,a0
cmp a9,a0
jrne #restart
calla obj_on
PULLP a0
PUSHP a0
sll 5,a0
addi #nums-20h,a0
move *a0,a0,L ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
calla #center_image
PULLP a0
dsj a0,#loop
SOUND1 cntdown_snd
movi (1*TSEC+25)/2,a11
#loop4
SLEEPK 1
calla get_all_starts_down
jrnz #xit3
dsj a11,#loop4
#xit3
SOUND1 cntdown_snd
movk 1,a0
move a0,@force_selection
calla DELOBJA8
DIE
#center_image
move *a8(OSIZEX),a0
srl 1,a0
movi X,a1
sub a0,a1
move a1,*a8(OXPOS)
rets
#nums .long BRSH50_0,BRSH50_1,BRSH50_2
.long BRSH50_3,BRSH50_4,BRSH50_5
.long BRSH50_6,BRSH50_7,BRSH50_8,BRSH50_9
;;#nums .long lgmd_0,lgmd_1,lgmd_2
;; .long lgmd_3,lgmd_4,lgmd_5
;; .long lgmd_6,lgmd_7,lgmd_8,lgmd_9
#******************************************************************************
; a10 = sleep count
.asg 200-2,X
.asg 135,Y
SUBR timeout3
clr a0
move a0,@force_selection
.ref BTIME
move a0,@BTIME
movi BRSH50R_P,b0
movi [X,0],a0 ;x val
movi [Y,0],a1 ;y val
movi BRSH50_9,a2 ;* image
movi 30001,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJP2
calla #center_image
move @PSTATUS,a9
movi 9,a0
#loop
PUSHP a0
SOUND1 cntdown_snd
SLEEPK 3
movi TSEC+25-3,a11
#loop2
SLEEPK 1
move @BTIME,a0
jrnz #reset
; calla get_all_buttons_down2
calla get_all_buttons_cur2
jrnz #xit1
dsj a11,#loop2
#xit1
SOUND1 cntdown_snd
calla obj_off
SLEEPK 2
movi (1*TSEC)/2-3,a11
#loop3
SLEEPK 1
move @BTIME,a0
jrnz #reset
; calla get_all_buttons_down2
calla get_all_buttons_cur2
jrnz #xit2
dsj a11,#loop3
#xit2
calla obj_on
PULLP a0
PUSHP a0
sll 5,a0
addi #nums-20h,a0
move *a0,a0,L ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
calla #center_image
PULLP a0
dsj a0,#loop
SOUND1 cntdown_snd
SLEEPK 3
movi (1*TSEC+25)/2-3,a11
#loop4
SLEEPK 1
move @BTIME,a0
jrnz #reset
; calla get_all_buttons_down2
calla get_all_buttons_cur2
jrnz #xit3
dsj a11,#loop4
#xit3
SOUND1 cntdown_snd
movk 1,a0
move a0,@force_selection
calla DELOBJA8
DIE
#reset
clr a0
move a0,@BTIME
movi TSEC,a10
CREATE0 timeout3
calla DELOBJA8
SOUND1 cntdown_snd
DIE
#center_image
move *a8(OSIZEX),a0
srl 1,a0
movi X,a1
sub a0,a1
move a1,*a8(OXPOS)
rets
#nums .long BRSH50_0,BRSH50_1,BRSH50_2
.long BRSH50_3,BRSH50_4,BRSH50_5
.long BRSH50_6,BRSH50_7,BRSH50_8,BRSH50_9
#******************************************************************************
* a3 = * player data
* a10 = player number (0-3)
* sets special_heads based on initials entered
*
* updated to account for CREATED players...
*******************************************************************************
SUBR check_special_initials
sll 4,a10 ;x 16
addi special_heads,a10
;
; We want to favor the player who CREATED his/her character, this is just in case
; its initials and pin_number match a team members. (or if a team member
; wants to change their record)
;
move *a3(PR_CREATED_PLYR),a0 ;player created ?
cmpi 1,a0 ;br=yep, no special head
jrp #end
clr a5
movi #team_data,a2
#next
move *a3(PR_NAME1),a0
jrle #no_match
move *a2,a1
cmp a0,a1
jrne #no_match
move *a3(PR_NAME2),a0
move *a2(10h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_NAME3),a0
move *a2(20h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_NAME4),a0
move *a2(30h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_NAME5),a0
move *a2(40h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_NAME6),a0
move *a2(50h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_PIN_NBR1),a0
move *a2(60h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_PIN_NBR2),a0
move *a2(70h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_PIN_NBR3),a0
move *a2(80h),a1
cmp a0,a1
jrne #no_match
move *a3(PR_PIN_NBR4),a0
move *a2(90h),a1
cmp a0,a1
jrne #no_match
movk ADJTOURNEY,a0 ;Tournament mode?
calla GET_ADJ ;0-1
jrz #yes ;On? Br=yes
move a5,*a10 ;store special head number
move a5,a0
sll 4,a5
sll 5,a0 ;x 16 x 4
add a5,a0
addi #team_snds,a0
calla snd_play1
#yes rets
#no_match
addi NXT_TM_MEMBR,a2 ;7 words per line in below table
inc a5 ;head number
cmpi #team_data1_end,a2
jrlo #next
#end rets
;
; This is a table of all the SPECIAL players (designers...etc) reconizied
;
#team_data
.word 'J'-'@','A'-'@','P'-'@','P'-'@','L'-'@','E'-'@'
.word '7'-'0','7'-'0','7'-'0','1'-'0' ;1 JOHNSON
#team_data1
.word 'D'-'@','I'-'@','V'-'@','I'-'@','T'-'@','A'-'@'
.word '1'-'0','3'-'0','1'-'0','2'-'0' ;2 DIVITA
.word 'T'-'@','U'-'@','R'-'@','M'-'@','E'-'@','L'-'@'
.word '1'-'0','4'-'0','3'-'0','3'-'0' ;2 TURMELL
.word 'D'-'@','A'-'@','N'-'@','I'-'@','E'-'@','L'-'@'
.word '1'-'0','7'-'0','1'-'0','5'-'0' ;2 THOMPSON
.word 'E'-'@','U'-'@','G'-'@','E'-'@','N'-'@','E'-'@'
.word '7'-'0','8'-'0','7'-'0','8'-'0' ;2 GEER
.word 'J'-'@','C'-'@',0,0,0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;2 CARLTON
.word 'J'-'@','F'-'@','E'-'@','R'-'@',0,0
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 HEDRICK
.word 'J'-'@','O'-'@','N'-'@','H'-'@','E'-'@','Y'-'@'
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 JOHN HEY
.word 'M'-'@','O'-'@','R'-'@','R'-'@','I'-'@','S'-'@'
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 AIR MORRIS
.word 'B'-'@','A'-'@','R'-'@','D'-'@','O'-'@',0
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 STEVE BARDO
.word 'M'-'@','I'-'@','N'-'@','I'-'@','F'-'@','E'-'@'
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 MINIFEE
.word 'M'-'@','A'-'@','R'-'@','T'-'@','Y'-'@',0
.word '2'-'0','1'-'0','2'-'0','1'-'0' ;2 MARTINEZ
.word 'C'-'@','A'-'@','R'-'@','L'-'@','O'-'@','S'-'@'
.word '2'-'0','1'-'0','2'-'0','1'-'0' ;2 PESINA
.word 'S'-'@','H'-'@','A'-'@','W'-'@','N'-'@',0
.word '1'-'0','2'-'0','3'-'0','4'-'0' ;2 LIPTAK
.word 'E'-'@','D'-'@','D'-'@','I'-'@','E'-'@',0
.word '7'-'0','3'-'0','2'-'0','4'-'0' ;2 EDDIE
.word 'M'-'@','X'-'@','V'-'@',0,0,0
.word '2'-'0','1'-'0','2'-'0','5'-'0' ;2 MIKE V.
.word 'J'-'@','A'-'@','M'-'@','I'-'@','E'-'@',0
.word '2'-'0','1'-'0','1'-'0','1'-'0' ;2 JAMIE
.word 'N'-'@','I'-'@','C'-'@','K'-'@',0,0
.word '8'-'0','1'-'0','1'-'0','1'-'0' ;2 NICK E.
.word 'R'-'@','O'-'@','O'-'@','T'-'@',0,0
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 J. ROOT
.word 'M'-'@','E'-'@','D'-'@','N'-'@','I'-'@','K'-'@'
.word '7'-'0','1'-'0','1'-'0','1'-'0' ;2 C. MEDNICK
.word 'D'-'@','A'-'@','N'-'@','R'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;20 DAN R.
.word 'P'-'@','A'-'@','T'-'@','F'-'@',0,0
.word '3'-'0','1'-'0','1'-'0','1'-'0' ;21 PAT F.
.word 'K'-'@','O'-'@','M'-'@','B'-'@','A'-'@','T'-'@'
.word '1'-'0','1'-'0','1'-'0','5'-'0' ;22 ED BOON
.word 'M'-'@','O'-'@','R'-'@','T'-'@','A'-'@','L'-'@'
.word '1'-'0','1'-'0','1'-'0','5'-'0' ;23 J. TOBIAS
.word 'S'-'@','N'-'@','O'-'@',0,0,0
.word '1'-'0','2'-'0','1'-'0','4'-'0' ;24 OURSLER
.word 'J'-'@','A'-'@','S'-'@','O'-'@','N'-'@',0
.word '1'-'0','2'-'0','2'-'0','5'-'0' ;25 JASON
.word 'Q'-'@','U'-'@','I'-'@','N'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;26 QUINN
.word 'P'-'@','E'-'@','R'-'@','R'-'@','Y'-'@',0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;27 PERRY
.word 'N'-'@','F'-'@','U'-'@','N'-'@','K'-'@',0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;28 NEIL FUNK
.word 'M'-'@','D'-'@','O'-'@','C'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;29 MDOC
.word 'N'-'@','O'-'@','B'-'@','U'-'@','D'-'@',0
.word '2'-'0','1'-'0','2'-'0','1'-'0' ;30 BUD
.word 'M'-'@','A'-'@','R'-'@','I'-'@','U'-'@','S'-'@'
.word '2'-'0','1'-'0','1'-'0','6'-'0' ;31 MARIUS
;Superstar special guests
;FIX!!!
;Use name and birthday as pin #
.word 'P'-'@','I'-'@','P'-'@','P'-'@','E'-'@','N'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;PIPPEN
.word 'R'-'@','O'-'@','D'-'@','M'-'@','A'-'@','N'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;RODMAN
.word 'J'-'@','O'-'@','H'-'@','N'-'@','S'-'@','N'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;JOHNSN_L
.word 'R'-'@','I'-'@','C'-'@','E'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;RICE
.word 'K'-'@','I'-'@','D'-'@','D'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;KIDD
.word 'M'-'@','O'-'@','T'-'@','U'-'@','M'-'@','B'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;MOTUMBO
.word 'G'-'@','H'-'@','I'-'@','L'-'@','L'-'@',0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;G. HILL
.word 'D'-'@','R'-'@','E'-'@','A'-'@','M'-'@',0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;OLAJUAMWN
.word 'M'-'@','I'-'@','L'-'@','L'-'@','E'-'@','R'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;R. MILLER
.word 'S'-'@','M'-'@','I'-'@','T'-'@','S'-'@',0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;R. SMITS
.word 'M'-'@','O'-'@','U'-'@','R'-'@','N'-'@','G'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;MOURNING
.word 'G'-'@','L'-'@','E'-'@','N'-'@','N'-'@','R'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;G. ROBINSON
.word 'W'-'@','E'-'@','B'-'@','B'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;SPUD WEBB
.word 'E'-'@','W'-'@','I'-'@','N'-'@','G'-'@',0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;EWING
.word 'S'-'@','T'-'@','A'-'@','R'-'@','K'-'@','S'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;STARKS
.word 'A'-'@','H'-'@','R'-'@','D'-'@','W'-'@','Y'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;A. HARDAWAY
.word 'H'-'@','G'-'@','R'-'@','A'-'@','N'-'@','T'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;H. GRANT
.word 'S'-'@','T'-'@','A'-'@','C'-'@','K'-'@','H'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;STACKHOUSE
.word 'C'-'@','L'-'@','I'-'@','F'-'@','F'-'@','R'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;CLIFF R.
.word 'D'-'@','A'-'@','V'-'@','I'-'@','D'-'@','R'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;DAVID R.
.word 'E'-'@','L'-'@','L'-'@','I'-'@','O'-'@','T'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;S. ELLIOT
.word 'K'-'@','E'-'@','M'-'@','P'-'@',0,0
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;KEMP
.word 'M'-'@','A'-'@','L'-'@','O'-'@','N'-'@','E'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;MALONE
.word 'W'-'@','E'-'@','B'-'@','B'-'@','E'-'@','R'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;WEBBER
.word 'M'-'@','U'-'@','R'-'@','S'-'@','A'-'@','N'-'@'
.word '1'-'0','1'-'0','1'-'0','1'-'0' ;MURESAN
#team_data1_end
NXT_TM_MEMBR .equ (#team_data1-#team_data)
NUM_MEMBRS .equ (#team_data1_end-#team_data)/NXT_TM_MEMBR
#team_snds
.word >3505,70,>8f2 ;0 JEFF JOHNSON
.word >3505,70,>8e4 ;1 SAL DIVITA
.word >3505,70,>8e0 ;2 TURMELL
.word >3505,70,>8ee ;3 THOMPSON
.word >3505,70,>8e6 ;4 GEER
.word >3505,70,>8f0 ;5 CARLTON
.word >3505,70,>8e8 ;6 HEDRICK
.word >3505,70,>8e2 ;7 JOHN HEY
.word >3505,70,>8da ;8 AIR MORRIS
.word >3505,70,>8dc ;9 STEVE BARDO
.word >3505,70,>8de ;10 MINIFEE
.word >3505,70,>8ea ;11 MARTINEZ
.word >3505,70,>8ec ;12 PESINA
.word >3505,50,>b33 ;13 LIPTAK
.word >3505,50,>b33 ;14 EDDIE
.word >3505,50,>b33 ;15 MIKE V
.word >3505,50,>b33 ;16 JAMIE R.
.word >3505,50,>b33 ;17 NICK E.
.word >3505,50,>b33 ;18 J. ROOT
.word >3505,50,>b33 ;19 MEDNICK
.word >3505,50,>b33 ;20 DAN R.
.word >3505,50,>b33 ;21 PAT F.
.word >3505,50,>b33 ;22 ED BOON
.word >3505,50,>b33 ;23 J. TOBIAS
.word >3505,50,>b33 ;24 OURSLER
.word >3505,50,>b33 ;25 JASON S.
.word >3505,50,>b33 ;26 QUINN
.word >3505,50,>b33 ;27 M. PERRY
.word >3505,50,>b33 ;28 N. FUNK
.word >3505,50,>b33 ;29 MDOC
.word >3505,50,>b33 ;30 BUD
.word >3505,50,>754 ;31 MARIUS
;Superstar special guests
.word >100D,52,>550 ;PIPPEN
.word >100D,52,>554 ;RODMAN
.word >100D,52,>540 ;L. JOHNSON
.word >100D,52,>544 ;G. RICE
.word >100D,52,>57c ;KIDD
.word >100D,52,>590 ;MUTOMBO
.word >100D,52,>5a4 ;G. HILL
.word >100D,52,>5c8 ;Olajuwan
.word >100D,52,>5dc ;r. miller
.word >100D,52,>5e4 ;smits
.word >100D,52,>618 ;a. mourning
.word >100D,52,>630 ;g. robinson
.word >100D,52,>7ac ;spud webb
.word >100D,52,>668 ;ewing
.word >100D,52,>678 ;starks
.word >100D,52,>67c ;a. hardaway
.word >100D,52,>680 ;h. grant
.word >100D,52,>690 ;stackhouse
.word >100D,52,>6bc ;c. robinson
.word >100D,52,>6e4 ;d. robinson
.word >100D,52,>6e0 ;s. elliot
.word >100D,52,>6f4 ;shawn kemp
.word >100D,52,>720 ;k. malone
.word >100D,52,>748 ;webber
.word >100D,52,>754 ;muresan
#******************************************************************************
SUBR select_teams
move @team1,a0
move @team2,a1
or a0,a1
move a1,a1
jrnn #teams_ok ;both teams selected?
move @team1,a0
jrnn #select_team2
#select_team1
movi ALL_TMS_DEFEATD,a1
move @PSTATUS,a0
btst 2,a0
jrz #nop3
move @player3_data+PR_NAME1,a0
jrle #nop3
move @player3_data+PR_TEAMSDEF,a0,L
and a0,a1
#nop3
move @PSTATUS,a0
btst 3,a0
jrz #nop4
move @player4_data+PR_NAME1,a0
jrle #nop4
move @player4_data+PR_TEAMSDEF,a0,L
and a0,a1
#nop4
PUSH a1
calla calc_num_defeated
cmpi NUM_TEAMS,a0
jreq #choose_random1
movi NUM_TEAMS-1,a1
sub a0,a1
move a1,a0
calla RNDRNG0
PULL a1
calla get_opponent_team
;This is the check for those teams who didn't have 5 players per team
; movk 1,a0
; cmpi _PHI,a2
; jrz #yesd1
;; cmpi _PHX,a2
;; jrz #yesd1
; cmpi _DAL,a2
; jrz #yesd1
movk 19,a0
#yesd1
calla RNDRNG0
move a2,a14
sll 4,a14
addi tm1set,a14
move a0,*a14
move a2,@team1
jruc #teams_ok
#choose_random1
;Opponent has beaten all the teams, give him a superstar matchup
PULL a1
#choose_random1a
movk NUM_TEAMS-1,a0 ;0-29
calla RNDRNG0
move a0,@team1
move @player3_data+PR_NAME1,a0
jrgt #cont1
move @player4_data+PR_NAME1,a0
jrle #teams_ok
;Someone really has beaten all the teams!
#cont1
sll 4,a0
addi #setnum,a0
move *a0,a0
move @team1,a14
sll 4,a14
addi tm1set,a14
move a0,*a14
;FIX!!!
movi NUM_MEMBRS-1,a0 ;68
calla RNDRNG0
;;; addi 56,a0 ;0
move a0,@special_heads+10h
;remove these two lines when uncommted the ones above
;; clr a0
;; move a0,@special_heads+10h
jruc #teams_ok
;NUM_TEAMS elements
#setnum .word 0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,3,0,0,0,3,1,1
#select_team2
movi ALL_TMS_DEFEATD,a1
move @PSTATUS,a0
btst 0,a0
jrz #nop1
move @player1_data+PR_NAME1,a0
jrle #nop1
move @player1_data+PR_TEAMSDEF,a0,L
and a0,a1
#nop1
move @PSTATUS,a0
btst 1,a0
jrz #nop2
move @player2_data+PR_NAME1,a0
jrle #nop2
move @player2_data+PR_TEAMSDEF,a0,L
and a0,a1
#nop2
PUSH a1
calla calc_num_defeated
cmpi NUM_TEAMS,a0
jreq #choose_random2
movi NUM_TEAMS-1,a1
sub a0,a1
move a1,a0
calla RNDRNG0
PULL a1
calla get_opponent_team
;This is the check for those teams who didn't have 5 players per team
; movk 1,a0
; cmpi _PHI,a2
; jrz #yesd3
;; cmpi _PHX,a2
;; jrz #yesd3
; cmpi _DAL,a2
; jrz #yesd3
movk 19,a0
#yesd3
calla RNDRNG0
move a2,a14
sll 4,a14
addi tm2set,a14
move a0,*a14
move a2,@team2
jruc #teams_ok
#choose_random2
PULL a1
#choose_random2a
movk NUM_TEAMS-1,a0 ;0-26
calla RNDRNG0
move a0,@team2
move @player1_data+PR_NAME1,a0
jrgt #cont2
move @player2_data+PR_NAME1,a0
jrle #teams_ok
;Someone really has beaten all the teams!
#cont2
sll 4,a0
addi #setnum,a0
move *a0,a0
move @team2,a14
sll 4,a14
addi tm2set,a14
move a0,*a14
;FIX!!!
movi NUM_MEMBRS-1,a0 ;68
calla RNDRNG0
; addi 56,a0 ;0
move a0,@special_heads+30h
;remove these two lines when uncommted the ones above
; clr a0
; move a0,@special_heads+30h
#teams_ok
rets
;This table should be ranked by real NBA record
;Updated on 2/17/96
;Worst to Best:
team_orders
.word _VAN ;28
.word _PHI ;29
.word _TOR ;27 ;2 new nba teams
.word _DAL ;24
.word _MIL ;21
.word _MIN ;26
.word _BOS ;22
.word _LAC ;23
.word _NJ ;25
.word _DEN ;20
.word _GOL ;18
.word _SAC ;13
.word _WAS ;19
.word _POR ;15
.word _PHX ;16
.word _CHA ;14
.word _MI ;17
.word _ATL ;11
.word _CLE ;10
.word _DET ;12
.word _NY ;7
.word _IND ;8
.word _HOU ;6
.word _LAL ;9
.word _UTA ;4
.word _SAN ;5
.word _ORL ;3
.word _SEA ;2
.word _CHI ;1
.word -1
#******************************************************************************
*
* INPUT: a0 = Nth undefeated team
* a1 = teams defeated bits
* RETURN: a2 = team number
*
*------------------------------------------------------------------------------
SUBR get_opponent_team
movi team_orders,a0
#next_team
move *a0+,a2 ;team number (0-28)
jrn #err ;shouldn't happen
btst a2,a1 ;defeated?
jrnz #next_team
rets
#err
clr a2
rets
.if 0
PUSH a1
clr a2
#next_team
srl 1,a1
jrc #def
; dec a0 ;teams defeated count ++
; jrn #done
#def
inc a2
cmpi 26,a2
jrlo #next_team
#done
PULL a1
rets
.endif
#*****************************************************************************
SUBR print_plr_name
move a10,a0
sll 4,a0 ;x 16 bits
move a0,a1
sll 1,a0 ;x 32 bits
addi #plyrdata,a0
move *a0,a4,L ;* scr initials
movi init_x,a2
move @TWOPLAYERS,a0 ;0 = NO, 1 = YES 2 players
jrz #not2a
movi kit_x,a2 ;kit x vals
#not2a
add a2,a1
move *a1,a1
move a1,@mess_cursx
movi message_buffer,a3 ;* string dest
calla get_name_string
calla print_string_C ;centered
rets
.asg 70,Y1
.asg 104,Y2
SUBR ingame_mess
#wait
move @PSTATUS,a0
btst a10,a0
jrnz #ingame
SLEEPK 1
jruc #wait
#ingame
movi #name_setup,a2
calla setup_message
callr print_plr_name
move @gmqrtr,a0
cmpi 4,a0
jrls #ok
movk 4,a0
#ok
sll 5,a0 ;x 32 bits
addi #qtr_msgs,a0
move *a0,a2,L ;* image
sll 4,a10 ;x 16 bits
movi #qtr_x,a3
move @TWOPLAYERS,a0 ;0 = NO, 1 = YES 2 players
jrz #not2b
movi kit_x,a3 ;kit x vals
#not2b
add a3,a10
move *a10,a0
sll 16,a0 ;x val
PUSH a0
movi [Y2,0],a1 ;y val
movi 1000,a3 ;z pos
movi DMAWNZ,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
movi BAST_W_P,b0 ;pal
calla BEGINOBJP2
PULL a0
movi [Y1,0],a1 ;y val
movi getready,a2 ;* image
movi 1000,a3 ;z pos
movi DMAWNZ,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
movi BAST_W_P,b0 ;pal
calla BEGINOBJP2
DIE
#plyrdata
.long player1_data+PR_NAME1
.long player2_data+PR_NAME1
.long player3_data+PR_NAME1
.long player4_data+PR_NAME1
#name_setup
PRINT_STR bast8_ascii,5,0,200,208,BAST_R_P,0
#qtr_msgs
.long _1quart,_2quart
.long _3quart,_4quart
.long OVRTME,OVRTME
.long OVRTME,OVRTME
; .long overtme,overtme
; .long overtme,overtme
#qtr_x .word 55,151,249,344 ;x val
init_x .word 56,149,250,342
;#init_x .word 56,145,250,339
kit_x .word 0,101,295,0 ;kit x vals
#*****************************************************************************
SUBR winner_stays_on
movi ADJWINMODE,a0
calla GET_ADJ
move a0,a14
jrz #exit ;br=disabled
; cmpi 1,a14 ;'all games' ?
; jreq #allow ;br=yes
;
; cmpi 2,a14 ;'player vs. player' ?
; jrne #ckfor ;br=no
; move @_2plyr_competitive,a0
; jrz #allow ;br=A human on each team!
;#ckfor
; cmpi 3,a14 ;'4 players' ?
; jrne #exit ;br=no, exit
move @_4plyrsingame,a0
jrnz #exit ;br=not a four player game
;#allow
movk INFREEPRICE,a0
move a0,@GAMSTATE
;Zero PxDATA areas
clr a0
movi P1DATA,a1
movi PDSIZE*4/16,A2
#zlp move a0,*a1+
dsj a2,#zlp
move a0,@conttimers,L ;4 words
move a0,@conttimers+20h,L
clr a0
move a0,@PSTATUS
move a0,@PSTATUS2
calla display_blank
calla WIPEOUT ;CLEAN SYSTEM OUT
movi MAX_CRTIME,a0
move a0,@cntrs_delay
movk 1,a0 ;page flipping on
move a0,@dpageflip
clr a0
move a0,@IRQSKYE ;background color
movi SCRNEND,a0 ;[256,405]
move a0,@SCRNLR,L
clr a0
move a0,@WORLDTLX,L
move a0,@WORLDTLY,L
clr a10
move @scores,a0
move @scores+10h,a1
cmp a1,a0 ;score2 - score1
jrgt #t1_wins
movk 1,a10 ;t2_wins
#t1_wins
move a10,@winningteam ;0 or 1
SLEEPK 2
movi #winner_mod,a0
move a0,@BAKMODS,L
calla BGND_UD1
movk 1,a0
move a0,@DISPLAYON
CREATE0 monitor_buyins
CREATE0 team_control
CREATE0 credits
CREATE0 credit_messages
CREATE0 monitor_fullgame
.asg 102,X1
.asg 294,X2
.asg 21,Y1
.asg 42,Y2
.asg 110,Y3
move a10,a0
sll 4,a0
addi #xpos,a0
move *a0,a11
move a11,a0 ;x val
sll 16,a0
movi [Y1,0],a1 ;y val
movi congrats_l,a2 ;* image
movi 19001,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
move a11,a0 ;x val
sll 16,a0
movi [Y3,0],a1 ;y val
movi winfree,a2 ;* image
movi 19001,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
movi #inits_setup,a2
calla setup_message
movi #str_pl12,a4
move a10,a10
jrz #tm1
movi #str_pl34,a4 ;tm2
#tm1
move a11,@mess_cursx
calla print_string_C2
move a10,a0
xori 1,a0
sll 4,a0
addi #xpos,a0
move *a0,a11
move a11,a0 ;x val
sll 16,a0
movi [Y3-18,0],a1 ;y val
movi chalneed_l,a2 ;* image
movi 19001,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi TYPTEXT,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
movi 1*TSEC,a10
CREATE CNTDWN_PID,timeout2
SLEEPK 2
calla display_unblank
#slp SLEEP 20*TSEC ;15;13
move @PSTATUS,a0
jrnz #slp
#exit
movi -1,a0
move a0,@winningteam ;-1 for no valid half price
RETP
#inits_setup
PRINT_STR bast18_ascii,8,0,X1,Y2,BST18Y_P,0
#str_pl12
.string "PLAYERS 1 - 2",0
#str_pl34
.string "PLAYERS 3 - 4",0
.even
#xpos
.word X1+1,X2+1
#winner_mod
.long ENTERKITBMOD
.word 0,0 ;x,y
.long ATRIBUTEBMOD
.word 0,178
.long 0
#*****************************************************************************
SUBR buyin_screen
move @PSTATUS,a0
move a0,@plyrsdropped
clr a0
move a0,@pleasewt
move a0,@newplyrs,L
move @gmqrtr,a14
cmpi 4,a14
jrlt #tag1
move @scores,a14
move @scores+16,a1
cmp a1,a14
jrz #tag1
#exit
RETP
#tag1
move @PSTATUS,a9
movi qtr_purchased,a1 ; - 1 quarter for each player
clr a2
#dec_loop
move *a1,a0
jrz #skip2
dec a0
move a0,*a1
jrnz #skip2
movk 1,a0
sla a2,a0
move @PSTATUS,a3
andn a0,a3
move a3,@PSTATUS
#skip2
addk 16,a1
inc a2
cmpi 3,a2
jrls #dec_loop
move @PSTATUS,a0
cmp a0,a9
jrnz #cont
;But, if someone inserted coins, go to buyin_screen anyway!
calla CR_CONTP ;Credits to continue
jrlo #bx ;No?
move @game_purchased,a0
cmpi >f,a0
jrnz #cont
#bx
RETP
#cont
clr a0
move a0,@IRQSKYE ;background color
clr a0
move a0,@COLRTEMP,L
move a0,@dtype ;2D
movk 1,a0 ;page flipping on
move a0,@dpageflip
movk ININTRO,a0
move a0,@GAMSTATE
movi newplyrs,a0
move a0,@newptr,L
;setup new background
movi wipe_stack_vertical,a0,L
movi CREATE_NO_DEL_OBJS,a14 ;dont delete objs. when done
JSRP do_scrn_transition
SLEEPK 1
calla KILBGND ;Kill old background
calla pal_clean
clr a0
movi -1,a1
calla obj_delc ;Kill all objs (Screen mem is clr)
clr a0
calla KIL1C
.ref buyin_tune
SOUND1 buyin_tune
movi SCRNEND,a0 ;[256,405]
move a0,@SCRNLR,L
clr a0
move a0,@WORLDTLY,L
move a0,@WORLDTLX,L
move a0,@WORLDTL,L
movi #buyin_mod,a0
move @TWOPLAYERS,a1 ;0 = NO, 1 = YES 2 players
jrz #not2
movi #buyin_kit_mod,a0
#not2
move a0,@BAKMODS,L
calla BGND_UD1
#yesh
SLEEPK 2
; calla create_bits
movi TSEC,a10
CREATE0 timeout3
CREATE0 credits
CREATE0 credit_messages
movk 1,a0
move a0,@can_enter_inits ;if 0 deletes challenger messages
movk 1,a10 ;player 2
CREATE0 ingame_mess
CREATE0 challenger
movk 2,a10 ;player 3
CREATE0 ingame_mess
CREATE0 challenger
move @TWOPLAYERS,a0 ;0 = NO, 1 = YES 2 players
jrnz #2_plyrs
clr a10 ;player 1
CREATE0 ingame_mess
CREATE0 challenger
movk 3,a10 ;player 4
CREATE0 ingame_mess
CREATE0 challenger
#2_plyrs
SLEEP 4
; SLEEP 10
;wipe things off
movi un_wipe_horizontal,a0,L
movi NO_CREATE_DEL_OBJS,a14
JSRP do_scrn_transition
#wait
SLEEPK 1
move @force_selection,a0
jrz #wait
move @PSTATUS,a0
jrnz #ok
;2/9/93
calla dropout_stats
jauc game_over
#ok RETP
;#buyin2_mod
; .long ENTER4BMOD ;enter initials module
; .word 0,0
; .long ATRIBUTEBMOD
; .word 0,178 ;x,y
; .long 0
;
;#buyin2_kit_mod
; .long ENTERKITBMOD
; .word 0,0 ;x,y
; .long ATRBKITBMOD ;option screen background
; .word 0,178 ;x,y
; .long 0
#buyin_mod
.long ENTER4BMOD ;enter initials module
.word 0,0
.long ATRIBUTEBMOD
.word 0,178
.long 0
#buyin_kit_mod
.long ENTERKITBMOD
.word 0,0
.long ATRBKITBMOD
.word 0,178
.long 0
#*****************************************************************************
SUBR blink_tmslct
movi [200,0],a0
movi [15,0],a1
movi PRESSBUTT,a2 ;* image
movi 19001,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
movi 0,a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
#lp
SLEEP 90
movi PRESS_P,a0 ;SGMD8RED,a0
calla pal_getf
move a0,*a8(OPAL)
movi PRESSTURB,a0 ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
SLEEP 90
movi PRESS_P,a0 ;SGMD8WHT,a0
calla pal_getf
move a0,*a8(OPAL)
movi PRESSBUTT,a0 ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
SLEEP 90
movi PRESS2_P,a0 ;SGMD8WHT,a0
calla pal_getf
move a0,*a8(OPAL)
movi PRESSPASS,a0 ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
jruc #lp
#*****************************************************************************
.asg 50,YSPACE
SUBR grand_champs_screen
clr a10
#chk_nxt
callr #check_champ
jrnc #found_champ
; jruc #found_champ
inc a10
cmpi 4,a10
jrlt #chk_nxt
clr a10
RETP
#found_champ
calla display_blank
calla WIPEOUT
clr a0
move a0,@dtype ;2D
move a0,@HALT
movk 1,a0 ;page flipping on
move a0,@dpageflip
movi SCRNEND,a0 ;[256,405]
move a0,@SCRNLR,L
clr a0
move a0,@WORLDTLX,L
move a0,@WORLDTLY,L
move a0,@IRQSKYE
SLEEPK 2
movi #vmod,a0
move a0,@BAKMODS,L
calla BGND_UD1
;print player nbr.
;
; movi #congrats_setup,a2 ;print player X on line below
; calla setup_message
; movi CLSDEAD|123,a0
; move a0,@mess_objid
; movi YSPACE,a0
; move a0,@mess_line_spacing
; movi #player_str,a4
; calla copy_rom_string
;
; move a10,a0
; move @TWOPLAYERS,a1 ;0 = NO, 1 = YES 2 players
; jrnz #iskit
; inc a0 ;1,2,3,4
;#iskit ;1,2
; movi 4,a1 ;max value
; calla dec_to_asc
; calla concat_string
;
; movi 100,a0
; move a0,@mess_cursx2
; movi kern_chars,a0
; move a0,@mess_justify,L ;justification method
; calla print_string2b
;start scrolling text
movi #congrats_setup,a2
calla setup_message
movi CLSDEAD|123,a0
move a0,@mess_objid
movi kern_chars,a0
move a0,@mess_justify,L ;justification method
movi #grand_mess_tbl,a9,L
#txt
move @mess_cursy,a0
addi YSPACE,a0
move a0,@mess_cursy
move *a9+,a4,L
move *a4+,a0,W
move a0,@mess_cursx2
move *a4+,a0,L
move a0,@message_palette,L
calla print_string2b
move *a9,a0,L
cmpi 4000,a0 ;at end ?
jrne #txt ;br=no
movi -0d000h,a3 ;scroll text up screen
movi OBJLST,a14
#lp
move *a14,a14,L
jrz #x
move *a14(OID),a2
cmpi CLSDEAD|123,a2
jrne #lp
move a3,*a14(OYVEL),L
jruc #lp
#x
; movi [18h,0],a0
; movi [2eh,0],a1
; movi TROPHYD1,a2 ;* image
; movi 19001,a3 ;z pos
; movi DMAWNZ,a4 ;DMA flags
; clr a5
; clr a6 ;x vel
; clr a7 ;y vel
; calla BEGINOBJ2
movk 1,a0
move a0,@DISPLAYON
SLEEPK 8
SOUND1 tunegc_snd
.ref plyr_jscrowdsnd
CREATE0 plyr_jscrowdsnd
calla display_unblank
SLEEP TSEC*13
CREATE0 plyr_jscrowdsnd
SLEEP 25*TSEC
movk 1,a10
RETP
;a10 = player number (0-3)
#check_champ
move @PSTATUS,a0
btst a10,a0
jrz #fail
move a10,a0
sll 5,a0
addi #pdata,a0
move *a0,a0,L ;* player data
move *a0(PR_NAME1),a1
jrle #fail
move *a0(PR_NUMDEF),a1
cmpi NUM_TEAMS,a1
jrlt #fail
move *a0(PR_NUMDEFOLD),a1
cmpi NUM_TEAMS,a1
jrge #fail
clrc
rets
#fail
setc
rets
#pdata
.long player1_data
.long player2_data
.long player3_data
.long player4_data
#vmod
.long BKGDBMOD
.word 0,1
.long 0
.asg 200,X
.asg 10+300,Y
#congrats_setup
; PRINT_STR bast18_ascii,10,0,X,Y,BSTGYG_P,0
PRINT_STR hangfnt38_ascii,14,0,200,60,HANGF_Y_P,kern_chars
; PRINT_STR brush50_ascii,14,0,200,60,BRSH50R_P,kern_chars
#grand_mess_tbl
.long #line_blnk
.long #line_blnk
.long #line_blnk
.long #line1
.long #line2
.long #line2a
.long #line_blnk
.long #line3
.long #line3a
.long #line_blnk
.long #line4
.long #line4a
.long #line4b
.long #line5
.long #line_blnk
.long #line8
.long #line9
.long #line10
.long #line11
.long #line_blnk
.long #line15
.long #line15a
.long #line_blnk
.long #line15c
.long #line15b
.long #line15d
.long #line_blnk
.long #line15e
.long #line15f
.long #line_blnk
.long #line14
.long #line14a
.long #line2
.long #line2a
.long 4000
#line_blnk
.word 0
.long HANGF_Y_P
.string "",0
.even
#line1
.word 33
.long HANGF_Y_P
.string "Y",1,-5,"O",1,-2,"U",1,-2," ",1,-2,"AR",1,-5,"E"," ","T",1,-6,"H",1,-6,"E",0
.even
#line2
.word 134
.long HANGF_Y_P
.string "N",1,-6,"B",1,-5,"A",0
.even
#line2a
.word 53
.long HANGF_Y_P
.string "H",1,-6,"AN",1,-4,"GT",1,-5,"I",1,-5,"M",1,-5,"E",0
.even
#line3
.word 104
.long HANGF_G_P
.string "G",1,-4,"R",1,-4,"AN",1,-6,"D",0
.even
#line3a
.word 43
.long HANGF_G_P
.string "C",1,-5,"H",1,-7,"AM",1,-5,"P",1,-4,"I",1,-5,"O",1,-4,"N",1,-1,"!",0
.even
#line4
.word 67
.long HANGF_Y_P
.string "Y",1,-5,"O",1,-2,"U",1,1," ",1,1,"H",1,-7,"A",1,2,"V",1,-7,"E",0
.even
#line4a
.word 62
.long HANGF_Y_P
.string "D",1,-5,"E",1,-6,"F",1,-6,"E",1,-6,"A",1,1,"T",1,-6,"E",1,-5,"D",0
.even
#line4b
.word 100
.long HANGF_Y_P
.string "AL",1,-1,"L",1,2," ","2",1,-1,"9",0
.even
#line5
.word 38
.long HANGF_Y_P
.string "N",1,-6,"B",1,-5,"A",1,1," ","T",1,-6,"E",1,-6,"A",1,1,"M",1,-4,"S",0
.even
#line8
.word 113
.long HANGF_Y_P
.string "B",1,-3,"U",1,-1,"T"," ","A",0
.even
#line9
.word 74
.long HANGF_Y_P
.string "G",1,-4,"R",1,-5,"E",1,-7,"AT",1,-6,"E",1,-5,"R",0
.even
#line10
.word 42
.long HANGF_Y_P
.string "C",1,-4,"H",1,-6,"ALL",1,-2,"E",1,-5,"N",1,-3,"G",1,-4,"E",0
.even
#line11
.word 83
.long HANGF_Y_P
.string "A",1,1,"W",1,-11,"A",1,1,"IT",1,-5,"S",0
.even
#line14
.word 44
.long HANGF_Y_P
.string "T",1,-6,"H",1,-7,"AN",1,-6,"K"," ","Y",1,-6,"O",1,-2,"U",0
.even
#line14a
.word 27
.long HANGF_Y_P
.string "F",1,-4,"O",1,-4,"R"," ","P",1,-4,"L",1,-2,"A",1,1,"Y",1,-5,"I",1,-5,"N",1,-4,"G",0
.even
#line15
.word 87
.long HANGF_Y_P
.string "C",1,-3,"O",1,-3,"M",1,-5,"I",1,-5,"N",1,-4,"G",0
.even
#line15a
.word 121
.long HANGF_Y_P
.string "S",1,-3,"O",1,-2,"O",1,-4,"N",0
.even
#line15b
.word 55
.long HANGF_R_P
.string "M",1,-7,"A",1,-1,"X",1,-5,"I",1,-5,"M",1,-3,"U",1,-5,"M",0
.even
#line15c
.word 134
.long HANGF_R_P
.string "N",1,-6,"B",1,-5,"A",0
.even
#line15d
.word 53
.long HANGF_R_P
.string "H",1,-6,"AN",1,-4,"GT",1,-5,"I",1,-5,"M",1,-5,"E",0
.even
#line15e
.word 45
.long HANGF_Y_P
.string "A",1,2,"V",1,-14,"A",1,1,"I",1,-6,"L",1,-2,"AB",1,-4,"L",1,-1,"E",0
.even
#line15f
.word 110
.long HANGF_Y_P
.string "N",1,-4,"O",1,2,"V",1,-2,"."," ",1,2,"1",1,1,".",0
.even
;#congrats_str
; .string "congratulations!",1
; .string "",1
; .string "",1
; .string "",1
; .string "you have defeated",1
; .string "all 29 nba teams!",1
; .string "",1
; .string "",1
; .string "",1
; .string "You are the new",1
; .string "NBA hangtime",1
; .string "grand champion!",1
; .string "",1
; .string "",1
; .string "you are an incredible",1
; .string "player and one of the",1
; .string "best nba hangtime",1
; .string "stars of all time!",1
; .string "",1
; .string "",1
; .string "however, this is a",1
; .string "midway game! Which",1
; .string "means that there is yet",1
; .string "a greater challenge",1
; .string "awaiting you . . .",1
; .string "",1
; .string "Play on . . .",1
; .string "",1
; .string "",1
; .string "thank you for playing",1
; .string "nba hangtime!",1
; .string "",0
; .even
#player_str
.string "PLAYER ",0
.even
******************************************************************************
#*****************************************************************************
;check if all credits have been sucked up (that can be)
;
; 0 = not all credits sucked up
; !0 = all credits sucked up
SUBR check_suckup
move @gmqrtr,a0
cmpi 2,a0
jrz #not_enough
movk ADJFREPL,a0
calla GET_ADJ ;SEE IF FREEPLAY......(Z BIT CLEAR IF SO!)
jrnz #free_play
calla CRED_P ;get number credits
move a0,a3
movi ADJCSTRT,a0 ;# credits to start
calla GET_ADJ
divu a0,a3 ;credits / credits to continue
move a3,a3
jrz #not_enough
clr a4
#next
move @PSTATUS,a0
btst a4,a0
jrz #no_player
move @game_purchased,a0
btst a4,a0
jrz #not_purchased
#no_player
inc a4
cmpi 4,a4
jrlt #next
#not_enough ;to continue
#free_play ;so no suckup required
movk 1,a0
move a0,a0
rets
#not_purchased
clr a0
rets
;============================================================
;============================================================
attrib_off
PUSH a8
movk 9,a0
#atlp1
move *a2+,a8,L
PUSH a0,a2
calla obj_off
PULL a0,a2
dsj a0,#atlp1
PULL a8
rets
;============================================================
;============================================================
attrib_on
PUSH a8
movk 9,a0
#atlp2
move *a2+,a8,L
PUSH a0,a2
calla obj_on
PULL a0,a2
dsj a0,#atlp2
PULL a8
rets
;-----------------------------------------------------------------------------
; JBJ -- updated to accout for less attributes (6)
;-----------------------------------------------------------------------------
update_attribs
move a6,a6 ;special head ?
jrnn #norm2 ;br=yes, exit
movk 6,a0 ;# attribs. to update
#udlp
move *a11+,a8,L ;a11 points to attribute obj ptrs.
move *a10+,a1 ;a1=attribute value (0-10)
.if DEBUG
cmpi 10,a1
jrle #ok
LOCKUP
#ok
.endif
PUSH a0,a10,a11
;;;Special head?
;; move a6,a6
;; jrn #norm
;;;Yes, hide stats!
;; movk 11,a1
#norm
sll 5,a1 ;x32 (index into below table)
addi attrib_imgs,a1
move *a1,a0,L
;;;; movi DMAWNZ,a1 ;DMA flags
;;;; calla obj_aniq ;change object image
;
; Here I update the attribute 'bar' img. for this object to a new one.
;
move a0,*a8(OIMG),L ;update img. pointer
move *a0(0),*a8(OSIZE),L ;update size
move *a0(ISAG),*a8(OSAG),L ;update source addr.
move *a0(ICTRL),a1 ;get bits per pixel...(ctrl data)
move *a8(OCTRL),a14 ;get current ctrl data
andi >8fff,a14 ;clear bits (12-14)
or a1,a14 ;set bits (12-14)
move a14,*a8(OCTRL) ;update 'ctrl' data
PULL a0,a10,a11
dsj a0,#udlp
#norm2 rets
attrib_imgs
.long ATTBAR01 ;0
.long ATTBAR01 ;1
.long ATTBAR02 ;2
.long ATTBAR03
.long ATTBAR04
.long ATTBAR05
.long ATTBAR06
.long ATTBAR07
.long ATTBAR08
.long ATTBAR09
.long ATTBAR10 ;10
.long ATTBAR10 ;10
;;============================================================
;;============================================================
; SUBR del_box_imgs
;
; movi CLSDEAD|123,a0
; calla obj_del1c ;delete text cpu subs
;
; move @teamset1_obj,a0,L
; calla DELOBJ
; move @teamset2_obj,a0,L
; calla DELOBJ
; move @name1_obj,a0,L
; calla DELOBJ
; move @name2_obj,a0,L
; calla DELOBJ
; move @name3_obj,a0,L
; calla DELOBJ
; move @name4_obj,a0,L
; calla DELOBJ
;
; movk 9,a11
; movi attrib1_obj,a10
; movi attrib2_obj,a9
; movi attrib3_obj,a8
; movi attrib4_obj,a7
;
;#lp move *a10+,a0,L
; calla DELOBJ
; move *a9+,a0,L
; calla DELOBJ
; move *a8+,a0,L
; calla DELOBJ
; move *a7+,a0,L
; calla DELOBJ
; dsjs a11,#lp
;
; movi BAKLST,a14
;
;#lp2 move a14,a3 ;A3=*Prev
; move *a14,a14,L ;A14=*Next
; jrz #x
;#cmp move *a14(OZPOS),a2
; cmpi 60,a2
; jrz #kil
; cmpi 61,a2
; jrne #lp2
;#kil
;
; move *a14,*a3,L ;Unlink from obj list
;
; move @OFREE,*a14+,L ;Add to free list
; subk 32,a14
; move a14,@OFREE,L
; move *a3,a14,L
; jrnz #cmp
;#x
; move @credit1_obj,a0,L
; calla DELOBJ
; move @credit2_obj,a0,L
; calla DELOBJ
; move @credit3_obj,a0,L
; calla DELOBJ
;
; clr a0
; callr create_credits
;
; rets
#******************************************************************************
SUBR brown_shadow
rets
; movi NBAPAL,a0
; calla pal_find
; andi 0ff00h,a0
; move a0,a10
;
;; callr obj_ckpal
;; rets
;
;
; move a10,a1 ;dest pal
; ori 52,a1 ;26*16,a1 ;26
; movi #brown_shad,a0 ;pal data
; movk 3,a2 ;3 colours
; calla pal_set
; rets
;
;#brown_shad
; .word 11<<10+5<<5+0
; .word 9<<10+3<<5+0
; .word 7<<10+2<<5+0
;
;obj_ckpal
; movi OBJLST,a14
; movi kp_ram,a2
; clr a1
; move a1,*a2,L
;
;#lp
; move *a14,a14,L ;A14=*Next
; jrz #x
; move *a14(OPAL),a1
; cmp a0,a1
; jrne #lp
;
; move a14,*a2+,L
; clr a1
; move a1,*a2,L
; jruc #lp
;
;#x
; movi kp_ram,a2
;#lp2
; move *a2+,a0,L
; jrz #xx
; calla DELOBJ
; jruc #lp2
;#xx
; rets
#******************************************************************************
SUBR blue_shadow
rets
; movi wood64b,a0 ;NBAPAL,a0
; calla pal_find
;; andi 0ff00h,a0
; move a0,a10
;
;
; callr obj_ckpal
;
; movi NBAPAL,a0 ;NBAPAL,a0
; calla pal_find
;; andi 0ff00h,a0
; move a0,a10
;
;
; callr obj_ckpal
; rets
;
;
; move a10,a1 ;dest pal
; ori 52,a1 ;26*16,a1 ;26
; movi #blue_shad,a0 ;pal data
; movk 3,a2 ;3 colours
; calla pal_set
; rets
;
;#blue_shad
; .word 0<<10+3<<5+6 ;2
; .word 0<<10+2<<5+4 ;6
; .word 0<<10+0<<5+0 ;52
#*****************************************************************************
;challenger needed / teammate needed message
;on name entry screen
;a10 = player (0-3)
;; .asg 105,CHALLY
.asg 88,CHALLY
SUBR challenger
move a10,a0
sll 4,a0
addi #chall_x,a0
move @TWOPLAYERS,a1 ;0 = NO, 1 = YES 2 players
jrz #not_2p
addi 4*16,a0
#not_2p
move *a0,a0
sll 16,a0 ;x val
movi [CHALLY,0],a1 ;y val
; move @gmqrtr,a2
; cmpi 2,a2
; jrnz #skp
; movi [CHALLY+256,0],a1 ;y val
#skp
movi CHALENG,a2 ;* image
movi 1000,a3 ;z pos
movi DMAWNZ,a4 ;DMA flags
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
#isoff
calla obj_off
SLEEPK 1
move @PSTATUS,a0
btst a10,a0
jrz #ison
move @PSTATUS,a0
btst a10,a0
jrnz #isoff
#ison
move @PSTATUS2,a0
btst a10,a0
jrz #ison2
movi continue,a0 ;* image
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
calla obj_on
#wait
move @can_enter_inits,a0 ;finished initials entry?
jrz #done
SLEEPK 1
move @PSTATUS,a0
btst a10,a0
jrz #wait
#ison2
calla obj_on
#loop
SLEEPK 1
move @can_enter_inits,a0 ;finished initials entry?
jrz #done
move @PSTATUS,a0
btst a10,a0
jrnz #isoff
move @PCNT,a0 ;frame count
btst 6,a0
jrnz #nojoin
movi join3,a0 ;* image
jruc #join
#nojoin
movi CHALENG,a0 ;* image
move a10,a1
xori 1,a1 ;teammate bit
move @PSTATUS,a2
btst a1,a2
jrz #ischall
movi TMATE,a0 ;* image
#ischall
#join
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
jruc #loop
#done
calla DELOBJA8
DIE
#chall_x .word 55,150,249,344 ;x val
.word 0,101,295,0 ;x val for KIT
#*****************************************************************************
;challenger needed message
;on team selection screen
;a10 = team (0-1)
.asg 160-14+TEAMSEL_PAGE,CHALLY
;;;; .asg 172-14+TEAMSEL_PAGE,CHALLY
SUBR challenger2
move a10,a0
sll 4,a0
addi #chall_x,a0
move *a0,a0
sll 16,a0 ;x val
movi [CHALLY,0],a1 ;y val
movi CHALENG,a2 ;* image
movi 1000,a3 ;z pos
movi DMAWNZ,a4 ;DMA flags
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
move a10,a11 ;(0-1)
sll 4,a11 ;x 16 bits
addi team1,a11 ;team1 or team2
#isoff
calla obj_off
SLEEPK 1
move *a11,a0
jrnn #isoff
calla obj_on
#loop
SLEEPK 1
move *a11,a0
jrnn #isoff
movi CHALENG,a0 ;* image
move @PCNT,a1 ;frame count
btst 6,a1
jrnz #nojoin
movi join3,a0 ;* image
#nojoin
movi DMAWNZ,a1 ;DMA flags
calla obj_aniq ;change object image
jruc #loop
#chall_x .word 101,295 ;x val
#*****************************************************************************
SUBR drw_chicks
RETP
;;;;;;;;;;TABLES;;;;;;;;;;;;;
;;;;;;;;;;TABLES;;;;;;;;;;;;;
;;;;;;;;;;TABLES;;;;;;;;;;;;;
;;;;;;;;;;TABLES;;;;;;;;;;;;;
plyr_names_img_tbl
.long ATLNAUG,ATLNBLA,ATLNSMI,ATLNLAE,ATLNNOR
.long BOSNBRO,BOSNBAR,BOSNMON,BOSNRAD,BOSNFOX
.long CHANAND,CHANJOH,CHANRIC,CHANZID,CHANCUR
.long CHINPIP,CHINROD,CHINKUK,CHINLON,CHINKER
.long CLENHIL,CLENMIL,CLENPHI,CLENBRA,CLENFER
.long DALNJAC,DALNKID,DALNMAS,DALNJON,DALNMcC
.long DENNRAU,DENNMUT,DENNMcD,DENNROS,DENNELL
.long DETNDUM,DETNHIL,DETNMIL,DETNTHO,DETNHOU
.long GOLNWIL,GOLNSPR,GOLNSEI,GOLNSMI,GOLNMUL
.long HOUNOLA,HOUNDRE,HOUNHOR,HOUNCAS,HOUNSMI
.long INDNMIL,INDNDAV,INDNSMI,INDNMcK,INDNJAC
.long LACNVAU,LACNROG,LACNMUR,LACNRIC,LACNBAR
.long LALNEXE,LALNDIV,LALNCEB,LALNCAM,LALNJON
.long MIANMOU,MIANWIL,MIANCHA,MIANHAR,MIANDAN
.long MILNBAK,MILNROB,MILNRES,MILNBEN,MILNDOU
.long MINNRID,MINNLAN,MINNWEB,MINNGUG,MINNGAR
.long NWJNGIL,NWJNBRA,NWJNGIL,NWJNOBA,NWJNEDW
.long NWYNEWI,NWYNMAS,NWYNHAR,NWYNOAK,NWYNSTA
.long ORLNHAR,ORLNGRA,ORLNAND,ORLNSCO,ORLNKON
.long PHINSTA,PHINCOL,PHINWEA,PHINRUF,PHINMAX
.long PHONJOH,PHONTIS,PHONMAN,PHONPER,PHONFIN
.long PORNSTR,PORNROB,PORNSAB,PORNWIL,PORNCHI
.long SACNOWE,SACNRIT,SACNGRA,SACNMAR,SACNEDN
.long SANNELL,SANNROB,SANNJOH,SANNPER,SANNNEG
.long SEANKEM,SEANPAY,SEANSCH,SEANHAW,SEANFOR
.long TORNROG,TORNSTO,TORNROB,TORNMIL,TORNMUR
.long UTANSTO,UTANMAL,UTANHOR,UTANBEN,UTANMOR
.long VANNANT,VANNEDW,VANNSCO,VANNREE,VANNMUR
.long WASNHOW,WASNWEB,WASNCHE,WASNPAC,WASNMUR
;-------------------
matchup_mod
.long BKGDBMOD
.word 0,0 ;x,y
.long VSSCRBMOD
.word 0,10 ;x,y
.long 0
bsd_stat_str_setup
PRINT_STR bast8_ascii,5,0,200,195,BAST_Y_P,0
bsd_stat_str
.string "BASED ON STATS:",0
.even
favored_by_str
.string " FAVORED BY ",0
.even
tnght_mat_str_setup
PRINT_STR brush20_ascii,13,0,200,7,BRSHGYOP,0
tonght_matchup_str
.string "TONIGHT'S MATCHUP",0
.even
tm1_cty_str_setup
PRINT_STR bast10_ascii,8,0,80,44,BAST_W_P,0
tm1_nme_str_setup
; PRINT_STR bast18_ascii,8,0,80,59,BSTGWW_P,0
PRINT_STR brush20_ascii,8,0,80,59,BRSHGWKP,0
tm2_cty_str_setup
PRINT_STR bast10_ascii,8,0,310,44,BAST_W_P,0
tm2_nme_str_setup
; PRINT_STR bast18_ascii,8,0,310,59,BSTGWW_P,0
PRINT_STR brush20_ascii,8,0,310,59,BRSHGWKP,0
city_names_str_tbl
.long atl_str,atl2_str
.long bos_str,bos2_str
.long cha_str,cha2_str
.long chi_str,chi2_str
.long cle_str,cle2_str
.long dal_str,dal2_str
.long den_str,den2_str
.long det_str,det2_str
.long gol_str,gol2_str
.long hou_str,hou2_str
.long ind_str,ind2_str
.long cli_str,cli2_str
.long lak_str,lak2_str
.long mia_str,mia2_str
.long mil_str,mil2_str
.long min_str,min2_str
.long new_str,new2_str
.long ney_str,ney2_str
.long orl_str,orl2_str
.long phi_str,phi2_str
.long pho_str,pho2_str
.long por_str,por2_str
.long sac_str,sac2_str
.long san_str,san2_str
.long sea_str,sea2_str
.long tor_str,tor2_str
.long uta_str,uta2_str
.long van_str,van2_str
.long was_str,was2_str
atl_str
.string "ATLANTA",0
atl2_str
.string "HAWKS",0
bos_str
.string "BOSTON",0
bos2_str
.string "CELTICS",0
cha_str
.string "CHARLOTTE",0
cha2_str
.string "HORNETS",0
chi_str
.string "CHICAGO",0
chi2_str
.string "BULLS",0
cle_str
.string "CLEVELAND",0
cle2_str
.string "CAVALIERS",0
dal_str
.string "DALLAS",0
dal2_str
.string "MAVERICKS",0
den_str
.string "DENVER",0
den2_str
.string "NUGGETS",0
det_str
.string "DETROIT",0
det2_str
.string "PISTONS",0
gol_str
.string "GOLDEN STATE",0
gol2_str
.string "WARRIORS",0
hou_str
.string "HOUSTON",0
hou2_str
.string "ROCKETS",0
ind_str
.string "INDIANA",0
ind2_str
.string "PACERS",0
cli_str
.string "LOS ANGELES",0
cli2_str
.string "CLIPPERS",0
lak_str
.string "LOS ANGELES",0
lak2_str
.string "LAKERS",0
mia_str
.string "MIAMI",0
mia2_str
.string "HEAT",0
mil_str
.string "MILWAUKEE",0
mil2_str
.string "BUCKS",0
min_str
.string "MINNESOTA",0
min2_str
.string "T'WOLVES",0
new_str
.string "NEW JERSEY",0
new2_str
.string "NETS",0
ney_str
.string "NEW YORK",0
ney2_str
.string "KNICKS",0
orl_str
.string "ORLANDO",0
orl2_str
.string "MAGIC",0
phi_str
.string "PHILADELPHIA",0
phi2_str
.string "76ERS",0
pho_str
.string "PHOENIX",0
pho2_str
.string "SUNS",0
por_str
.string "PORTLAND",0
por2_str
.string "TRAILBLZRS",0
sac_str
.string "SACRAMENTO",0
sac2_str
.string "KINGS",0
san_str
.string "SAN ANTONIO",0
san2_str
.string "SPURS",0
sea_str
.string "SEATTLE",0
sea2_str
.string "SONICS",0
uta_str
.string "UTAH",0
uta2_str
.string "JAZZ",0
tor_str
.string "TORONTO",0
tor2_str
.string "RAPTORS",0
van_str
.string "VANCOUVER",0
van2_str
.string "GRIZZLIES",0
was_str
.string "WASHINGTON",0
was2_str
.string "BULLETS",0
.even
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
logos
.long T_HAWKS ; 0 ATLANTA (124)
.long T_CELTS ; 1 BOSTON
.long T_HORS ; 2 CHARLOTTE
.long T_BULLS ; 3 CHICAGO
.long T_CAVS ; 4 CLEVELAND
.long T_MAVS ; 5 DALLAS
.long T_NUGS ; 6 DENVER
.long T_PISS ; 7 DETROIT
.long T_WARS ; 8 GOLDEN STATE
.long T_ROCKS ; 9 HOUSTON
.long T_PACER ;10 INDIANA
;FIXX!!!
.long T_LAKS ;12 LOS ANGELES (LAKERS)
.long T_CLIPS ;11 LOS ANGELES (CLIPPERS)
;FIXX!!!
.long T_HEAT ;13 MIAMI
.long T_BUCKS ;14 MILWAUKEE
.long T_TWOLV ;15 MINNESOTA
.long T_NETS ;16 NEW JERSEY
.long T_KNIKS ;17 NEW YORK
.long T_MAGIC ;18 ORLANDO
.long T_76RS ;19 PHILADELPHIA
.long T_SUNS ;20 PHOENIX
.long T_BLAZ ;21 PORTLAND
.long T_KINGS ;22 SACRAMENTO
.long T_SPURS ;23 SAN ANTONIO
.long T_SONICS ;24 SEATTLE
.long T_RAPT ;25 TORONTO
.long T_JAZZ ;26 UTAH
.long T_GRIZZ ;27 VANCOUVER
.long T_BULTS ;28 WASHINGTON (150)
;FIX!!! Defeated all teams special logo
.long T_BULTS ; Special team
;-----------------------------------------------------------------------------
; This TABLE has the following format: ptr. to city name img, team number
;
; Its used for the CURSOR control on the new team select screen
;-----------------------------------------------------------------------------
LW city_tor,_TOR
LW city_uta,_UTA
LW city_van,_VAN
LW city_was,_WAS
city_table_start
LW city_atl,_ATL
LW city_bos,_BOS
LW city_cha,_CHA
LW city_chi,_CHI
LW city_cle,_CLE
LW city_dal,_DAL
LW city_den,_DEN
LW city_det,_DET
LW city_gol,_GOL
LW city_hou,_HOU
LW city_ind,_IND
LW city_lac,_LAC
LW city_lal,_LAL
;; LW city_los,_LOS
LW city_mia,_MI
LW city_mil,_MIL
LW city_min,_MIN
LW city_nej,_NJ
LW city_ney,_NY
LW city_orl,_ORL
LW city_phi,_PHI
LW city_pho,_PHX
LW city_por,_POR
LW city_sac,_SAC
LW city_san,_SAN
LW city_sea,_SEA
LW city_tor,_TOR
LW city_uta,_UTA
LW city_van,_VAN
LW city_was,_WAS
city_table_end
LW city_atl,_ATL
LW city_bos,_BOS
LW city_cha,_CHA
LW city_chi,_CHI
LW city_cle,_CLE
LW city_dal,_DAL
LW city_den,_DEN
city_table_end2
********NOTE***************************************************************
* IF this table is messed with, 'name_sort' table must be updated as well
* and vice versa
********NOTE***************************************************************
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
player_attribs
;
; LAST TWO ATTRIBUTES ARE NOW IGNORED
;
;MJT Start
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;1 ATLANTA HAWKS
.word 08,03,05,07
.word 06,02,04,08 ;STACEY AUGMON 6'8" 205 thin
.word 09,02,07,00
.word 09,01,07,09 ;MOOKIE BLAYLOCK 6'1" 185 reg
.word 07,05,08,05
.word 05,02,04,06 ;STEVE SMITH 6'8" 208 reg
.word 07,06,07,03
.word 05,05,05,08 ;CHRISTIAN LAETTNER 6'11" 235 reg
.word 07,04,06,06
.word 04,05,04,02 ;KEN NORMAN 6'8" 223 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;2 BOSTON CELTICS ;Done
.word 08,02,05,07
.word 07,01,05,02 ;DEE BROWN 6'1" 161 reg
.word 09,01,09,01
.word 07,01,06,05 ;DANA BARROS 5'11" 165 reg
.word 04,08,03,07
.word 01,06,03,03 ;ERIC MONTROSS ____________
.word 07,08,07,07
.word 07,09,01,06 ;DINO RADJA 6'11" 225 thin
.word 05,09,07,05
.word 08,05,07,07 ;RICK FOX 6'7" 231 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;3 CHARLOTTE HORNETS
.word 10,03,06,00
.word 08,03,09,06 ;KENNY ANDERSON 6'1" 168 ex thin
.word 07,08,07,08
.word 04,05,07,08 ;LARRY JOHNSON 6'7" 250 fat
.word 07,05,10,05
.word 06,02,02,09 ;GLEN RICE 6'8" 220 reg
.word 03,08,04,04
.word 02,07,03,02 ;GEORGE ZIDEK _____________
.word 08,02,07,01
.word 08,01,04,07 ;DELL CURRY 6'5" 200 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;4 CHICAGO BULLS
.word 08,06,08,09
.word 09,08,07,08 ;SCOTTIE PIPPEN 6'7" 225 thin
.word 07,09,01,04
.word 05,07,04,03 ;DENNIS RODMAN 6'8" 210 thin
.word 07,05,07,06
.word 07,05,08,10 ;TONI KUKOC 6'11" 230 ex thin
.word 05,08,05,03
.word 02,07,06,02 ;LUC LONGLEY 7'2" 265 fat
.word 06,02,09,00
.word 06,01,04,08 ;STEVE KERR ____________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;5 CLEVELAND CAVALIERS
.word 06,08,06,06
.word 03,06,04,07 ;TYRONE HILL 6'9" 245 reg
.word 07,05,07,03
.word 04,05,04,02 ;CHRIS MILLS 6'6" 216 fat
.word 08,05,07,01
.word 08,04,07,02 ;BOBBY PHILLS 6'5" 217 reg
.word 09,02,08,01
.word 08,01,07,09 ;TERRELL BRANDON 6'0" 180 thin
.word 04,07,07,02
.word 05,02,05,08 ;DANNY FERRY 6'10" 245 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;6 DALLAS MAVERICKS
.word 07,04,07,05
.word 05,04,05,07 ;JIM JACKSON 6'6" 220 reg
.word 09,04,04,05
.word 06,06,08,08 ;JASON KIDD ______________
.word 08,03,09,08
.word 04,07,05,09 ;JAMAL MASHBURN 6'8" 240 thin
.word 05,08,04,07
.word 04,06,03,03 ;POPEYE JONES 6'8" 250 reg
.word 07,05,07,05
.word 05,05,04,02 ;GEORGE McCLOUD 6'8" 215 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;7 DENVER NUGGETS
.word 08,02,07,00
.word 08,01,08,09 ;MAHMOUD ABDUL-RAUF 6'1" 168 ex thin
.word 06,09,04,08
.word 05,10,03,07 ;DIKEMBE MUTOMBO 7'2" 245 reg
.word 07,01,06,07
.word 05,07,03,07 ;ANTONIO McDYESS ______________
.word 09,04,06,06
.word 08,06,08,09 ;JALEN ROSE ______________
.word 07,06,08,02
.word 06,01,05,08 ;DALE ELLIS 6'7" 215 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;8 DETROIT PISTONS
.word 06,04,08,00
.word 06,01,08,09 ;JOE DUMARS 6'3" 195 thin
.word 09,05,08,08
.word 08,05,08,09 ;GRANT HILL _____________
.word 04,06,06,02
.word 04,02,05,08 ;TERRY MILLS 6'10" 250 fat
.word 07,09,05,07
.word 04,07,05,02 ;OTIS THORPE 6'10" 246 reg
.word 08,01,10,02
.word 04,03,05,07 ;ALAN HOUSTON 6'6" 200 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;9 GOLDEN STATE WARRIORS
.word 05,09,05,07
.word 04,04,01,04 ;KEVIN WILLIS 7'0" 240 reg
.word 09,04,08,08
.word 07,02,04,08 ;LATRELL SPREWELL 6'5" 190 ex thin
.word 05,08,05,03
.word 03,07,04,04 ;RONY SEIKALY 6'11" 252 reg
.word 07,07,07,09
.word 07,08,02,03 ;JOE SMITH _____________
.word 04,05,09,02
.word 08,04,07,08 ;CHRIS MULLIN 6'7" 215 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;10 HOUSTON ROCKETS
.word 07,10,07,08
.word 07,10,07,07 ;HAKEEM OLAJUWON 7'0" 255 reg
.word 07,03,08,09
.word 08,02,08,08 ;CLYDE DREXLER 6'7" 222 thin
.word 08,06,06,08
.word 07,08,05,09 ;ROBERT HORRY 6'10" 220 thin
.word 09,01,06,01
.word 04,01,06,02 ;SAM CASSELL 6'3" 195 thin
.word 06,04,06,01
.word 07,01,07,04 ;KENNY SMITH ______________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;11 INDIANA PACERS
.word 07,04,09,06
.word 06,05,05,10 ;REGGIE MILLER 6'7" 185 ex thin
.word 05,06,04,06
.word 05,08,02,02 ;DALE DAVIS 6'11" 230 reg
.word 06,09,07,03
.word 04,06,02,09 ;RIK SMITS 7'4" 265 ex thin
.word 07,05,05,05
.word 07,07,06,03 ;DEREK McKEE 6'10" 225 reg
.word 07,04,06,01
.word 09,04,09,04 ;MARK JACKSON 6'3" 192 fat
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;12 L.A. CLIPPERS
.word 05,07,07,06
.word 06,06,01,08 ;LOY VAUGHT 6'9" 240 reg
.word 06,08,05,05
.word 02,03,02,05 ;RODNEY ROGERS _____________
.word 08,05,06,05
.word 08,04,06,09 ;LAMOND MURRAY _____________
.word 08,01,04,01
.word 08,01,08,02 ;POOH RICHARDS _____________
.word 08,05,06,09
.word 06,04,05,08 ;BRENT BARRY _____________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;13 L.A. LAKERS
.word 10,02,07,01
.word 06,01,08,09 ;NICK VAN EXEL 6'1" 170 ex thin
.word 05,08,04,04
.word 05,09,06,02 ;VLADE DIVAC 7'1" 260 thin
.word 08,03,09,07
.word 08,02,02,08 ;CEDRIC CEBALLOS 6'7" 220 thin
.word 06,05,05,06
.word 08,09,01,03 ;ELDON CAMPBELL 6'11" 230 ex thin
.word 08,04,07,05
.word 04,07,08,02 ;EDDIE JONES ________________
; .word 07,07,08,01
; .word 08,05,09,09 ;MAGIC JOHNSON
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;14 MIAMI HEAT ;Done
.word 08,10,06,09
.word 04,09,03,07 ;ALONZO MOURNING 6'10" 240 reg
.word 08,06,07,07
.word 05,08,06,03 ;WALT WILLIAMS 6'8" 230 reg
.word 06,03,08,02
.word 02,04,06,09 ;REX CHAPMAN 6'8" 230 reg
.word 09,05,07,00
.word 08,01,08,06 ;TIM HARDAWAY 6'0" 195 reg
.word 05,05,08,02
.word 04,05,05,04 ;SASHA DANILOVIC _____________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;15 MILWAUKEE BUCKS
.word 08,05,07,08
.word 05,07,04,06 ;VIN BAKER 6'11" 234 thin
.word 07,07,09,06
.word 07,02,04,08 ;GLENN ROBINSON ______________
.word 09,01,06,00
.word 07,01,07,09 ;SHAWN RESPERT ______________
.word 03,09,04,04
.word 03,07,01,01 ;BENOIT BENJAMIN 7'0" 265 fat
.word 06,03,06,00
.word 06,01,06,03 ;SHERMAN DOUGLAS 6'1" 180 fat
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;16 MINNESOTA TIMBERWOLVES
.word 09,04,05,09
.word 04,01,02,06 ;ISIAH RIDER 6'5" 215 thin
.word 06,08,05,06
.word 04,09,02,04 ;ANTONIO LANG 6'11" 235 reg
.word 09,00,05,09
.word 07,00,06,05 ;SPUD WEBB 6'5" 215 thin
.word 07,06,07,05
.word 09,07,06,03 ;TOM GUGLIOTTA 6'10" 240 reg
.word 08,02,05,08
.word 05,08,04,03 ;KEVIN GARNETT ____________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;17 NEW JERSEY NETS
.word 08,02,06,05
.word 07,05,07,03 ;KENDALL GILL 6'5" 200 thin
.word 05,03,05,08
.word 04,10,03,04 ;SHAWN BRADLEY 7'6" 248 ex thin
.word 06,08,07,06
.word 07,06,04,02 ;ARMON GILLIAM 6'9" 245 fat
.word 08,04,05,06
.word 09,05,05,08 ;ED O'BANNON ______________
.word 07,02,06,01
.word 08,01,03,03 ;KEVIN EDWARDS 6'3" 210 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;18 NEW YORK KNICKS
.word 06,10,07,08
.word 04,10,02,08 ;PATRICK EWING 7'0" 240 reg
.word 06,09,06,05
.word 03,03,04,06 ;ANTHONY MASON 6'7" 250 fat
.word 06,05,06,01
.word 07,01,05,05 ;DEREK HARPER 6'4" 206 reg
.word 05,08,05,07
.word 05,02,04,02 ;CHARLES OAKLEY 6'9" 245 fat
.word 09,05,08,02
.word 07,02,08,08 ;JOHN STARKS 6'5" 185 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;19 ORLANDO MAGIC
.word 10,04,08,08
.word 08,07,08,10 ;ANFERNEE HARDAWAY 6'7" 200 ex thin
.word 06,08,05,06
.word 04,08,04,04 ;HORACE GRANT 6'10" 220 reg
.word 07,04,08,03
.word 08,04,04,04 ;NICK ANDERSON 6'6" 205 reg
.word 07,03,09,03
.word 04,04,05,04 ;DENNIS SCOTT 6'8" 229 reg
.word 04,06,05,07
.word 03,05,03,02 ;JON KONCAK 7'0" 250 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;20 PHILADELPHIA 76ers
.word 08,04,07,08
.word 05,03,05,07 ;JERRY STACKHOUSE ______________
.word 05,08,07,06
.word 03,05,03,02 ;DERRICK COLEMAN 6'10" 260 fat
.word 05,06,06,06
.word 04,06,05,07 ;CLARENCE WEATHERSPOON 6'7" 240 fat
.word 08,01,07,01
.word 04,01,07,04 ;TREVOR RUFFIN
.word 07,04,08,03
.word 05,03,06,04 ;VERNON MAXWELL 6'4" 190 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;21 PHOENIX SUNS
.word 09,02,08,02
.word 08,03,08,09 ;KEVIN JOHNSON 6'1" 190 ex thin
.word 04,08,08,06
.word 04,06,05,07 ;WAYMAN TISDALE 6'9" 260 fat
.word 05,06,05,07
.word 04,05,03,06 ;DANNY MANNING 6'10" 234 reg
.word 08,05,07,04
.word 08,05,04,09 ;WESLEY PERSON ____________
.word 09,02,07,09
.word 07,02,04,09 ;MICHAEL FINLEY ____________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;22 PORTLAND TRAILBLAZERS
.word 08,03,07,00
.word 07,01,09,06 ;ROD STRICKLAND 6'3" 185 reg
.word 06,07,06,06
.word 06,07,02,08 ;CLIFF ROBINSON 6'10" 225 thin
.word 04,09,06,05
.word 03,07,02,04 ;ARVYDAS SABONIS _______________
.word 06,05,04,06
.word 04,05,04,04 ;BUCK WILLIAMS _______________
.word 09,02,05,00
.word 06,01,08,08 ;RANDOLPH CHILDRESS ____________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;23 SACRAMENTO KINGS
.word 07,06,07,06
.word 04,02,07,03 ;BILLY OWENS 6'9" 220 reg
.word 07,07,08,02
.word 09,01,06,08 ;MITCH RICHMOND 6'5" 215 reg
.word 05,06,05,06
.word 02,09,01,06 ;BRIAN GRANT ______________
.word 04,05,08,01
.word 08,01,02,07 ;SARUNAS MARCIULIONIS 6'5" 215 reg
.word 10,01,06,00
.word 08,00,08,04 ;TYUS EDNEY ______________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;24 SAN ANTONIO SPURS
.word 08,04,08,07
.word 04,05,02,08 ;SEAN ELLIOTT 6'8" 215 thin
.word 08,09,08,06
.word 05,10,04,06 ;DAVID ROBINSON 7'1" 235 reg
.word 10,01,05,00
.word 08,01,09,02 ;AVERY JOHNSON 5'11" 175 ex thin
.word 06,06,06,04
.word 04,04,02,07 ;CHUCK PERSON 6'8" 225 reg
.word 07,03,06,01
.word 07,01,03,02 ;VINNY DEL NEGRO 6'4" 200 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;25 SEATTLE SUPERSONICS
.word 08,07,08,10
.word 06,09,03,07 ;SHAWN KEMP 6'10" 245 reg
.word 10,03,07,00
.word 10,02,08,08 ;GARY PAYTON 6'4" 190 ex thin
.word 05,06,08,05
.word 02,04,04,02 ;DETLEF SCHREMPF 6'10' 230 thin
.word 06,03,07,00
.word 06,04,05,07 ;HERSEY HAWKINS 6'3" 190 thin
.word 07,03,04,04
.word 04,04,06,04 ;SHERELL FORD 6'6" 235 thin
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;26 TORONTO RAPTORS
.word 06,08,05,05
.word 06,04,05,01 ;CARLOS ROGERS ______________
.word 10,01,07,00
.word 08,01,09,08 ;DAMON STOUDAMIRE _______________
.word 06,04,06,01
.word 09,06,07,08 ;ALVIN ROBERTSON ______________
.word 04,08,05,02
.word 04,09,04,02 ;OLIVER MILLER 6'9" 290 ex fat
.word 06,05,07,05
.word 03,03,02,07 ;TRACY MURRAY 6'7" 228 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;27 UTAH JAZZ
.word 07,02,08,00
.word 10,01,10,08 ;JOHN STOCKTON 6'1" 175 ex thin
.word 07,10,08,08
.word 08,05,06,07 ;KARL MALONE 6'9" 256 fat
.word 05,05,07,02
.word 07,02,05,06 ;JEFF HORNACEK 6'4" 190 reg
.word 06,05,05,06
.word 05,05,05,04 ;DAVID BENOIT 6'8" 220 thin
.word 05,06,07,05
.word 08,04,04,02 ;CHRIS MORRIS 6'8" 220 reg
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;28 VANCOUVER GRIZZLIES
.word 08,04,05,01
.word 07,02,07,02 ;GREG ANTHONY 6'2" 185 ex thin
.word 07,06,07,04
.word 08,05,03,07 ;BLUE EDWARDS 6'4" 228 reg
.word 07,04,08,01
.word 04,03,04,09 ;BYRON SCOTT
.word 05,10,06,04
.word 05,08,02,02 ;BRYANT REEVES _______________
.word 08,02,06,01
.word 09,01,06,05 ;ERIC MURDOCK _______________
;Speed, Power, Shoot, Dunk
;Steal, Block, Pass ability, Clutch
;29 WASHINGTON BULLETS
.word 07,07,08,06
.word 05,03,04,06 ;JUWAN HOWARD _____________
.word 08,08,08,08
.word 06,04,06,07 ;CHRIS WEBBER 6'10" 260 fat
.word 07,05,06,06
.word 06,02,02,08 ;CALBERT CHEANEY 6'7" 209 reg
.word 09,03,06,00
.word 09,00,09,02 ;ROBERT PACK 6'2" 180 thin
.word 04,09,05,02
.word 03,09,01,04 ;GHEORGHE MURESAN 7'7" 315 thin
;MJT End
;FIX!!!
;Move these to where they should go (If anywhere!)
;Special super star secret guests
;
;;ATL
; .word 06,04,05,06
; .word 05,08,04,03 ;ALAN HENDERSON ____________
;
;;G.S
; .word 06,05,05,05
; .word 06,04,05,05 ;BIMBO COLES 6'2" 185 reg
;
;;ATL
; .word 05,08,05,06
; .word 03,06,01,04 ;SEAN ROOKS 6'10" 260 reg
;
;;N.Y.
; .word 07,02,06,05
; .word 04,06,05,07 ;WILLIE ANDERSON 6'8" 200 reg
;
;;ORL
; .word 05,06,05,06
; .word 03,06,04,05 ;KENNY GATTISON 6'8" 252 fat
;
;;L.A.
; .word 08,04,07,05
; .word 04,07,08,02 ;EDDIE JONES ________________
;
;
;;TOR
; .word 05,05,04,07
; .word 04,07,04,04 ;SHARONE WRIGHT ______________
********NOTE**************************************************************
* IF this table is messed with, 'player_attribs' must be updated as well
* and vice versa
********NOTE**************************************************************
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
name_sort
.long AUGMON,BLAYLOCK,SSMITH,LAETTNER,KNORMAN ;00 HAWKS
.long BROWN,BARROS,MONTROSS,RADJA,FOX ;01 CELTICS
.long KANDERSON,JOHNSN_L,RICE,ZIDEK,CURRY ;02 HORNETS
.long PIPPEN,RODMAN,KUKOC,LONGLEY,KERR ;03 BULLS
.long THILL,CMILLS,PHILLS,BRANDON,FERRY ;04 CAVALIERS
.long JACK,KIDD,MASH,PJONES,MCCLOUD ;05 MAVERICKS
.long ABDULRAU,MUTUMBO,MCDYESS,ROSE,DELLIS ;06 NUGGETS
.long DUMARS,GHILL,TMILLS,THORPE,HOUSTON ;07 PISTONS
.long WILLIS,SPREWELL,SEIKALY,JSMITH,MULLIN ;08 WARRIORS
.long OLAJUWON,DREXLER,HORRY,CASSELL,SMITH ;09 ROCKETS
.long MILLER,DDAVIS,SMITS,MCKEE2,MJACKSON ;10 PACERS
.long VAUGHT,RROGERS,LMURRAY,PRICHARD,BBARRY ;11 CLIPPERS
; .long VANEXEL,DIVAC,CEBALLOS,CAMPBELL,MJOHNSON ;12 LAKERS
.long VANEXEL,DIVAC,CEBALLOS,CAMPBELL,EJONES ;12 LAKERS
.long MOURN,WWILLIAM,CHAPMAN,THARDAWAY,DANILOVI ;13 HEAT
.long BAKER,GROBINSO,RESPERT,BENJAMIN,DOUGLAS ;14 BUCKS
.long RIDER,LANG,WEBB,GUGLI2,GARNETT ;15 TIMBERWOLVES
.long GILL,BRADLEY,GILLIAM,OBANNON,KEDWARDS ;16 NETS
.long EWING,MASON,HARPER_D,OAKLEY,STARKS ;17 KNICKS
.long AHARDAWAY,GRANT_HC,NANDERSON,DSCOTT,KONCAK ;18 MAGIC
.long STACKHOU,COLEMAN,WEATHSPN,RUFFIN,VMAXWELL ;19 76ers
.long KJOHNSON,TISDALE,MANNING,WPERSON,FINLEY ;20 SUNS
.long STRICKLA,CROBINSON,SABONIS,BWILLIAM,CHILDRES ;21 TRAILBLAZERS
.long BOWENS,RICH,BGRANT,MARCIULO,EDNEY ;22 KINGS
.long ELLIOT2,DROBINSON,AJOHNSON,PERSON,DELNEGRO ;23 SPURS
.long KEMP,PAYTON,SCHREMPF,HAWKINS,SFORD ;24 SUPERSONICS
.long CROGERS,STOUDAMI,ROBERTSON,OMILLER,TMURRAY ;25 RAPTORS
.long STOCKTON,MALONE_K,HORNACEK,BENOIT,CMORRIS ;26 JAZZ
.long ANTHONY,EDWARDS,SCOTT,BREEVES,EMURDOCK ;27 GRIZZLIES
.long JHOWARD,WEBBER,CHEANEY,PACK,MURESAN ;28 BULLETS
.long 0
.if HEADCK
;This show the player name on scrn for debugging
SUBR show_name
move a10,a0
andi 03,a0
sll 4,a0
addi #xtbl,a0
move *a0,a0
sll 16,a0
movi [200,0],a1 ;y val
move a10,a2
sll 5,a2
addi name_sort,a2
move *a2,a2,L
movi >7ff0,a3 ;z pos
movi DMAWNZ|M_SCRNREL,a4 ;DMA flags
clr a5 ;object ID
clr a6 ;x vel
clr a7 ;y vel
calla BEGINOBJ2
DIE
#xtbl .word 57,148,251,342
.endif
;-----------------------------------------------------------------------------
; THIS table contains the MAX number of squads per team
;
; ***NOTE*** if change this table...must also update
; 'player_names' and 'player_heads'
;-----------------------------------------------------------------------------
team_sqaud_cnts
.word 20 ;ATLANTA
.word 20 ;BOSTON
.word 20 ;CHARLOTTE
.word 20 ;CHICAGO
.word 20 ;CLEVELAND
.word 20 ;DALLAS
.word 20 ;DENVER
.word 20 ;DETROIT
.word 20 ;GOLDEN STATE
.word 20 ;HOUSTON
.word 20 ;INDIANA
.word 20 ;L.A. CLIPPERS
.word 20 ;L.A. LAKERS
.word 20 ;MIAMI
.word 20 ;MILWAUKEE
.word 20 ;MINNESOTTA
.word 20 ;NEW JERSEY
.word 20 ;NEW YORK
.word 20 ;ORLANDO
.word 20 ;PHILADELPHIA
.word 20 ;PHOENIX
.word 20 ;PORTLAND
.word 20 ;SACRAMENTO
.word 20 ;SAN ANTONIO
.word 20 ;SEATTLE
.word 20 ;UTAH
.word 20 ;TORONTO
.word 20 ;VANCOUVER
.word 20 ;WASHINGTON
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
our_names
.long JAPPLE ;0 JEFF JOHNSON
.long DIVITA ;1 SAL DIVITA
.long TURMELL ;2 TURMELL
.long THOMPS ;3 THOMPSON
.long GEER ;4 GEER
.long CARLTON ;5 CARLTON
.long HEDRICK ;6 HEDRICK
.long HEY ;7 JOHN HEY
.long AIRMOR ;8 AIR MORRIS
.long BARDO ;9 STEVE BARDO
.long MINIFE ;10 MINIFEE
.long MARTIN ;11 MARTINEZ
.long PESINA ;12 PESINA
.long LIPTAK ;13 LIPTAK
.long FERRIER ;14 EDDIE
.long VINIK ;15 MIKE V.
.long RIVETT ;16 JAMIE R.
.long EHRLICH ;17 NICK ERICH
.long ROOT ;18 JOHN ROOT
.long MEDNICK ;19 C. MEDNICK
.long ROAN ;20 DAN R.
.long FITZ ;21 PAT F.
.long BOON ;22
.long TOBIAS ;23
.long OURSLER ;24
.long AIRMOR ;25 JASON S.
.long QUINN ;26 QUINN
.long PERRY ;27 PERRY from "FRIENDS"
.long FUNK ;28 NEIL FUNK
.long MDOC ;29 MDOC
.long FUNK ;30 BUD
.long MURESAN ;31 MARIUS
.long PIPPEN ;
.long RODMAN ;
.long JOHNSN_L
.long RICE
.long KIDD
.long MUTUMBO
.long GHILL
.long OLAJUWON
.long MILLER
.long SMITS
.long MOURN
.long GROBINSO
.long WEBB
.long EWING
.long STARKS
.long AHARDAWAY
.long GRANT_HC
.long STACKHOU
.long CROBINSON
.long DROBINSON
.long ELLIOT2
.long KEMP
.long MALONE_K
.long WEBBER
.long MURESAN
;-----------------------------------------------------------------------------
; This table contains:
;
; 1) Design team and company worker BIG heads
; 'used with SPECIAL_HEADS' variable
;-----------------------------------------------------------------------------
our_heads
.long JEF_MUG ;0 JEFF JOHNSON
.long SAL_MUG ;1 SAL DIVITA
.long TUR_MUG ;2 TURMELL
.long DAN_MUG ;3 THOMPSON
.long EUG_MUG ;4 GEER
.long JMC_MUG ;5 CARLTON
.long JEN_MUG ;6 HEDRICK
.long HEY_MUG ;7 JOHN HEY
.long WIL_MUG ;8 AIR MORRIS
.long BAR_MUG ;9 STEVE BARDO
.long MIN_MUG ;10 MINIFEE
.long MARTY_MUG ;11 MARTINEZ
.long CARL_MUG ;12 PESINA
.long SHN_MUG ;13 LIPTAK
.long EDD_MUG ;14 EDDIE
.long MXV_MUG ;15 MIKE V.
.long JAM_MUG ;16 JAMIE R.
.long NIK_MUG ;17 NICK ERICH
.long ROT_MUG ;18 JOHN ROOT
.long CAR_MUG ;19 C. MEDNICK
.long ROH_MUG ;20 DAN ROAN ?
.long PAT_MUG ;21 PAT F.
.long BOO_MUG ;22 BOON
.long TOB_MUG ;23 TOBIAS
.long OUR_MUG ;24 OURSLER
.long JAS_MUG ;25 JASON S.
.long QUI_MUG ;26 QUINN
.long PER_MUG ;27 M. PERRY
.long NEI_MUG ;28 NEIL FUNK
.long MDOC_MUG ;29 MDOC
.long BUD_MUG ;30 BUD
.long OLD ;31 MARIUS
;superstars
.long PIP_CHI ;
.long ROD_CHI ;
.long JON_CHA
.long RCE_CHA
.long KID_DAL
.long MUT_DEN
.long HIL_DET
.long OLA_HOU
.long MIL_IND
.long SMI_IND
.long MOU_MIA
.long ROB_MLW
.long WEB_MIN
.long EWG_NEY
.long STA_NEY
.long HAR_ORL
.long GRT_ORL
.long STA_PHL
.long ROB_PRT
.long ROB_SAN
.long ELL_SAN
.long KMP_SEA
.long MLN_UTA
.long WEB_WAS
.long MUR_WAS
our_heads_end
.long SAL_MUG ;0 ;repeat 1st 2 for wrap around
.long SAL_MUG ;1
our_heads_end2
.end

Reference in New Issue View Git Blame Copy Permalink