head	1.1;
branch	1.1.1;
access;
symbols
	iQue_20031113:1.1.1.1
	iQue_beta_1_0:1.1.1.1
	start:1.1.1.1
	Nintendo:1.1.1;
locks; strict;
comment	@# @;
expand	@b@;


1.1
date	2003.02.05.23.41.59;	author wheeler;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2003.02.05.23.41.59;	author wheeler;	state Exp;
branches;
next	;


desc
@@



1.1
log
@Initial revision
@
text
@;**********************************************
;		STAR FOX 64
;		SE SEQUENCE DATA
;		PLAYER
;		1995.12.22(FRI)
;		YOJI INAGAKI
;**********************************************

;****************
;*  SUB TRACK   *
;****************   
_player_se
    Bmode
    bankchg, 0
    pausestatus,$20
    spanpow ,127
    panmode,1
    priority,14
    fxline,1
    sr_load,$00
    sr_portwrite,FX_PORT
    tblset, _player_se_tbl    
@@_INPUT_CHECK
    return
    sr_portread,PORT0
    sr_sbc,$01
    jump0,@@_START
    jump,@@_INPUT_CHECK
@@_START
    spanpow ,127
    closenote,0
    closenote,1
    closenote,2
    sr_load,$00
    sr_portwrite,FX_PORT
    sr_portwrite,PORT7
    sr_portread,PORT4
    ctblcall
@@_PLAY_LOOP_0
    return
    sr_portread,0
    sr_portwrite,PORT5
    sr_sbc,$ff
    jump0,@@_PLAY_LOOP_END
    sr_portread,PORT5
    sr_sbc,$01
    jump0,@@_START
    sr_portread,PORT5
    jump0,@@_PLAY_LOOP_STOP
@@_PLAY_LOOP_END
    chknote,0
    jump0,@@_PLAY_LOOP_0
    sr_load,SE_PORT_END
    sr_portwrite,PORT7
;    closenote,0
;    jump,@@_INPUT_CHECK
@@_PLAY_LOOP_STOP
    closenote,0
    closenote,1
    closenote,2
    jump,@@_INPUT_CHECK



;********************
;   player se table
;********************
_player_se_tbl
#label   _p_lasr0, _p_bomb0, _p_boost, _p_break, _p_sexp0, _p_eng0L, _p_tankL, _p_wmtop
#label   _p_bochg, _p_bexp0, _p_bexp2, _p_bexp1, _p_twlsr, _p_lshld, _p_dmgs0, _p_dmgl0 

#label   _p_arde0, _p_repl0, _p_roll0, _p_wmted, _p_tsht0, _p_tbnd0, _p_tkup0, _p_roll1
#label   _p_step0, _p_step1, _p_step2, _p_step3, _p_rstp0, _p_arbsc, _p_enst0, _p_vltst 

#label   _p_eng1L, _p_lasr1, _p_marn0, _p_wpcv0, _p_hfbn0, _p_mabm0, _p_mabe0, _p_twls2
#label   _p_mabd0, _p_lolz0, _p_arwd0, _p_ttlsr, _p_wgbk0, _p_lsst0, _p_cbex0, _p_tkds0

#label   _p_madb0, _p_mabr0, _p_mbst0, _p_break, _p_sexp0, _p_eng0L, _p_tankL, _p_wmtop


#label   _p_lasr0, _p_bomb0, _p_boost, _p_break, _p_sexp0, _p_eng0L, _p_tankL, _p_wmtop

;*** arwing laser grd ***
;00
_p_lasr0
    prg,_PRG_LASR03
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_lasr0_0
    prg,_PRG_LASR01
;    release,15
_p_lasr0_0
    envelope,ENVE_NOMAL02
    opennote,0,_p_lasr0_note0
    fin

_p_lasr0_note0
;    tieon
;    sweepfrom,$85,bn3,255
;    dn4b1,  6, 78
;    gn2b1, 42, 78
;    fin

    tieon
    sweepfrom,$85,gn3,255
    gn2b1, 30, 45
    dn3b1, 12, 45
;    en4b1,  3, 45
    ds3b1,  3, 45
    fin

;    tieon
;    sweepfrom,$85,fn5,255
;    gs3b1, 22, 60
;    cn4b1, 32, 65
;    fin

;    tieon
;    sweepfrom,$85,gn4,255
;    en4b1, 12,85
;    cn4b1, 10,85
;    an3b1, 10,85
;    fin

;    tieon
;    sweepfrom,$85,fn3,255
;    cn4b1,  18,75
;    fn3b1,   9,75
;    fn4b1,  18,75
;    cn4b1, 120,75
;;    cn4b1W, 192,90
;    fin


