home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: Super Street …ghter II PC Format Disk 2 / Lowe_SuperStreetFighterIIPCFormatDisk2.img / FEI.DAT < prev    next >
Encoding:
Text File  |  1995-11-30  |  14.9 KB  |  951 lines
  1.  
  2.  
  3.  
  4.  
  5. demo    equ 1        ;set to 0 to make returnable demo        
  6. develop    equ 1        ;set to zero for assembling data blks
  7.             ;or testing length of current data
  8.             ;set to 1 for music development
  9.  
  10. select_tunes    equ 0   ; set to 0 for running music on mouse button
  11.  
  12.  
  13.     ifne develop
  14.  
  15.     include c:sf2d/tdriver.s
  16.  
  17.     endc
  18.  
  19.     opt p+
  20.  
  21. ;***********************************************
  22.  
  23.         ;;;  MACROS
  24.  
  25. oct1d    macro
  26.     include c:sf2d/1odequ.blk
  27.     endm
  28.  
  29. oct1u    macro
  30.     include c:sf2d/1ouequ.blk
  31.     endm
  32.  
  33. octn    macro
  34.     include c:sf2d/nequ.blk
  35.     endm
  36.  
  37. noplay    macro
  38.     dc.l    pri-b1
  39.     dc.l    0,end_song
  40.     endm
  41.  
  42.  
  43. bass_guitar    macro
  44.     dc.w    new_env
  45.     dc.l    abass_env-b1
  46.     dc.w    new_snd
  47.     dc.l    abassp-b1
  48.     endm
  49.  
  50. bass_sound    macro
  51.     dc.w    new_env
  52.     dc.l    abass_env-b1
  53.     dc.w    new_snd
  54.     dc.l    abassp-b1
  55.     endm
  56.  
  57.  
  58.  
  59.  
  60. test_sound1    macro
  61.     dc.w    new_env
  62.     dc.l    test1_env-b1
  63.     dc.w    new_snd
  64.     dc.l    test1p-b1
  65.     endm
  66.  
  67. test_sound1_soft    macro
  68.     dc.w    new_env
  69.     dc.l    test1_env_soft-b1
  70.     dc.w    new_snd
  71.     dc.l    test1p-b1
  72.     endm
  73.  
  74.  
  75. test_sound2    macro
  76.     dc.w    new_env
  77.     dc.l    test2_env-b1
  78.     dc.w    new_snd
  79.     dc.l    test2p-b1
  80.     endm
  81.  
  82. test_sound2s    macro
  83.     dc.w    new_env
  84.     dc.l    test2_env-b1
  85.     dc.w    new_snd
  86.     dc.l    test2ps-b1
  87.     endm
  88.  
  89.  
  90.  
  91. chinese_syn    macro
  92.     dc.w    new_env
  93.     dc.l    chinese_syn_env-b1
  94.     dc.w    new_snd
  95.     dc.l    chinese_synp-b1
  96.     endm
  97.  
  98. lead_loop_short_env    macro
  99.     dc.w    new_env
  100.     dc.l    lead_env_short-b1
  101.     dc.w    new_snd
  102.     dc.l    lead_loopp-b1
  103.     endm
  104.  
  105. lead_loop    macro
  106.     dc.w    new_env
  107.     dc.l    leadloop_env-b1
  108.     dc.w    new_snd
  109.     dc.l    lead_loopp-b1
  110.     endm
  111.  
  112.  
  113. lead_looped    macro
  114.     dc.w    new_env
  115.     dc.l    leadlooped_env-b1
  116.     dc.w    new_snd
  117.     dc.l    lead_loopp-b1
  118.     endm
  119.  
  120. rim        macro
  121.     dc.w    new_env
  122.     dc.l    rim_env-b1
  123.     dc.w    new_snd
  124.     dc.l    rimp-b1
  125.     endm
  126.  
  127. claves        macro
  128.     dc.w    new_env
  129.     dc.l    clave_env-b1
  130.     dc.w    new_snd
  131.     dc.l    clavep-b1
  132.     endm
  133.  
  134. clave        macro
  135.     dc.w    new_env
  136.     dc.l    clave_env-b1
  137.     dc.w    new_snd
  138.     dc.l    clavep-b1
  139.     endm
  140.  
  141. tamb        macro
  142.     dc.w    new_env
  143.     dc.l    tamb_env-b1
  144.     dc.w    new_snd
  145.     dc.l    tambp-b1
  146.     endm
  147.  
  148.  
  149.  
  150. sine_wave16    macro
  151.     dc.w    new_env
  152.     dc.l    sine_env-b1
  153.     dc.w    new_snd
  154.     dc.l    sinep-b1
  155.     endm
  156.  
  157. sine_wave1    macro
  158.     dc.w    new_env
  159.     dc.l    sine_env-b1
  160.     dc.w    new_snd
  161.     dc.l    sine1p-b1
  162.     endm
  163.  
  164.  
  165.  
  166.  
  167. synmaj        macro
  168.     dc.w    new_env
  169.     dc.l    synmaj_env-b1
  170.     dc.w    new_snd
  171.     dc.l    synmajp-b1
  172.     endm
  173.  
  174. synmin        macro
  175.     dc.w    new_env
  176.     dc.l    synmin_env-b1
  177.     dc.w    new_snd
  178.     dc.l    synminp-b1
  179.     endm
  180.  
  181.  
  182.  
  183. heavy_guitar    macro
  184.     dc.w    new_env
  185.     dc.l    hguit_env-b1
  186.     dc.w    new_snd
  187.     dc.l    hguitp-b1
  188.     endm
  189.  
  190. eguitar_short    macro
  191.     dc.w    new_env
  192.     dc.l    egs_env-b1
  193.     dc.w    new_snd
  194.     dc.l    egsp-b1
  195.     endm
  196.  
  197.  
  198.  
  199.  
  200.  
  201. syn1    macro
  202.     dc.w    new_env
  203.     dc.l    syn1_envs-b1
  204.     dc.w    new_snd
  205.     dc.l    syn1p-b1
  206.     endm
  207.  
  208.  
  209.  
  210.  
  211. d    macro            ;kick macro
  212.     dc.w    new_env
  213.     dc.l    kick_env-b1
  214.     dc.w    new_snd
  215.     dc.l    kickp-b1
  216.     endm
  217.  
  218. c    macro            ;kick macro
  219.     dc.w    new_env
  220.     dc.l    kick_env-b1
  221.     dc.w    new_snd
  222.     dc.l    kickp-b1
  223.     endm
  224.  
  225.  
  226.  
  227.  
  228. hd    macro            ;snare macro
  229.     dc.w    new_env
  230.     dc.l    snare_env-b1
  231.     dc.w    new_snd
  232.     dc.l    snarep-b1
  233.     endm
  234.     
  235.  
  236. g    macro            ;snare macro
  237.     dc.w    new_env
  238.     dc.l    hat_env-b1
  239.     dc.w    new_snd
  240.     dc.l    hatp-b1
  241.     endm
  242.  
  243. kick    macro            ;kick macro
  244.     dc.w    new_env
  245.     dc.l    kick_env-b1
  246.     dc.w    new_snd
  247.     dc.l    kickp-b1
  248.     endm
  249.  
  250.  
  251. snare    macro            ;snare macro
  252.     dc.w    new_env
  253.     dc.l    snare_env-b1
  254.     dc.w    new_snd
  255.     dc.l    snarep-b1
  256.     endm
  257.     
  258.  
  259. hat    macro            ;snare macro
  260.     dc.w    new_env
  261.     dc.l    hat_env-b1
  262.     dc.w    new_snd
  263.     dc.l    hatp-b1
  264.     endm
  265.  
  266. clap    macro            ;clap macro
  267.     dc.w    new_env
  268.     dc.l    clap_env-b1
  269.     dc.w    new_snd
  270.     dc.l    clapp-b1
  271.     endm
  272.  
  273.  
  274.  
  275.  
  276.  
  277.  
  278. r    equ r8        ;rim default playback rate
  279. c    equ r20        ;clave playback    
  280. k    equ r16        ;kick default playback rate
  281. s    equ r20        ;clav default playback rate
  282. h    equ r20        ;hat default playback rate
  283. d    equ r16        ;kick default playback rate
  284. hd    equ r16        ;snare default playback rate
  285. g    equ r20        ;hat default playback rate
  286. t    equ r8        ;tambourine default playback rate
  287. cl    equ r16        ;clap default playback rate
  288.  
  289.  
  290.  
  291. ;********************************************************************
  292.  
  293.  
  294.  
  295.             ;SF2  RYU  DATA
  296.  
  297. b1
  298.  
  299.     dc.w    song_table-b1
  300.     dc.w    fxjump_table-b1
  301.  
  302.  
  303.  
  304.     ifeq develop
  305.  
  306.         ;  ALL EQUs
  307.  
  308.  
  309.             include nequ.blk
  310.  
  311.  
  312.  
  313. v equ 0
  314.  
  315. no_loop equ 0
  316. loop equ 0
  317. chann1reg   equ $dff0a0    
  318. chann2reg   equ $dff0b0
  319. chann3reg   equ $dff0c0
  320. chann4reg   equ $dff0d0
  321. dmacon     equ $dff096
  322. int_bf_int   equ   $dff01e
  323. int_bf_w    equ   $dff09a
  324. vhposr     equ   $dff006
  325. in_line    equ   0
  326. new_snd    equ   4
  327. end_song     equ   1
  328. end_patt    equ   8
  329. new_env    equ   12
  330. pbend     equ   16
  331. iff        equ 104
  332.  
  333.  
  334. hi: equ 223
  335. lo:  equ 446
  336.  
  337. r22    equ 134
  338. r20    equ 179        ;correctum
  339. r19    equ 150
  340. r18    equ 178
  341. r17    equ 200
  342. r16:    equ 227        ;correctum
  343. r15:    equ 249
  344. r14    equ 280
  345. r13:    equ 305
  346. r12:    equ 333
  347. r11:    equ 361
  348. r10:    equ 389
  349. r9:    equ 419
  350. r8:    equ 446
  351. r7:    equ 446+112
  352. r6:    equ 446+223
  353. r5:    equ 446+223+112
  354. r4:    equ 446*2
  355. r3:    equ 446*3
  356. r2:    equ 446*4
  357. r1:    equ 446*8
  358.  
  359.  
  360. filter: equ $bfe001
  361. filter_on equ 44
  362. filter_off equ 48
  363.  
  364. modon     equ   20
  365. pboff     equ   24
  366. modoff     equ   28
  367. rest     equ 32
  368. end_fxp  equ 36
  369. end_fx3  equ 36
  370. end_fx4  equ 40
  371. acc    equ 52
  372. repeat    equ 56
  373. down      equ   1
  374. up       equ   2
  375.  
  376. fx    equ 0
  377.  
  378.     endc
  379.  
  380.     ;"""""""""""""""""""""""""""""""""""""""""""""""""
  381.  
  382.  
  383.     ;;; DATA
  384.  
  385. song_table:        
  386.  
  387.     dc.l 3,sb1-b1,sb2-b1,sb3-b1,sb4-b1,0,0,0    ;j1
  388.  
  389.     dc.l 5,ss1-b1,ss1-b1,ss1-b1,ss1-b1,0,0,0        ;j1
  390.  
  391.  
  392. max_songs:    dc.l  3
  393.  
  394.  
  395.  
  396. fxp:
  397.  
  398.  
  399. fxjump_table:  
  400.  
  401. ;max_fx    dc.l    10    ;number + 1 for test routines only
  402. ;______________________________________________________________________
  403.  
  404.  
  405. ;sstart: dc.l 0,end_song
  406.  
  407. ;pstart: dc.w end_patt
  408.  
  409.  
  410. ;----------------------------------
  411.  
  412.     octn
  413.  
  414.  
  415.  
  416. cr  set   12
  417. q set  cr/2
  418. sq set q/2
  419. dsq set sq/4
  420.  
  421. tq1 set      7
  422. tq2 set   6
  423. tsq1 set  3
  424. tsq2 set 4
  425.  
  426. ss1:            ;;;;;;silence tune for test only
  427.  
  428.     dc.l    pri-b1
  429.       dc.l     0,end_song
  430.  
  431.     dc.w    c03,cr*4
  432.     dc.w     end_patt
  433.  
  434. pri:
  435.     dc.w    new_env
  436.     dc.l    rest_env-b1
  437.     dc.w    c03,65000
  438.     dc.w     end_patt
  439.  
  440. ;************************************************
  441. ;;;;;;;;;;;;;;;;;;;;;           MUSIC DATA HERE  ;;;;;;;;;;;;;;;;;;;;;;;
  442.  
  443.  
  444. cr  set   16
  445. q set  cr/2
  446. sq set q/2
  447. dsq set sq/4
  448.  
  449. tq1 set      8
  450. tq2 set   8
  451.  
  452. tsq1 set  4
  453. tsq2 set 4
  454.  
  455. tcr1 set 16
  456. tcr2 set 16
  457.  
  458.  
  459. oc    set    cr
  460. o6    set    q
  461. i8    set    cr*2
  462. l8    set    cr*2
  463.  
  464.  
  465.  
  466. sb1:
  467.  
  468.     dc.l    bp-b1
  469.  
  470.       dc.l     0,end_song
  471.  
  472. sb2:
  473.     dc.l    tune1-b1
  474.  
  475.     dc.l    tune2-b1
  476.  
  477.         DC.L    0,end_song
  478.  
  479. sb3:
  480.  
  481.     ;dc.l    ds-b1
  482.     dc.l    kick-b1,kick-b1,kick-b1,kick-b1
  483.     dc.l    toms-b1,toms-b1,toms-b1,toms-b1,toms-b1,toms-b1,toms-b1,toms-b1
  484.     dc.l    toms-b1,toms-b1,toms-b1,toms-b1,toms-b1    ; ,toms-b1
  485.  
  486.     dc.l     0,end_song
  487.  
  488. sb4:
  489.  
  490.     dc.l    pattch4-b1
  491.  
  492.     dc.l     0,end_song
  493.  
  494.  
  495. ;-----------------------------------------------
  496.  
  497. ds
  498.  
  499.     hat
  500.     dc.w    rest,sq,h,sq,h,sq,h,q,h,sq,h,sq
  501.     dc.w    h,q
  502.     dc.w    h,sq,h,sq,h,q,h,sq,h,sq
  503.     dc.w    h,sq
  504.     dc.w    end_patt
  505.  
  506. kick
  507.     kick
  508.     dc.w    k,cr,k,cr,k,cr,k,cr
  509.     dc.w    end_patt
  510.  
  511. toms
  512.     test_sound1
  513.     dc.w t,sq,t+10,sq,t+20,sq,t+20,sq    
  514.     snare
  515.     dc.w    s,sq
  516.     test_sound1
  517.     dc.w t,sq,t+10,sq,t+20,sq
  518.  
  519.     test_sound1
  520.     dc.w t,sq,t+10,sq,t+20,sq,t+20,sq    
  521.     snare
  522.     dc.w    s,sq
  523.     test_sound1
  524.     dc.w t,sq,t+10,sq,t+20,sq
  525.  
  526.  
  527.     dc.w    end_patt
  528.  
  529.     octn
  530.  
  531. pattch4
  532.  
  533.     heavy_guitar
  534.  
  535.  
  536.     ;dc.w     rest,cr*4
  537.     dc.w    a01,cr*4,a01,cr*4,g01,cr*4,a01,cr*4
  538.  
  539.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  540.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  541.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  542.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  543.     dc.w    g01,cr*2,a01,cr*2
  544.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  545.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  546.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  547.     dc.w    b01,q+sq,b01,q+sq,b01,cr,b01,q,a01,cr
  548.     dc.w    g01,cr*2,a01,cr*2
  549.     dc.w    g01,cr*2,a01,cr*2
  550.     dc.w    b01,q+sq,b01,q+sq,b01,cr,a01,q
  551.  
  552.     dc.w pbend,down,10,60000,cr
  553.     
  554.  
  555.     dc.w    b01,cr*9-(cr*4)
  556.     ;dc.w    rest,cr*8
  557.     dc.w    pboff
  558.  
  559.     dc.w end_patt
  560.  
  561.  
  562.  
  563. ;-------------------
  564. pr:
  565.     dc.w    new_env
  566.     dc.l    rest_env-b1
  567.     dc.w    c03,cr*4
  568.     dc.w     end_patt
  569.  
  570.     octn
  571.  
  572. bp
  573.  
  574.     bass_sound
  575.  
  576.     dc.w    filter_off
  577.  
  578.  
  579.     ;dc.w rest,$0040
  580.     dc.w a01,$0040,a01,$0040,g01,$0040,a01,$0040
  581.     dc.w b01,$0004,b01,$0008,a01,$0004,a01,$0008,b01,$0004
  582.     dc.w b01,$0008,a01,$0004,a01,$0008,d02,$0008,d02,$0008
  583.     dc.w b01,$0004,b01,$0008,a01,$0004,a01,$0008,b01,$0004
  584.     dc.w b01,$0008,a01,$0004,a01,$0008,gb01,$0010,b01,$0004
  585.     dc.w b01,$0008,a01,$0004,a01,$0008,b01,$0004,b01,$0008
  586.     dc.w a01,$0004,a01,$0008,d02,$0008,d02,$0008,b01,$0004
  587.     dc.w b01,$0008,a01,$0004,a01,$0008,b01,$0004,b01,$0008
  588.     dc.w a01,$0004,a01,$0008,gb01,$0010,g01,$0020,a01,$0004
  589.     dc.w a01,$0004,a01,$0004,a01,$0004,e01,$0010,b01,$0004
  590.     dc.w b01,$0008,a01,$0004,a01,$0008,b01,$0004,b01,$0008
  591.     dc.w a01,$0004,a01,$0008,d02,$0008,d02,$0008,b01,$0004
  592.     dc.w b01,$0008,a01,$0004,a01,$0008,b01,$0004,b01,$0008
  593.     dc.w a01,$0004,a01,$0008,gb01,$0010,b01,$0004,b01,$0008
  594.     dc.w a01,$0004,a01,$0008,b01,$0004,b01,$0008,a01,$0004
  595.     dc.w a01,$0008,d02,$0008,d02,$0008,b01,$0004,b01,$0008
  596.     dc.w a01,$0004,a01,$0008,b01,$0004,b01,$0008,a01,$0004
  597.     dc.w a01,$0008,gb01,$0010,g01,$0020,a01,$0008,a01,$0018
  598.     dc.w a01,$0020,gb01,$0008,gb01,$0018,b01,$0004,b01,$0008
  599.     dc.w a01,$0004,a01,$0008,b01,$0004,b01,$0008,a01,$0004
  600.     dc.w a01,$0008,d02,$0008,d02,$0008
  601.  
  602.     dc.w pbend,down,5,60000,cr
  603.  
  604.     dc.w b01,$0080-(cr*4)
  605.  
  606.     dc.w    pboff
  607.     dc.w end_patt
  608.  
  609.  
  610.     octn
  611.  
  612. tune1
  613.  
  614.     test_sound2
  615.  
  616.     ;dc.w modon,1,1,2,2,1,1
  617.  
  618.     ;dc.w rest,$0040
  619.  
  620.     dc.w e02,$0008,a02,$0004,e02,$0008,b02,$0008
  621.     dc.w e02,$0004,d03,$0008,e02,$0004,b02,$0008,e02,$0004
  622.     dc.w a02,$0008,e02,$0008,a02,$0004,e02,$0008,b02,$0008
  623.     dc.w e02,$0004,d03,$0008,e02,$0004,b02,$0008,e02,$0004
  624.     dc.w a02,$0008,e02,$0008,a02,$0004,e02,$0008,b02,$0008
  625.     dc.w e02,$0004,d03,$0008,e02,$0004,b02,$0008,e02,$0004
  626.     dc.w a02,$0008,e02,$0008,a02,$0004,e02,$0008,b02,$0008
  627.     dc.w e02,$0004,d03,$0008,e02,$0004,b02,$0008,e02,$0004
  628.     dc.w e03,$0008
  629.     dc.w    end_patt
  630.  
  631. tune2
  632.     ;dc.w modon,1,1,4,4,1,1
  633.     octn
  634.     lead_loop
  635.  
  636.     dc.w a02,$0004,b02,$002c
  637.     dc.w a02,$0010,gb02,$0030
  638.     dc.w d02,$0010,d02,$0004,e02,$002c,d02,$0010,b01,$0030
  639.     dc.w gb02,$0008,a02,$0008,a02,$0004,b02,$001c,a02,$0010
  640.     dc.w b02,$0010,a02,$0004,b02,$002c,a02,$0010,gb02,$0030
  641.     dc.w d02,$0010,d02,$0004,e02,$002c,d02,$0010,b01,$0030
  642.     dc.w gb02,$0008,a02,$0008,a02,$0004,b02,$001c,a02,$0018
  643.     dc.w a02,$0004,b02,$0004,db03,$0004,gb03,$001c,b02,$0010
  644.     dc.w a02,$0010,a02,$0004
  645.  
  646.     dc.w pbend,down,10,60000,cr
  647.  
  648.     dc.w b02,$00fc-cr*8
  649.  
  650.     dc.w    pboff
  651.     dc.w end_patt
  652.  
  653.  
  654.  
  655. ;------------------------
  656. iff    equ 104
  657.  
  658.     ; sample parameters
  659.  
  660.  
  661. abassp
  662.         dc.w 1  
  663.              dc.l (abassd+iff)-b1
  664.              dc.w (2822)/2
  665.              dc.l (abassd+iff+2692)-b1
  666.              dc.w (2822-2692)/2
  667.  
  668. ;abassp
  669.         dc.w 1  
  670.              dc.l (abassd+iff)-b1
  671.              dc.w (2992-iff)/2
  672.              dc.l restd-b1
  673.              dc.w 16/2
  674.  
  675.  
  676. hguitp
  677.         dc.w 1  
  678.              dc.l hguitd-b1
  679.              dc.w 4010/2
  680.              dc.l (hguitd+1284)-b1
  681.              dc.w (4010-1284)/2
  682.  
  683.  
  684. sinep
  685.         dc.w 1  
  686.              dc.l sine_datad-b1
  687.              dc.w 16
  688.              dc.l sine_datad-b1
  689.              dc.w 16
  690.  
  691. sine1p
  692.         dc.w 1  
  693.              dc.l sine_data1d-b1
  694.              dc.w 16
  695.              dc.l sine_data1d-b1
  696.              dc.w 16
  697.  
  698.  
  699. snarep
  700.         dc.w 1  
  701.              dc.l (snared)-b1
  702.              dc.w (2240)/2 
  703.              dc.l restd-b1
  704.              dc.w 16/2
  705.  
  706. kickp
  707.         dc.w 1  
  708.              dc.l (kickd)-b1
  709.              dc.w (2272)/2         ;2272
  710.              dc.l restd-b1
  711.              dc.w 16/2
  712.  
  713. hatp
  714.         dc.w 1  
  715.              dc.l (hatd)-b1
  716.              dc.w (2983)/2 
  717.              dc.l restd-b1
  718.              dc.w 16/2
  719.  
  720. clapp
  721.         dc.w 1  
  722.              dc.l (hatd)-b1
  723.              dc.w (2568)/2 
  724.              dc.l restd-b1
  725.              dc.w 16/2
  726.  
  727.  
  728.  
  729. synmajp
  730.         dc.w 1  
  731.              dc.l (synmajd)-b1
  732.              dc.w (4204/2)/2
  733.              dc.l restd-b1
  734.              dc.w 16/2
  735.  
  736. synminp
  737.         dc.w 1  
  738.              dc.l (synmind)-b1
  739.              dc.w ((4032/2))/2 
  740.              dc.l restd-b1
  741.              dc.w 16/2
  742.  
  743. clavep
  744.         dc.w 1  
  745.              dc.l (claved+iff)-b1
  746.              dc.w ((2320/2))/2 
  747.              dc.l restd-b1
  748.              dc.w 16/2
  749.  
  750. tambp
  751.         dc.w 1  
  752.              dc.l (tambd+iff)-b1
  753.              dc.w ((1457/2))/2 
  754.              dc.l restd-b1
  755.              dc.w 16/2
  756.  
  757.  
  758.  
  759. rimp
  760.         dc.w 1  
  761.              dc.l (rimd+iff)-b1
  762.              dc.w ((400/2))/2 
  763.              dc.l restd-b1
  764.              dc.w 16/2
  765.  
  766. chinese_synp
  767.         dc.w 1  
  768.              dc.l (chinese_synd+iff)-b1
  769.              dc.w (8703/2)/2 
  770.              dc.l restd-b1
  771.              dc.w 16/2
  772.  
  773.  
  774. lead_loopp
  775.         dc.w 1  
  776.              dc.l (leadloopd)-b1
  777.              dc.w (4658)/2 
  778.              dc.l (leadloopd+4146)-b1
  779.              dc.w (4658-4146)/2 
  780.  
  781. ;----------------------------
  782. envelopes:
  783.  
  784.  
  785. rest_env:            dc.w 0,0,0,0,0,0,0,0,255
  786. flute_env:            dc.w 0,48,255
  787. dloop_env:            dc.w 0,38,255
  788. strings_env:            dc.w 0,35,255
  789. fhorn_env:            dc.w 0,38,255
  790. abass_env:            dc.w 0,45,255
  791. piano_env:            dc.w 0,48,255
  792. hato_env:            dc.w 0,28,255
  793. hatc_env:            dc.w 0,48,255
  794. hato_envl:            dc.w 0,48,255
  795. hatc_envl:            dc.w 0,48,255
  796.  
  797. clave_env:            dc.w 0,40,255
  798. rim_env:            dc.w 0,28,255
  799.  
  800.  
  801.  
  802.  
  803. flute_envq:            dc.w 0,18,255
  804. sine_env_short:            dc.w 0,40,39,37,36,34,0,28,25,22,20,0
  805.                 dc.w 18,17,16,15,14,13,12,11,0,10
  806.                 dc.w 9,8,7,6,5,4,3,2,1,0,255
  807.  
  808. sine_env_vshort:        dc.w 30,25,0,15,10,8,7,255
  809.  
  810. sine_env:            dc.w 25,24,23,22,21,20
  811.                 dc.w 15,14,13,12,0,9,8,7,6,5,4,0,255
  812. syn1_envs
  813. sine_envl:            dc.w 60,60,60,60,0,40,30,20
  814.                 dc.w 17,16,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0,255
  815.  
  816. snare_env            dc.w 0,15,255
  817. kick_env            dc.w 0,29,255
  818. hat_env                dc.w 0,10,255
  819. clap_env            dc.w 0,38,255
  820. tamb_env            dc.w 0,20,255
  821.  
  822. sine_envloop            dc.w 0,25,255
  823.  
  824. chord_env:            dc.w 0,64,255
  825.  
  826.  
  827. hguit_env:            dc.w 0,10,255
  828. syn1_env:            dc.w 0,52,255
  829. egs_env:            dc.w 0,22,255
  830. synmaj_env:            dc.w 0,20,255
  831. synmin_env:            dc.w 0,19,255
  832. ;leadloop_env:            dc.w 0,28,255
  833. leadloop_env
  834. leadlooped_env            dc.w 0,60
  835.                 dc.w  60,255
  836.  
  837. chinese_syn_env            dc.w 0,30
  838.                 dc.w  30,255
  839.  
  840.  
  841. lead_env_short            
  842.                 dc.w 48,45,43,42,40,35,32,28,18,12,8,5,0,255
  843.  
  844.  
  845.  
  846. ;**************************************************
  847.  
  848. ;;THE FX SAMPLES ARE PULLED IN HERE...THis section can be anywhere
  849. ;; in lower memory,and in any order
  850.  
  851.  
  852. ;abassd            incbin c:sf2d/inst/Cbassloopn.sam     ;bass+drum
  853. abassd            incbin c:sf2d/inst/fuzzbass.sam 
  854. snared            incbin c:sf2d/inst/snare.sam 
  855. kickd            incbin c:sf2d/inst/kick2.sam 
  856. hatd            incbin c:sf2d/inst/hat2.sam 
  857. clapd            ;incbin c:sf2d/inst/clap.sam 
  858. tambd            ;incbin c:sf2d/inst/tamb.sam 
  859. synmajd            ;incbin c:sf2d/inst/synmajl.sam 
  860. synmind            ;incbin c:sf2d/inst/synminl.sam 
  861. hguitd            incbin c:sf2d/inst/hguitnn.sam 
  862. leadloopd        incbin c:sf2d/inst/leadloopn.sam 
  863. claved            ;incbin c:sf2d/inst/clave.sam 
  864. rimd            ;incbin c:sf2d/inst/rim.sam 
  865. chinese_synd        ;incbin c:sf2d/inst/chinese_syn.sam
  866.  
  867.  
  868.  
  869.  
  870. test1p
  871.         dc.w 1  
  872.              dc.l (test1d+iff)-b1
  873.              dc.w (test1_len)/2
  874.              ;dc.l (test1d+iff+126)-b1
  875.              ;dc.w (test1_len-126)/2
  876.  
  877.              dc.l restd-b1
  878.              dc.w 16/2
  879.  
  880.  
  881. test2p
  882.         dc.w 1  
  883.              dc.l (test2d+iff)-b1
  884.              dc.w (test2_len)/2
  885.              dc.l restd-b1
  886.              dc.w 16/2
  887.  
  888. test2ps
  889.         dc.w 1  
  890.              dc.l (test2d+iff)-b1
  891.              dc.w (test2_len)/2
  892.              dc.l restd-b1
  893.              dc.w 16/2
  894.  
  895.  
  896.  
  897.  
  898. test1_len    equ    3633
  899. test2_len    equ    3452
  900.  
  901. test1_env:            dc.w 0,15,255
  902. test1_env_soft:            dc.w 0,26,255
  903. test2_env:            dc.w 0,18,255
  904.  
  905.  
  906. test1d            incbin c:sf2d/inst/tom.sam 
  907. test2d            incbin c:sf2d/inst/vibe.sam
  908.  
  909.  
  910. ;********************************************
  911.  
  912.  
  913. restd:
  914. rest_data:
  915.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  916.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  917.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  918.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  919.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  920.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  921. sine_datad:
  922.              dc.w 127,80,50,25,0,-25,-50,-100,-127
  923.              dc.w -127,-100,-50,-35,0,35,50,80,127
  924.              dc.w 127,80,50,25,0,-25,-50,-100,-127
  925.              dc.w -127,-100,-50,-35,0,35,50,80,127
  926.  
  927.  
  928. sine_data1d:
  929.              dc.w 127,120,118,110,100,99,88,77,66,55,44,30,20,5,4,0
  930.              dc.w 0,-3,-5,-8,-10,-4,-19,-22,-24,-28,-30,-35,-40,-50,-70,-100
  931.              dc.w 127,120,118,110,100,99,88,77,66,55,44,30,20,5,4,0
  932.              dc.w 0,-3,-5,-8,-10,-4,-19,-22,-24,-28,-30,-35,-40,-50,-70,-100
  933.              dc.w 127,120,118,110,100,99,88,77,66,55,44,30,20,5,4,0
  934.              dc.w 0,-3,-5,-8,-10,1-4,-19,-22,-24,-28,-30,-35,-40,-50,-70,-100
  935.  
  936.  
  937.  
  938.  
  939. endb1
  940. ;*************************************************
  941.  
  942.     end
  943.  
  944.  
  945.  
  946.     dc.w modon,1,1,8,8,6,6
  947.     dc.w pbend,down,1,60000,32
  948.  
  949.  
  950.  
  951.