************************************************************** * * Owner: THOMPSON * * Software: Shawn Liptak, Mark Turmell * Initiated: 7/17/90 * * Modified: Shawn Liptak, 1/27/92 -Started basketball * * COPYRIGHT (C) 1992 WILLIAMS ELECTRONICS GAMES, INC. * *.Last mod - 11/18/92 23:00 ************************************************************** .file "bb2.asm" .title "Basketball game program" .width 132 .option b,d,l,t .mnolist .include "mproc.equ" ;Mproc equates .include "disp.equ" ;Display proc equates .include "gsp.equ" ;Gsp asm equates .include "sys.equ" .include "plyrhd.glo" ; .include "imgtbl1.glo" ; .include "imgpal1.asm" .include "plyrseq.tbl" .include "plyrseq.glo" .include "game.equ" .include "macros.hdr" ;Macros .asg 0,SEQT .include "plyr.equ" .ref NEWILPAL ; .ref PLYRRCH_P .if IMGVIEW .include "imgtbl.glo" .include "imgtbl2.glo" .include STAND.TBL .include "plyrseq2.tbl" ; .include "plyrd2sq.tbl" ; .include layup.TBL ; .include "fireseq.tbl" ; .include "pass.tbl" ; .include "plyrdseq.tbl" ; .include "plyrrseq.tbl" ; .include "imgpal3.asm" ***************************************************************************** ;Debug ;Display each frame of our ball player to check 2nd and 3rd ani pnts, etc. ;Re-insert these lines when tweaking ani points debug_lst .long debug1+16,debug1+16,debug1+16,debug4+16 butn_minus .long 12,12,12,6 butn_plus .long 14,14,14,13 ;a8=0-3 SUBR anipts_debug SLEEP 3*60 sll 5,a8 movi debug_lst,a0 add a8,a0 move *a0,a9,L movi butn_minus,a0 add a8,a0 move *a0,a10 movi butn_plus,a0 add a8,a0 move *a0,a11 movi debug_img_list,a8 clr a0 move a0,*a13(PDATA) movk 3,a1 move a1,*a13(PDATA+16) #swtop SLEEPK 1 move *a8,*a9,L ;Writes to ROM move @SWITCH,a0,L cmpi >ffefffff,a0 jrnz #sw1 clr a0 move a0,*a13(PDATA) jruc #swtop #sw1 move *a13(PDATA),a1 jrz #sw2 ;#swtop move *a13(PDATA+16),a1 jrz #sw2 dec a1 move a1,*a13(PDATA+16) jruc #swtop #sw2 btst a11,a0 ;14 jrz advance btst a10,a0 ;12 jrnz #swtop ;go backwards cmpi debug_img_list,a8 jrz #swtop subk 32,a8 movk 1,a0 move a0,*a13(PDATA) movk 3,a1 move a1,*a13(PDATA+16) jruc #swtop advance cmpi debug_img_end,a8 jrz #swtop addk 32,a8 movk 1,a0 move a0,*a13(PDATA) movk 3,a1 move a1,*a13(PDATA+16) jruc #swtop .asg M_WRNONZ,F .def debug1,debug4 ; .def debug_t1,debug_t4 debug_t1 .word 0 .long 0 .long debug1,debug1,debug1,debug1 .long debug1,debug1,debug1,debug1 debug1 WLW 10,w1js1,F W0 debug_t4 .word 0 .long 0 .long debug4,debug4,debug4,debug4 .long debug4,debug4,debug4,debug4 debug4 WLW 10,w1js1,F W0 debug_img_list .if 0 ;Set A ;From BB2.LOD ;PLYRSEQ.TBL & STAND.TBL ;nba_sht1.img .long w1js1,w1js2,w1js3,w1js4 .long w1js5,w1js6,w1js7,w1js8,w1js9,w1js10,w2js1,w2js2,w2js3,w2js4,w2js5 .long w2js6,w2js7,w2js8,w2js9,w2js10,w3js1,w3js2,w3js3,w3js4,w3js5,w3js6 .long w3js7,w3js8,w3js9,w3js10,w4js1,w4js2,w4js3,w4js4,w4js5,w4js6,w4js7 .long w4js8,w4js9,w4js10,w5js1,w5js2,w5js3,w5js4,w5js5,w5js6,w5js7,w5js8 .long w5js9,w5js10 ;willie.img .long w1jupa .long w2jupa .long w3jupa,w4jupa .long w5jupa ;nba_msc3.img .long w1stwb1,w1stwb2,w1stwb3,w1stwb4,w2stwb1 .long w2stwb2,w2stwb3,w2stwb4,w3stwb1,w3stwb2,w3stwb3,w3stwb4,w4stwb1,w4stwb2 .long w4stwb3,w4stwb4,w5stwb1,w5stwb2,w5stwb3,w5stwb4 ;nba_stn1.img .long W1ST1 .long W1ST2,W1ST3,W1ST4,W1ST5,W1ST6,W2ST1,W2ST2,W2ST3,W2ST4,W2ST5,W2ST6,W3ST1 .long W3ST2,W3ST3,W3ST4,W3ST5,W3ST6,W4ST1,W4ST2,W4ST3,W4ST4,W4ST5,W4ST6,W5ST1 .long W5ST2,W5ST3,W5ST4,W5ST5,W5ST6 .long w1stwbl1,w1stwbl2,w1stwbl3,w1stwbl4 .long w2stwbl1,w2stwbl2,w2stwbl3,w2stwbl4,w3stwbl1,w3stwbl2,w3stwbl3,w3stwbl4 .long w4stwbl1,w4stwbl2,w4stwbl3,w4stwbl4,w5stwbl1,w5stwbl2,w5stwbl3,w5stwbl4 ;nba_def1.img .long T1SWPE1,T1SWPE2,T1SWPE3 .long T1SWPE4,T1SWPE5,T1SWPE6,T1SWPE7,T1SWPE8,T1SWPE9,T2SWPE1,T2SWPE2,T2SWPE3 .long T2SWPE4,T2SWPE5,T2SWPE6,T2SWPE7,T2SWPE8,T2SWPE9,T3SWPE1,T3SWPE2,T3SWPE3 .long T3SWPE4,T3SWPE5,T3SWPE6,T3SWPE7,T3SWPE8,T3SWPE9,T4SWPE1,T4SWPE2,T4SWPE3 .long T4SWPE4,T4SWPE5,T4SWPE6,T4SWPE7,T4SWPE8,T4SWPE9,T5SWPE1,T5SWPE2,T5SWPE3 .long T5SWPE4,T5SWPE5,T5SWPE6,T5SWPE7,T5SWPE8,T5SWPE9,T1SWPU1,T1SWPU2,T1SWPU3 .long T1SWPU4,T1SWPU5,T1SWPU6,T1SWPU7,T1SWPU8,T1SWPU9,T2SWPU1,T2SWPU2,T2SWPU3 .long T2SWPU4,T2SWPU5,T2SWPU6,T2SWPU7,T2SWPU8,T2SWPU9,T3SWPU1,T3SWPU2,T3SWPU3 .long T3SWPU4,T3SWPU5,T3SWPU6,T3SWPU7,T3SWPU8,T3SWPU9,T4SWPU1,T4SWPU2,T4SWPU3 .long T4SWPU4,T4SWPU5,T4SWPU6,T4SWPU7,T4SWPU8,T4SWPU9,T5SWPU1,T5SWPU2,T5SWPU3 .long T5SWPU4,T5SWPU5,T5SWPU6,T5SWPU7,T5SWPU8,T5SWPU9 ;nba_pas1.img .long w1cp1,w1cp2,w1cp3,w1cp4 .long w1cp5,w1cp6,w2cp1,w2cp2,w2cp3,w2cp4,w2cp5,w2cp6,w3cp1,w3cp2,w3cp3,w3cp4 .long w3cp5,w3cp6,w4cp1,w4cp2,w4cp3,w4cp4,w4cp5,w4cp6,w5cp1,w5cp2,w5cp3,w5cp4 .long w5cp5,w5cp6,w1ohp1,w1ohp2,w1ohp3,w1ohp4,w1ohp5,w1ohp6,w1ohp7,w1ohp8 .long w1ohp9,w1ohp10,w1ohp11,w2ohp1,w2ohp2,w2ohp3,w2ohp4,w2ohp5,w2ohp6,w2ohp7 .long w2ohp8,w2ohp9,w2ohp10,w2ohp11,w3ohp1,w3ohp2,w3ohp3,w3ohp4,w3ohp5,w3ohp6 .long w3ohp7,w3ohp8,w3ohp9,w3ohp10,w3ohp11,w4ohp1,w4ohp2,w4ohp3,w4ohp4,w4ohp5 .long w4ohp6,w4ohp7,w4ohp8,w4ohp9,w4ohp10,w4ohp11,w5ohp1,w5ohp2,w5ohp3,w5ohp4 .long w5ohp5,w5ohp6,w5ohp7,w5ohp8,w5ohp9,w5ohp10,w5ohp11 ;nba_msc2.img .long w1push1,w1push2,w1push3 .long w1push4,w1push5,w1push6,w1push7,w1push8,w1push9,w1push10,w1push11 .long w2push1,w2push2,w2push3,w2push4,w2push5,w2push6,w2push7,w2push8,w2push9 .long w2push10,w2push11,w3push1,w3push2,w3push3,w3push4,w3push5,w3push6 .long w3push7,w3push8,w3push9,w3push10,w3push11,w4push1,w4push2,w4push3 .long w4push4,w4push5,w4push6,w4push7,w4push8,w4push9,w4push10,w4push11 .long w5push1,w5push2,w5push3,w5push4,w5push5,w5push6,w5push7,w5push8,w5push9 .long w5push10,w5push11 ;nba_def3.img .long w1reb1,w1reb2,w1reb3,w1reb4,w1reb5,w1reb6,w1reb7,w1reb8,w1reb9,w1reb10 .long w2reb1,w2reb2,w2reb3,w2reb4,w2reb5,w2reb6,w2reb7,w2reb8,w2reb9,w2reb10 .long w3reb1,w3reb2,w3reb3,w3reb4,w3reb5,w3reb6,w3reb7,w3reb8,w3reb9,w3reb10 .long w4reb1,w4reb2,w4reb3,w4reb4,w4reb5,w4reb6,w4reb7,w4reb8,w4reb9,w4reb10 .long w5reb1,w5reb2,w5reb3,w5reb4,w5reb5,w5reb6,w5reb7,w5reb8,w5reb9,w5reb10 ; .long w1blokl1,w1blokl2,w1blokl3,w1blokl4,w1blokl5,w1blokl6,w1blokl7,w1blokl8 ; .long w2blokl1,w2blokl2,w2blokl3,w2blokl4,w2blokl5,w2blokl6,w2blokl7,w2blokl8 ; .long w3blokl1,w3blokl2,w3blokl3,w3blokl4,w3blokl5,w3blokl6,w3blokl7,w3blokl8 ; .long w4blokl1,w4blokl2,w4blokl3,w4blokl4,w4blokl5,w4blokl6,w4blokl7,w4blokl8 ; .long w5blokl1,w5blokl2,w5blokl3,w5blokl4,w5blokl5,w5blokl6,w5blokl7,w5blokl8 ;nba_def4.img .long w1rej1,w1rej2,w1rej3 .long w1rej4,w1rej5,w1rej6,w1rej7,w1rej8,w1rej9,w1rej10,w1rej11,w2rej1,w2rej2 .long w2rej3,w2rej4,w2rej5,w2rej6,w2rej7,w2rej8,w2rej9,w2rej10,w2rej11,w3rej1 .long w3rej2,w3rej3,w3rej4,w3rej5,w3rej6,w3rej7,w3rej8,w3rej9,w3rej10,w3rej11 .long w4rej1,w4rej2,w4rej3,w4rej4,w4rej5,w4rej6,w4rej7,w4rej8,w4rej9,w4rej10 .long w4rej11 .endif ;Set B ;From BB2.LOD ;PLYRSEQ2.TBL ;nba_msc2.img .long w1elbo1,w1elbo3,w1elbo4,w1elbo5,w1elbo6,w1elbo7,w1elbo8 .long w2elbo2,w2elbo3,w2elbo4,w2elbo5,w2elbo6,w2elbo8 .long w4elbo3,w4elbo4,w4elbo5,w4elbo6,w4elbo7,w4elbo8 .long w5elbo3,w5elbo4,w5elbo5,w5elbo6,w5elbo7 .long w4tipst1,w4tipst2,w4tipst3,w4tipst4,w4tipst5,w4tip1 .long w4tip2,w4tip3,w4tip4,w4tip5,w4tip6,w4tip7,w2tipst1,w2tipst2,w2tipst3 .long w2tipst4,w2tipst5,w2tip1,w2tip2,w2tip3,w2tip4,w2tip5,w2tip6,w2tip7 ;nba_msc3.img .long w2hndne1,w2hndne2,w2hndne3,w2hndne4,w2hndne5 .long w4hndne1,w4hndne2,w4hndne3,w4hndne4 .long w4hndne5 .long w2hnesw1,w2hnesw2,w2hnesw3,w2hnesw4 .long w4hnesw1,w4hnesw2,w4hnesw3,w4hnesw4 .long w2hndhp1 .long w2hndhp2,w2hndhp3,w2hndhp4,w2hndhp5 .long w4hndhp1,w4hndhp2,w4hndhp3,w4hndhp4,w4hndhp5 .long w1pikup1,w1pikup2 .long w1pikup3,w1pikup4,w1pikup5,w2pikup1,w2pikup2,w2pikup3,w2pikup4,w2pikup5 .long w3pikup1,w3pikup2,w3pikup3,w3pikup4,w3pikup5,w4pikup1,w4pikup2,w4pikup3 .long w4pikup4,w4pikup5,w5pikup1,w5pikup2,w5pikup3,w5pikup4,w5pikup5 ;nba_msc4.img .long w1fall1,w1fall2,w1fall3,w1fall4,w1fall5 .long w1fall6,w1fall7,w1fall8,w1fall9,w1fall10 .long w2fall1,w2fall2,w2fall3,w2fall4,w2fall5 .long w2fall6,w2fall7,w2fall8,w2fall9,w2fall10,w2fall11 .long w3fall1,w3fall2,w3fall3,w3fall4,w3fall5,w3fall6 .long w3fall7,w3fall8,w3fall9,w3fall10,w3fall11,w3fall12 .long w4fall1,w4fall2,w4fall3,w4fall4,w4fall5,w4fall6 .long w4fall7,w4fall8,w4fall9,w4fall10,w4fall11,w4fall12 .long w5fall1,w5fall2,w5fall3,w5fall5,w5fall6 .long w5fall7,w5fall8,w5fall10,w5fall11,w5fall12 ;nbaspnmv.img .long W3SPMVA1,W3SPMVA2,W3SPMVA3,W3SPMVA4,W3SPMVA5,W3SPMVA6,W3SPMVA7,W3SPMVA8 .long W3SPMVA9,W3SPMVA10,W3SPMVA11,W3SPMVA12,W3SPMVA13,W3SPMVA14,W3SPMVA15 .long W3SPMVA16,W3SPMVA17,W3SPMVA18,W3SPMVA19,W3SPMVA20 debug_img_end .long W3SPMVA20 .endif .end