;*** arwing smart bomb ***
;01
_p_bomb0
    opennote,0,_p_bomb0_note0
    opennote,1,_p_bomb0_note1
    fin

_p_bomb0_note1
    nprg,_PRG_BOMB00
    cn4b1, 48,47
    fin

_p_bomb0_note0
;    xxx,24
    ntrans,12
    tieon
    nprg,_PRG_CHRG00

;    sweepfrom,$81,cn5,255
;    bn4b1W, 50,85
;    fin

    sweepfrom,$81,cn5,255
_p_bomb0_note0_0
    cn4b1W, 600,59
    jump,_p_bomb0_note0_0


;*** arwing boost ***
;02
_p_boost
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_boost_0
    opennote,0,_p_boost_note0
    opennote,1,_p_boost_note1
    fin
_p_boost_0
    opennote,0,_p_boost_note2
    opennote,1,_p_boost_note3
    fin

_p_boost_note0
    nprg,_PRG_ENGN00
    sweepfrom,$81,cn2,255
    cn5b1w,144,52
    fin
_p_boost_note1
    nprg,_PRG_EXPL02
    sweepfrom,$81,an2,255
    an4b1w,144,85
    fin

_p_boost_note2
    nprg,_PRG_ENGN01
    sweepfrom,$81,cn2,255
    cn5b1w,144,45
    fin
_p_boost_note3
    nprg,_PRG_EXPL03
    sweepfrom,$81,an2,255
    an4b1w,144,100
    fin

;*** arwing break ***
;03
_p_break
    prg,_PRG_EXPL03
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_break_0
    prg,_PRG_EXPL02
_p_break_0
    opennote,0,_p_break_note
    opennote,1,_p_break_note1
    fin

_p_break_note
;    nprg,_PRG_BOST00
    nprg,_PRG_ENGN00
    sweepfrom,$81,cn3,255
    cn1b1w,144,50
;    cn1b1w,144,49
    fin
_p_break_note1
;    nprg,_PRG_BOST00
    nenv,ENVE_SLOW03,255
    sweepfrom,$81,an3,255
    an1b1w,144,97
    fin


;*** arwing small explosion ***
;04
_p_sexp0
;    prg,_PRG_EXPL03
;    sr_portread,PORT1
;    sr_sbc,$01
;    jump0,_p_sexp0_0
    prg,_PRG_EXPL02
_p_sexp0_0
    release,10
    opennote,0,_p_sexp0_note0
    opennote,1,_p_sexp0_note1
    fin

_p_sexp0_note0
    cn2b1w,300,90
    fin
_p_sexp0_note1
    cn4b1w,192,90
    fin

;*** arwing engin (LEVEL)***
;05
_p_eng0L
    prg,_PRG_ENGN00
    release,25
    opennote,0,_p_eng0L_note0
    fin

_p_eng0L_note0
    tieon
_p_eng0L_note0_0
    fn2b1W, 500,56
;    fn2b1W, 500,80

;    ds3b1W, 500,100
;    cn4b1W, 500,60
    jump, _p_eng0L_note0_0
;    fin

;*** tank engin (LEVEL)***
;06
_p_tankL
    prg,_PRG_TANK00
    opennote,0,_p_tankL_note0
    fin

_p_tankL_note0
    tieon
_p_tankL_note0_0
    en3b1W, 500,69
;    en3b1W, 500,74
    jump, _p_tankL_note0_0

;*** arwing wing open ***
;07
_p_wmtop
    prg,_PRG_MOTR00
    opennote,0,_p_wmtop_note0
;    opennote,1,_p_wmtop_note0
    fin

_p_wmtop_note0
    sweepfrom,$81,an2,24
    cn4b1W, 210,89
    fin


;*** arwing bomb charge ***
;08
_p_bochg
    prg,_PRG_CHRG00
    opennote,0,_p_bochg_note0
    fin

_p_bochg_note0
    tieon
    sweepfrom,$81,an3,255
_p_bochg_note0_0
    en4b1W, 1000,35
    jump,_p_bochg_note0_0


;*** bomb explosion small ***
;09
_p_bexp0
    spanpow ,64
;    release,10
    opennote,0,_p_bexp0_note0
    opennote,1,_p_bexp0_note1
    opennote,2,_p_bexp0_note2
    fin

_p_bexp0_note0
    xxx,4
_p_bexp0_note1
    ntrans,5
    nprg,_PRG_EXPL02
    nenv,ENVE_NOMAL01, 20
    fn3b1,   8,90
    fn2b1w,192,90
    fin
_p_bexp0_note2
    tieon
    nprg,_PRG_WIND00
    nenv,ENVE_NOMAL01, 20
    sweepfrom,$85,cn4,255
    fn4b1,10,63
    cn2b1w,190,63
    fin


;*** bomb explosion middle ***
;0b
_p_bexp1
    spanpow ,64
;    release,30
    opennote,0,_p_bexp1_note0
    opennote,1,_p_bexp1_note1
    opennote,2,_p_bexp1_note2
    fin

_p_bexp1_note0
    xxx,4
_p_bexp1_note1
    ntrans,5
    nprg,_PRG_EXPL02
    nenv,ENVE_NOMAL01, 40
    npan, 34
    an3b1,   8,89
    npan, 94
    fn3b1,   8,89
    npan, 64
    an2b1w,220,89
    fin
_p_bexp1_note2
    tieon
    nprg,_PRG_WIND00
    nenv,ENVE_NOMAL01, 80
    sweepfrom,$85,en4,255
    an4b1,10,63
    en2b1w,220,63
    fin

;*** bomb explosion big ***
;0a
_p_bexp2
    prg,_PRG_EXPL03
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_bexp2_0
    prg,_PRG_EXPL02
_p_bexp2_0
    spanpow ,64
    release,30
    opennote,0,_p_bexp2_note0
    opennote,1,_p_bexp2_note1
    opennote,2,_p_bexp2_note2
    fin

_p_bexp2_note0
    xxx,4
_p_bexp2_note1
    ntrans,5
;    nprg,_PRG_EXPL02
    nenv,ENVE_NOMAL01, 40
    npan, 24
    cn4b1,   8,89
    npan, 104
    an3b1,   8,89
    npan, 64
    fn3b1,   8,89
    cn3b1w,260,89
    fin
_p_bexp2_note2
    tieon
    nprg,_PRG_WIND00
    nenv,ENVE_NOMAL01, 80
    sweepfrom,$85,gn4,255
    cn5b1,10,63
    gn2b1w,270,63
    fin

;*** arwing twin laser ***
;0c
_p_twlsr
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_twlsr_0
    opennote,0,_p_twlsr_note0
    opennote,1,_p_twlsr_note1
    fin
_p_twlsr_0
    envelope,ENVE_NOMAL02
    opennote,0,_p_twlsr_note2
    opennote,1,_p_twlsr_note3
    fin

_p_twlsr_note2
    nprg,_PRG_LASR06
    jump,_p_twlsr_note0_0
_p_twlsr_note0
    nprg,_PRG_LASR05
_p_twlsr_note0_0
;    sweepfrom,$81,fn4,255
;    fn2b0,  6, 30,80
;    sweepfrom,$81,cn4,255
;    an3b1, 48, 30
;    fin

    sweepfrom,$81,fn4,255
    fn2b0,  6, 54,80
    sweepfrom,$81,cn4,255
    an3b1, 48, 54
    fin

_p_twlsr_note3
    nprg,_PRG_LASR02
    jump,_p_twlsr_note1_0
_p_twlsr_note1
    nprg,_PRG_LASR01
_p_twlsr_note1_0
;    gn3b1,  6, 45
;    tieon
;    sweepfrom,$85,gn3,255
;    gn2b1, 30, 45
;    dn3b1, 12, 45
;    ds3b1,  3, 45
;    fin

    en3b1,  6, 41
    sweepfrom,$81,en3,255
    en2b1, 18, 41
    fin

;    ntrans,2
;    gn2b0, 12, 45,80
;    jump,_p_lasr0_note0


;*** arwing warning continuous ***
;_p_swct0
;    opennote,0,_p_dmgs0_note0
;    fin

;*** arwing a little shield ***
;0d
_p_lshld
    opennote,0,_p_lshld_note0
    fin

_p_lshld_note0
    nprg,_PRG_EXPL02
    sweepfrom,$81,cn2,255
    gn2b1,  9,89
    sweepfrom,$81,cn3,255
    cn1b1W, 200,89
    fin

;*** arwing small damage ***
;0e
_p_dmgs0
;    prg,_PRG_EXPL02
;    release,30
    opennote,0,_p_dmgs0_note0
    opennote,1,_p_dmgs0_note1
    fin

_p_dmgs0_note1
    nprg,_PRG_MHIT00
    fn4b1,  4,75
    an3b1,  6,75
    fin

_p_dmgs0_note0
;    sweepfrom,$81,dn4,255
;    en4b1,  6,127

    nprg,_PRG_MHIT01
    nenv,ENVE_NOMAL00,127
    sweepfrom,$81,bn4,255
    bn1b1,  10,105
    nprg,_PRG_EXPL00
    nenv,ENVE_SLOW03,255
    sweepfrom,$81,cn4,255
    cn2b1,100,105
;    sweepfrom,$81,cn5,255
;    cn3b1,50,127
    fin

_p_dmgl0_note1
    ntrans,-4
    sweepfrom,$81,fn4,255
    gn4b1,  8,94
    sweepfrom,$81,an3,255
    an2b1, 50,94
    fin


;*** arwing big damage ***
;0f
_p_dmgl0
;    prg,_PRG_EXPL03
;    sr_portread,PORT1
;    sr_sbc,$01
;    jump0,_p_dmgl0_0
    prg,_PRG_EXPL02
_p_dmgl0_0
    release,50
    opennote,0,_p_dmgl0_note0
    opennote,1,_p_dmgl0_note1
    fin

;_p_dmgl0_note0_0
;    loops,2
;    npan,24
;    sweepfrom,$81,cn5,255
;    gn5b1,  7,127
;    npan,104
;    gn5b1,  6,127
;    ntrans,-12
;    loope
_p_dmgl0_note0
    ntrans,9
;    ntrans,-9
    gn4b1,  6, 80
    npan,64
    sweepfrom,$81,fn3,255
    fn2b1, 100, 80
    fin

;*** arwing down ***
;10
_p_arde0
;    prg,_PRG_EXPL03
;    sr_portread,PORT1
;    sr_sbc,$01
;    jump0,_p_arde0_0
    prg,_PRG_EXPL02
_p_arde0_0
;    release,25
    spanpow,48
    opennote,0,_p_arde0_note0
    opennote,1,_p_arde0_note1
    opennote,2,_p_arde0_note2
    fin

_p_arde0_note0
    nprg,_PRG_ENGN00
    tieon
    sweepfrom,$81,an2,255
_p_arde0_note0_0
    fn1b1W, 2000,35
;    jump, _p_arde0_note0_0
    fin


_p_arde0_note1
;    ntrans,12
;    nprg,_PRG_EXPL02
    nenv,ENVE_NOMAL01, 20
    npan,44
    gn4b1,  8,89
    bn4b1,  8,89
    npan,84
    dn5b1,  8,89
    an4b1,  8,89
    npan,34
    fn4b1,  8,89
    npan,94
    cn4b1,  8,89
    fn4b1w,200,89
    fin

_p_arde0_note2
;    nprg,_PRG_EXPL02
    nenv,ENVE_NOMAL01, 10
    npan,127
    gn2b1, 13,89
    npan,0
    cn3b1,  9,89
    npan,127
    fn3b1, 18,89
    npan,0
    cn3b1, 12,89
    fn2b1w,200,89
    fin
    
;*** arwing refrect ***
;11
_p_repl0
    prg,_PRG_REPL00
    opennote,0,_p_repl0_note0
    fin
_p_repl0_note0
    gs4b1, 36,70
;    gs4b1, 36,71
    fin
    
;*** arwing rolling ***
;12
_p_roll0
    prg,_PRG_CHRG00
    envelope,ENVE_NOMAL00
    opennote,0,_p_roll0_note
    fin

_p_roll0_note
;    tieon
;    sweepfrom,$85,fn1,255
;    fn5b1, 35,75
;    fn3b1, 25,75
    tieon
    sweepfrom,$85,en1,255
    bn3b1, 25,49
    gn2b1, 35,49
;    sweepfrom,$85,fn1,255
;    fn5b1, 35,75
;    fn3b1, 25,75
    fin

;*** arwing wing open finish ***
;13
_p_wmted
    opennote,0,_p_wmted_note0
    opennote,1,_p_wmted_note1
    fin

_p_wmted_note1
    nprg,_PRG_MOTR00
    bn2b1, 12,90
    as2b1, 24,90
    sweepfrom,$81,cn4,255
    an2b1, 96,90
    fin

_p_wmted_note0
;    ntrans,-18
    ntrans,-6
    nprg,_PRG_MHIT00
    tieon
    sweepfrom,$85,cn3,255
    cn3b1, 12,99
    en3b1, 96,99
    fin

;*** tank shot ***
;14
_p_tsht0
    opennote,0,_p_tsht0_note0
    fin

_p_tsht0_note0
    nprg,_PRG_CANO00
    bn5b1,  4,70
    fn5b1, 96,77
    fin

;    nprg,_PRG_BOMB00
;    cn2b1,  3,60
;    nprg,_PRG_EXPL00
;    an3b1, 12,73
;    cn3b1, 24,68
;    fin

;*** tank bound ***
;15
_p_tbnd0
    prg,_PRG_MHIT00
    opennote,0,_p_tbnd0_note
    fin

_p_tbnd0_note
    fn3b1,  10,119
    en2b1, 110,119
    fin

;*** tank lift up ***
;16
_p_tkup0
    opennote,0,_p_tkup0_note0
    opennote,1,_p_tkup0_note1
    opennote,2,_p_tkup0_note2
    fin

_p_tkup0_note0
    nprg,_PRG_ENGN00
    tieon
    sweepfrom,$81,cn2,255
_p_tkup0_note0_0
    fn2b1, 80,77
    jump,_p_tkup0_note0_0
    
;    sweepfrom,$81,cn2,255
;    cn5b1w,200,90
;    fin
_p_tkup0_note2
    xxxw,150
_p_tkup0_note1
    nprg,_PRG_EXPL02
_p_tkup0_note1_0
    sweepfrom,$81,en2,255
    en4b1w,300,80
    jump,_p_tkup0_note1_0
    
;    sweepfrom,$81,en2,255
;    en4b1w,200,127
;    fin

;*** arwing rolling ***
;17
_p_roll1
    prg,_PRG_CHRG00
    envelope,ENVE_NOMAL00
    opennote,0,_p_roll1_note
    fin

_p_roll1_note
    tieon
    sweepfrom,$85,an0,255
    fn3b1, 50,45
    cn2b1, 40,45
    fin

;*** tank sand slide ***
;_p_sand0
;    prg,_PRG_SAND00
;    opennote,0,_p_sand0_note0
;    fin
;
;_p_sand0_note0
;    sweepfrom,$81,cn4,40
;    tieon
;_p_sand0_note0_0
;    fn3b1w,200, 63
;    jump,_p_sand0_note0_0




;*** step fox ***
;18
_p_step0
    prg,_PRG_STEP00
    sr_load,70
    sr_portwrite,FX_PORT
    opennote,0,_p_step0_note0
    fin

_p_step0_note0
    cn4b1,  6,63
    fin

;*** step flaco ***
;19
_p_step1
    prg,_PRG_STEP00
    sr_load,70
    sr_portwrite,FX_PORT
    opennote,0,_p_step1_note0
    fin

_p_step1_note0
    gn3b1,  2,63
    fin

;*** step peppy ***
;1a
_p_step2
    prg,_PRG_STEP00
    sr_load,70
    sr_portwrite,FX_PORT
    opennote,0,_p_step2_note0
    fin

_p_step2_note0
    gn4b1,  6,63
    fin

;*** step slippy ***
;1b
_p_step3
    prg,_PRG_STEP00
    sr_load,70
    sr_portwrite,FX_PORT
    opennote,0,_p_step3_note0
    fin

_p_step3_note0
    sweepfrom,$81,fn4,255
    fn5b1,  6,63
    fin

;*** runing step 0 ***
;1c
_p_rstp0
    prg,_PRG_STEP00
    spanpow,64
    sr_load,70
    sr_portwrite,FX_PORT
    opennote,0,_p_rstp0_note0
    opennote,1,_p_rstp0_note1
    opennote,2,_p_rstp0_note2
    sr_load,0
    sr_portwrite,PORT2
;    sr_portwrite,2
_p_rstp0_1
    sr_portread,PORT2
    sr_sbc,$ff
    sr_portwrite,PORT2
    sr_store,0,_p_rstp0_note0(2)
    sr_store,0,_p_rstp0_note1_0(2)
    sr_store,0,_p_rstp0_note2_1(2)
    sr_sbc,$60
    jump0,_p_rstp0_2
    sr_load,3
    call,_chk_loop
    jump,_p_rstp0_1
_p_rstp0_2
    fin
_p_rstp0_note0
    cn4b1,  6,63
    xxx,13
    jump,_p_rstp0_note0
_p_rstp0_note1
    xxx,2
    npan,34
_p_rstp0_note1_0
    gn3b1,  2,63
    xxx,12
    jump,_p_rstp0_note1_0
_p_rstp0_note2
    xxx,3
    npan,94
_p_rstp0_note2_0
    sweepfrom,$81,fn4,255
_p_rstp0_note2_1
    fn5b1,  6,63
    xxx,11
    jump,_p_rstp0_note2_0

;*** arwing base conv ***
;1d
_p_arbsc
    prg,_PRG_MOTR00
    sr_load,70
    sr_portwrite,FX_PORT
    opennote,0,_p_arbsc_note0
    fin

_p_arbsc_note0
    tieon
    sweepfrom,$85,an1,255
    cn3b1W,   8,89
;    fn3b1W, 255,84
    fn3b1W, 700,89
;    sweepfrom,$85,an2,255
;    cn4b1W,   8,100
;    fn4b1W, 255,100
    fin

;*** arwing engine start ***
;1e
_p_enst0
    opennote,0,_p_enst0_note0
    opennote,1,_p_enst0_note1
    fin

_p_enst0_note0
    nprg,_PRG_ENGN00
    nenv,ENVE_SLOW06,45
    tieon
    sweepfrom,$85,cn2,255
_p_enst0_note0_0
    fn2b1W, 500,70
    jump, _p_enst0_note0_0

_p_enst0_note1
    nprg,_PRG_CHRG00
;    tieon
    sweepfrom,$81,cn3,255
    fn3b1W, 50,20
    sweepfrom,$81,cs3,255
    fs3b1W, 38,27
    sweepfrom,$81,dn3,255
    gn3b1W, 30,31
    sweepfrom,$85,ds3,255
    gs3b1W, 25,35
    sweepfrom,$81,en3,255
    an3b1W, 20,39
    sweepfrom,$81,fn3,255
    as3b1W, 16,42
    sweepfrom,$81,fs3,255
    bn3b1W, 14,43
_p_enst0_note1_0
    sweepfrom,$81,gn3,255
    cn4b1W, 12,66
    jump, _p_enst0_note1_0


;*** volume test ***
;1f
_p_vltst
    loops,4
    call,_p_lasr0
    sr_load,20
    call,_chk_loop
    loope    
    call,_p_bomb0
    sr_load,200
    call,_chk_loop
;    waitw,200
    call,_p_bexp0
    sr_load,200
    call,_chk_loop
    sr_load,100
    call,_chk_loop
;    waitw,300
    jump,_p_vltst
        
;*** arwing engin (LEVEL SPACE)***
;20
_p_eng1L
    prg,_PRG_ENGN01
    release,25
    opennote,0,_p_eng1L_note0
    fin

_p_eng1L_note0
    tieon
_p_eng1L_note0_0
;    an2b1W, 500,49
    an2b1W, 500,40
    jump, _p_eng1L_note0_0

;*** arwing laser sea ***
;21
_p_lasr1
    prg,_PRG_LASR03
    envelope,ENVE_NOMAL02
;    opennote,0,_p_lasr0_note0
    opennote,0,_p_lasr1_note0
    fin

_p_lasr1_note0
    ntrans,-6
    jump,_p_lasr0_note0


;*** Submarina engin (LEVEL) ***
;22
_p_marn0
;    prg,_PRG_MARN00
;    envelope,ENVE_NOMAL02
    opennote,0,_p_marn0_note0
;    opennote,1,_p_marn0_note1
    fin

_p_marn0_note0
    nprg,_PRG_UFOL00
    nenv,ENVE_SLOW06,255
    xxx,35
    tieon
_p_marn0_note0_0
    en1b1W, 500,89
;    gn1b1W, 500,127
;    gn2b1W, 500,80
    jump, _p_marn0_note0_0


;_p_marn0_note1
;    nprg,_PRG_SHIP00
;    tieon
;_p_marn0_note1_0
    cn1b1W, 500,79
;    gn1b1W, 500,127
;    gn2b1W, 500,80
;    jump, _p_marn0_note1_0



;*** arwing wing parts convine ***
;23
_p_wpcv0
    opennote,0,_p_wpcv0_note0
    opennote,1,_p_wpcv0_note1
    opennote,2,_p_wpcv0_note2
    fin

_p_wpcv0_note0
    nprg,_PRG_MHIT00
    an2b1, 10,120
    sweepfrom,$81,dn4,255
;    ntrans,12
    bn5b1, 80,109
;    an5b1, 80,127
    fin

;    ntrans,3
;    nprg,_PRG_MHIT00
;    jump,_e_sxbc0_note1

_p_wpcv0_note2
;    ntrans,12
    nprg,_PRG_MHIT01
    fn2b1, 10,99
    fn1b1, 70,109
    fin

_p_wpcv0_note1
    nprg,_PRG_CHIN00
    cn3b1, 12,100
    nprg,_PRG_MOTR00
;    bn2b1, 12,110
    as2b1, 24,110

    nprg,_PRG_REPL00
    nenv,ENVE_SLOW03,127
    sweepfrom,$84,cn2,200
    cn4b1 , 12,100
    sweepfrom,$84,en2,200
    en4b1 , 12,100
    sweepfrom,$84,gn2,200
    gn4b1 , 12,100
    sweepfrom,$84,cn3,200
    cn5b1 , 12,100
    fin

;    sweepfrom,$81,cn4,255
;    an2b0, 96,90,225
;    fin


;*** tank half burner ***
;24
_p_hfbn0
    opennote,0,_p_hfbn0_note0
    opennote,1,_p_hfbn0_note1
    fin

_p_hfbn0_note0
    nprg,_PRG_ENGN00
    tieon
    sweepfrom,$81,fn1,255
_p_hfbn0_note0_0
    an1b1 80,73
    jump,_p_hfbn0_note0_0

_p_hfbn0_note1
    nprg,_PRG_SAND00
    sweepfrom,$81,cn3,255
    tieon
_p_hfbn0_note1_0
    en3b1 80,61
    jump,_p_hfbn0_note1_0



;*** Submarina smart bomb shot ***
;25
_p_mabm0
    opennote,0,_p_mabm0_note0
    opennote,1,_p_mabm0_note1
    fin

_p_mabm0_note1
    nprg,_PRG_BOMB00
    sweepfrom,$81,cn3,255
    fn3b1, 40,78
    nprg,_PRG_WBUB00
    cn3b1, 96,77 
    fin

_p_mabm0_note0
    tieon
    nprg,_PRG_CHRG00
;    sweepfrom,$81,cn3,255
_p_mabm0_note0_0
    cn1b1W, 600,70
    jump,_p_mabm0_note0_0


;*** Submarina smart bomb explosion ***
;26
_p_mabe0
    prg,_PRG_EXPL00
    opennote,0,_p_mabe0_note0
    opennote,1,_p_mabe0_note1
    fin

_p_mabe0_note0
    tieon
    ntrans,-12
    nprg,_PRG_WIND00
    sweepfrom,$85,cn5,255
    fn5b1,10,89
    an3b1,100,89
    fin

_p_mabe0_note1
    ntrans,-6
    jump,_e_sexp0_note0


;*** arwing twin laser sea ***
;27
_p_twls2
    prg,_PRG_LASR03
    envelope,ENVE_NOMAL02
;    release,15
    opennote,0,_p_twls2_note0
    fin

_p_twls2_note0
    ntrans,-4
    gn3b1, 11, 38
    jump,_p_lasr0_note0

;*** Submarina bound ***
;28
_p_mabd0
    prg,_PRG_MHIT00
    envelope,ENVE_NOMAL01
;    sr_load,20
;    sr_portwrite,FX_PORT
    opennote,0,_p_mabd0_note0
    fin
_p_mabd0_note0
    an2b1,   8,95
    fn2b1,  60,95
    fin


;*** Lock On Laser ***
;29
_p_lolz0
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_lolz0_0
    opennote,0,_p_lolz0_note0
    opennote,1,_p_lolz0_note1
    fin

_p_lolz0_0
    opennote,0,_p_lolz0_note2
    opennote,1,_p_lolz0_note1
    fin

_p_lolz0_note2
    nprg,_PRG_LASR07
    jump,_p_lolz0_note0_0
_p_lolz0_note0
    nprg,_PRG_LASR02
_p_lolz0_note0_0
    ntrans,24
;    tieon
    fn5b1,   8,79
    cn3b1,   8,79
    cn2b1,  24,79
    sweepfrom,$81,cn2,255
    en2b1,  48,79
    fin

_p_lolz0_note1
    nprg,_PRG_LASR00
_p_lolz0_note1_0
;    ntrans,12
    sweepfrom,$81,bn3,255
    fn1b1, 112,70
    fin

;*** arwing warp dash ***
;2a
_p_arwd0
    opennote,0,_p_arwd0_note0
    opennote,1,_p_arwd0_note1
    opennote,2,_p_arwd0_note2
    fin

_p_arwd0_note0
    nprg,_PRG_ENGN00
    nenv,ENVE_NOMAL02,255
    tieon
    sweepfrom,$85,cn2,255
    cn5b1w,100,79
    gn5b1w,200,79
    fin

_p_arwd0_note1
    nprg,_PRG_EXPL03
    nenv,ENVE_NOMAL02,255
    sweepfrom,$81,an2,255
    an3b1w,300,89
    fin

_p_arwd0_note2
    nprg,_PRG_UFOL00
    nenv,ENVE_NOMAL02,255
    tieon
    ntrans,12
    sweepfrom,$85,cn4,255
    cn5b1w, 100,66
    gn5b1w, 200,66
    fin

;*** arwing twin twin laser ***
;2b
_p_ttlsr
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_ttlsr_0
    opennote,0,_p_ttlsr_note0
    opennote,1,_p_ttlsr_note1
    fin
_p_ttlsr_0
;    envelope,ENVE_NOMAL02
    opennote,0,_p_ttlsr_note2
    opennote,1,_p_ttlsr_note3
    fin

_p_ttlsr_note2
    nprg,_PRG_LASR09
    jump,_p_ttlsr_note0_0
_p_ttlsr_note0
    nprg,_PRG_LASR08
_p_ttlsr_note0_0
    gn3b1, 64,59

;    bn2b0, 12, 41,80
;    tieon
;    sweepfrom,$85,bn3,255
;    fn2b1, 45, 41
    fin

_p_ttlsr_note3
    nprg,_PRG_LASR07
    jump,_p_ttlsr_note1_0
_p_ttlsr_note1
    nprg,_PRG_LASR02
_p_ttlsr_note1_0
    gn4b0,  6, 51,80
    tieon
    sweepfrom,$85,gn4,255
    bn1b1, 51, 51
    fin

;*** arwing wing broken ***
;2c
_p_wgbk0
    opennote,0,_p_wgbk0_note0
    opennote,1,_p_wgbk0_note1
    fin

_p_wgbk0_note1
;    ntrans,6
    nprg,_PRG_MHIT00
    jump,_p_wgbk0_note0_0
_p_wgbk0_note0
    nprg,_PRG_MHIT01
_p_wgbk0_note0_0
    nenv,ENVE_NOMAL00,127
    bn3b1,  10,95
    an4b1,   8,95
    gn1b1,  13,95
;    bn4b1,  10,127
;    cs4b1,   8,127
;    cs5b1,  70,127
    nprg,_PRG_EXPL00
    nenv,ENVE_SLOW10,255
    sweepfrom,$81,cn4,255
    cn3b1w,170,89
    fin

;_p_wgbk0_note1
;    nprg,_PRG_EXPL02
;    nenv,ENVE_NOMAL00,127
;    fn4b1,  10,127
;    gn4b1,   8,127
;    gn3b1,  70,127
;    fin


;*** lock search start ***    

;2d
_p_lsst0
    opennote,0,_p_lsst0_note0
    opennote,1,_p_lsst0_note1
    fin

_p_lsst0_note0
    nprg,_PRG_ENGY00
    nenv,ENVE_NOMAL00,255
    tieon
    sweepfrom,$85,an0,255
    an1b1, 10, 100
    an3b1, 18, 100
    fin

_p_lsst0_note1
    nprg,_PRG_BEAM00
    tieon
    sweepfrom,$85,cn3,255
    cn1b1, 3,79
    cn4b1,25,79
    fin


;    nprg,_PRG_BEAM00
;    tieon
;    sweepfrom,$85,cn3,255
;    cn1b1, 3,56
;    cn4b1,25,56
;    fin

;*** charge beam explosion ***
;2e
_p_cbex0
    prg,_PRG_EXPL03
    sr_portread,PORT1
    sr_sbc,$01
    jump0,_p_cbex0_0
    prg,_PRG_EXPL00
;    prg,_PRG_EXPL02
_p_cbex0_0
    envelope,ENVE_SLOW13
    opennote,0,_p_cbex0_note0
    opennote,1,_p_cbex0_note1
    fin

_p_cbex0_note0
    tieon
    nprg,_PRG_WIND00
    sweepfrom,$85,cn4,255
    fn4b1,10,89
    an2b1,60,89
    fin

_p_cbex0_note1
; ntrans,12
    en4b1, 6,99
    cn3b1, 60,99
    fin


;*** tank dash ***
;2f
_p_tkds0
    opennote,0,_p_tkds0_note0
    opennote,1,_p_tkds0_note1
    fin

_p_tkds0_note0
    nprg,_PRG_ENGN00
    nenv,ENVE_NOMAL03,255
    sweepfrom,$81,an1,255
    cn3b1w, 144,89
    fin

_p_tkds0_note1
    nprg,_PRG_EXPL02
    nenv,ENVE_NOMAL03,255
    sweepfrom,$81,en2,255
    en4b1w,144,89
    fin 


;*** submarina dash boost ***
;30
_p_madb0
    opennote,0,_p_madb0_note0
    opennote,1,_p_madb0_note1
    fin
    

_p_madb0_note0
    nprg,_PRG_WBUB00
    nenv,ENVE_NOMAL03,255
    sweepfrom,$81,cn2,255
    cn4b1w,144,83
    fin
_p_madb0_note1
    nprg,_PRG_EXPL03
    nenv,ENVE_NOMAL03,255
    sweepfrom,$81,an1,255
    an3b1w,144,94
    fin

;*** submarina brake ***
;31
_p_mabr0
    opennote,0,_p_mabr0_note0
    opennote,1,_p_mabr0_note1
    fin
    

_p_mabr0_note0
    nprg,_PRG_WBUB00
    nenv,ENVE_NOMAL03,255
    sweepfrom,$81,cn4,255
    cn2b1w,144,83
    fin
_p_mabr0_note1
    nprg,_PRG_EXPL03
    nenv,ENVE_NOMAL03,255
    sweepfrom,$81,an2,255
    an0b1w,144,94
    fin


;*** arwing map boost ***
;32
_p_mbst0
    opennote,0,_p_mbst0_note0
    opennote,1,_p_mbst0_note1
    fin

_p_mbst0_note0
    nprg,_PRG_ENGN01
    sweepfrom,$81,cn2,255
    cn5b1w,180,45
    fin
_p_mbst0_note1
    nprg,_PRG_EXPL03
    sweepfrom,$81,an2,255
    an4b1w,180,100
    fin
@


1.1.1.1
log
@audio assets
@
text
@@
