home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: Super Street …ghter II PC Format Disk 2 / Lowe_SuperStreetFighterIIPCFormatDisk2.img / JINGLE.BAK < prev    next >
Encoding:
Text File  |  1995-12-06  |  15.7 KB  |  1,147 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_loopq    macro
  106.     dc.w    new_env
  107.     dc.l    leadloop_envq-b1
  108.     dc.w    new_snd
  109.     dc.l    lead_loopp-b1
  110.     endm
  111.  
  112. lead_loop    macro
  113.     dc.w    new_env
  114.     dc.l    leadloop_env-b1
  115.     dc.w    new_snd
  116.     dc.l    lead_loopp-b1
  117.     endm
  118.  
  119.  
  120. lead_looped    macro
  121.     dc.w    new_env
  122.     dc.l    leadlooped_env-b1
  123.     dc.w    new_snd
  124.     dc.l    lead_loopp-b1
  125.     endm
  126.  
  127. rim        macro
  128.     dc.w    new_env
  129.     dc.l    rim_env-b1
  130.     dc.w    new_snd
  131.     dc.l    rimp-b1
  132.     endm
  133.  
  134. claves        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. clave        macro
  142.     dc.w    new_env
  143.     dc.l    clave_env-b1
  144.     dc.w    new_snd
  145.     dc.l    clavep-b1
  146.     endm
  147.  
  148. tamb        macro
  149.     dc.w    new_env
  150.     dc.l    tamb_env-b1
  151.     dc.w    new_snd
  152.     dc.l    tambp-b1
  153.     endm
  154.  
  155.  
  156.  
  157. sine_wave16    macro
  158.     dc.w    new_env
  159.     dc.l    sine_env-b1
  160.     dc.w    new_snd
  161.     dc.l    sinep-b1
  162.     endm
  163.  
  164. sine_wave1    macro
  165.     dc.w    new_env
  166.     dc.l    sine_env-b1
  167.     dc.w    new_snd
  168.     dc.l    sine1p-b1
  169.     endm
  170.  
  171.  
  172.  
  173.  
  174. synmaj        macro
  175.     dc.w    new_env
  176.     dc.l    synmaj_env-b1
  177.     dc.w    new_snd
  178.     dc.l    synmajp-b1
  179.     endm
  180.  
  181. synmin        macro
  182.     dc.w    new_env
  183.     dc.l    synmin_env-b1
  184.     dc.w    new_snd
  185.     dc.l    synminp-b1
  186.     endm
  187.  
  188.  
  189.  
  190. heavy_guitar    macro
  191.     dc.w    new_env
  192.     dc.l    hguit_env-b1
  193.     dc.w    new_snd
  194.     dc.l    hguitp-b1
  195.     endm
  196.  
  197. eguitar_short    macro
  198.     dc.w    new_env
  199.     dc.l    egs_env-b1
  200.     dc.w    new_snd
  201.     dc.l    egsp-b1
  202.     endm
  203.  
  204.  
  205.  
  206.  
  207.  
  208. syn1    macro
  209.     dc.w    new_env
  210.     dc.l    syn1_envs-b1
  211.     dc.w    new_snd
  212.     dc.l    syn1p-b1
  213.     endm
  214.  
  215.  
  216.  
  217.  
  218. d    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. c    macro            ;kick macro
  226.     dc.w    new_env
  227.     dc.l    kick_env-b1
  228.     dc.w    new_snd
  229.     dc.l    kickp-b1
  230.     endm
  231.  
  232.  
  233.  
  234.  
  235. hd    macro            ;snare macro
  236.     dc.w    new_env
  237.     dc.l    snare_env-b1
  238.     dc.w    new_snd
  239.     dc.l    snarep-b1
  240.     endm
  241.     
  242.  
  243. g    macro            ;snare macro
  244.     dc.w    new_env
  245.     dc.l    hat_env-b1
  246.     dc.w    new_snd
  247.     dc.l    hatp-b1
  248.     endm
  249.  
  250. kick    macro            ;kick macro
  251.     dc.w    new_env
  252.     dc.l    kick_env-b1
  253.     dc.w    new_snd
  254.     dc.l    kickp-b1
  255.     endm
  256.  
  257.  
  258. snare    macro            ;snare macro
  259.     dc.w    new_env
  260.     dc.l    snare_env-b1
  261.     dc.w    new_snd
  262.     dc.l    snarep-b1
  263.     endm
  264.     
  265.  
  266. hat    macro            ;snare macro
  267.     dc.w    new_env
  268.     dc.l    hat_env-b1
  269.     dc.w    new_snd
  270.     dc.l    hatp-b1
  271.     endm
  272.  
  273. clap    macro            ;clap macro
  274.     dc.w    new_env
  275.     dc.l    clap_env-b1
  276.     dc.w    new_snd
  277.     dc.l    clapp-b1
  278.     endm
  279.  
  280.  
  281.  
  282.  
  283.  
  284.  
  285. r    equ r8        ;rim default playback rate
  286. c    equ r20        ;clave playback    
  287. k    equ r16        ;kick default playback rate
  288. s    equ r20        ;clav default playback rate
  289. h    equ r20        ;hat default playback rate
  290. d    equ r16        ;kick default playback rate
  291. hd    equ r16        ;snare default playback rate
  292. g    equ r20        ;hat default playback rate
  293. t    equ r8        ;tambourine default playback rate
  294. cl    equ r16        ;clap default playback rate
  295.  
  296.  
  297.  
  298. ;********************************************************************
  299.  
  300.  
  301.  
  302.             ;SF2  RYU  DATA
  303.  
  304. b1
  305.  
  306.     dc.w    song_table-b1
  307.     dc.w    fxjump_table-b1
  308.  
  309.  
  310.  
  311.     ifeq develop
  312.  
  313.         ;  ALL EQUs
  314.  
  315.  
  316.             include nequ.blk
  317.  
  318.  
  319.  
  320. v equ 0
  321.  
  322. no_loop equ 0
  323. loop equ 0
  324. chann1reg   equ $dff0a0    
  325. chann2reg   equ $dff0b0
  326. chann3reg   equ $dff0c0
  327. chann4reg   equ $dff0d0
  328. dmacon     equ $dff096
  329. int_bf_int   equ   $dff01e
  330. int_bf_w    equ   $dff09a
  331. vhposr     equ   $dff006
  332. in_line    equ   0
  333. new_snd    equ   4
  334. end_song     equ   1
  335. end_patt    equ   8
  336. new_env    equ   12
  337. pbend     equ   16
  338. iff        equ 104
  339.  
  340.  
  341. hi: equ 223
  342. lo:  equ 446
  343.  
  344. r22    equ 134
  345. r20    equ 179        ;correctum
  346. r19    equ 150
  347. r18    equ 178
  348. r17    equ 200
  349. r16:    equ 227        ;correctum
  350. r15:    equ 249
  351. r14    equ 280
  352. r13:    equ 305
  353. r12:    equ 333
  354. r11:    equ 361
  355. r10:    equ 389
  356. r9:    equ 419
  357. r8:    equ 446
  358. r7:    equ 446+112
  359. r6:    equ 446+223
  360. r5:    equ 446+223+112
  361. r4:    equ 446*2
  362. r3:    equ 446*3
  363. r2:    equ 446*4
  364. r1:    equ 446*8
  365.  
  366.  
  367. filter: equ $bfe001
  368. filter_on equ 44
  369. filter_off equ 48
  370.  
  371. modon     equ   20
  372. pboff     equ   24
  373. modoff     equ   28
  374. rest     equ 32
  375. end_fxp  equ 36
  376. end_fx3  equ 36
  377. end_fx4  equ 40
  378. acc    equ 52
  379. repeat    equ 56
  380. down      equ   1
  381. up       equ   2
  382.  
  383. fx    equ 0
  384.  
  385.     endc
  386.  
  387.     ;"""""""""""""""""""""""""""""""""""""""""""""""""
  388.  
  389.  
  390.     ;;; DATA
  391.  
  392. song_table:        
  393.  
  394.     dc.l 50,j1c1-b1,j1c2-b1,j1c3-b1,j1c4-b1,0,0,0    ;j1
  395.     dc.l 10,j2c1-b1,j2c2-b1,j2c3-b1,j2c4-b1,0,0,0    ;j1
  396.     dc.l 5,j3c1-b1,j3c2-b1,j3c3-b1,j3c4-b1,0,0,0    ;j1
  397.     dc.l 5,ss1-b1,ss1-b1,ss1-b1,ss1-b1,0,0,0        ;j1
  398.  
  399.  
  400. max_songs:    dc.l  5
  401.  
  402.  
  403.  
  404. fxp:
  405.  
  406.  
  407. fxjump_table:  
  408.  
  409. ;max_fx    dc.l    10    ;number + 1 for test routines only
  410. ;______________________________________________________________________
  411.  
  412.  
  413. ;sstart: dc.l 0,end_song
  414.  
  415. ;pstart: dc.w end_patt
  416.  
  417.  
  418. ;----------------------------------
  419.  
  420.     octn
  421.  
  422.  
  423.  
  424. cr  set   12
  425. q set  cr/2
  426. sq set q/2
  427. dsq set sq/4
  428.  
  429. tq1 set      7
  430. tq2 set   6
  431. tsq1 set  3
  432. tsq2 set 4
  433.  
  434. ss1:            ;;;;;;silence tune for test only
  435.  
  436.     dc.l    pri-b1
  437.       dc.l     0,end_song
  438.  
  439.     dc.w    c03,cr*4
  440.     dc.w     end_patt
  441.  
  442. pri:
  443.     dc.w    new_env
  444.     dc.l    rest_env-b1
  445.     dc.w    c03,65000
  446.     dc.w     end_patt
  447.  
  448. ;************************************************
  449. ;;;;;;;;;;;;;;;;;;;;;           MUSIC DATA HERE  ;;;;;;;;;;;;;;;;;;;;;;;
  450.  
  451.  
  452.  
  453. ;--------------------------
  454. ;------
  455.  
  456. cr  set   16
  457. q set  cr/2
  458. sq set q/2
  459. dsq set sq/4
  460.  
  461. tq1 set      8
  462. tq2 set   8
  463.  
  464. tsq1 set  4
  465. tsq2 set 4
  466.  
  467. tcr1 set 16
  468. tcr2 set 16
  469.  
  470.  
  471. oc    set    cr
  472. o6    set    q
  473. i8    set    cr*2
  474. l8    set    cr*2
  475.  
  476.  
  477.  
  478. j1c1:
  479.  
  480.     
  481.     dc.l    j1bp-b1
  482.  
  483.       dc.l     0,end_song
  484.  
  485. j1c2:
  486.  
  487.     ;noplay
  488.     dc.l    j1tune1-b1
  489.  
  490.  
  491.         DC.L    0,end_song
  492.  
  493. j1c3:
  494.     dc.l    j1dp-b1
  495.     dc.l     0,end_song
  496.  
  497. j1c4:
  498.     ;noplay
  499.     dc.l    j1pattch4-b1
  500.  
  501.     dc.l     0,end_song
  502. ;************************************************
  503.  
  504. ;-----------------------------------------------
  505.  
  506. j1dp
  507.     kick
  508.     dc.w    k,q,k,sq
  509.     hat
  510.     dc.w    h,sq
  511.     snare
  512.     dc.w    s,q
  513.     hat
  514.     dc.w    h,q
  515.     kick
  516.     dc.w    k,q
  517.     hat
  518.     dc.w    h,q
  519.     snare
  520.     dc.w    s,q
  521.     hat
  522.     dc.w    h,q
  523.     dc.w    end_patt
  524.  
  525.  
  526.     oct1d
  527.  
  528.  
  529. j1pattch4
  530.     
  531.     test_sound1
  532.  
  533.  
  534.     dc.w    rest,q,g02,sq,g02,sq,g02,sq,g02,q+sq
  535.     dc.w    e03,q,b02,q,e03,sq,gb03,q,g03,sq+cr
  536.     dc.w    g03,cr,gb03,cr,f03,cr+q,gb02,sq,gb02,sq,gb02,sq,gb02,sq+q
  537.     dc.w    gb03,q,db03,q,db03,sq,e03,q,f03,sq+cr
  538.     dc.w    gb03,cr,f03,cr,e03,cr+q
  539.     dc.w    f02,sq,f02,sq,f02,sq,f02,q+sq,f03,q,a02,q
  540.     dc.w    c03,sq,e03,q,f03,sq+cr,f03,cr,e03,cr,f03,cr+q
  541.     dc.w    g02,sq,g02,sq,g02,sq,g02,q+sq,e03,q,b02,q,e03,sq
  542.     dc.    gb03,q,e03,sq,rest,cr,e03,cr,gb03,cr,g03,cr
  543.     
  544.     dc.w    end_patt
  545.  
  546.  
  547. ;-------------------
  548. pr:
  549.     dc.w    new_env
  550.     dc.l    rest_env-b1
  551.     dc.w    c03,cr*4
  552.     dc.w     end_patt
  553.  
  554.  
  555.     octn
  556. j1bp
  557.  
  558.     bass_sound
  559.  
  560.     dc.w    e02,q,e02,cr,e02,cr,e02,cr,e02,cr,e02,q
  561.     dc.w    a02,q,bb02,q,a02,q,g02,q,e02,q,d02,q
  562.     dc.w    e02,q,e02,cr,e02,cr,e02,cr,e02,cr+q
  563.     dc.w    d02,q,e02,cr,d02,q,e02,cr
  564.     dc.w    e02,q,e02,cr,e02,cr,e02,cr,e02,cr,e02,q
  565.     dc.w    a02,q,bb02,q,a02,q,g02,q,e02,q,d02,q
  566.     dc.w    e02,q,e02,cr,e02,cr,e02,cr,e02,cr+q
  567.     dc.w    d02,q,e02,cr,d02,q,e02,cr
  568.     dc.w     end_patt
  569.  
  570.  
  571.  
  572.     octn
  573.  
  574.  
  575. j1tune1
  576.     oct1d
  577.  
  578.     ;lead_loop
  579.     test_sound1
  580.  
  581.     dc.w modon,1,1,2,2,6,6
  582.  
  583.     dc.w    rest,q,b02,sq,b02,sq,b02,sq,b02,q+sq
  584.     dc.w    g03,q,e03,q,g03,sq,a03,q,b03,sq+cr
  585.     dc.w    bb03,cr,a03,cr,ab03,cr+q,a02,sq,a02,sq,a02,sq,a02,sq+q
  586.     dc.w    a03,q,e03,q,gb03,sq,g03,q,a03,sq+cr
  587.     dc.w    a03,cr,ab03,cr,g03,cr+q
  588.     dc.w    a02,sq,a02,sq,a02,sq,a02,q+sq,a03,q,c03,q
  589.     dc.w    e03,sq,g03,q,a03,sq+cr,a03,cr,ab03,cr,a03,cr+q
  590.     dc.w    b02,sq,b02,sq,b02,sq,b02,q+sq,g03,q,e03,q,g03,sq
  591.     dc.    a03,q,g03,sq,rest,cr,g03,cr,a03,cr,bb03,cr
  592.  
  593.     dc.w end_patt
  594.  
  595. ;********************************************
  596.  
  597.  
  598. cr  set   16
  599. q set  cr/2
  600. sq set q/2
  601. dsq set sq/4
  602.  
  603. tq1 set      8
  604. tq2 set   8
  605.  
  606. tsq1 set  4
  607. tsq2 set 4
  608.  
  609. tcr1 set 16
  610. tcr2 set 16
  611.  
  612.  
  613. oc    set    cr
  614. o6    set    q
  615. i8    set    cr*2
  616. l8    set    cr*2
  617.  
  618.  
  619.  
  620. j2c1:
  621.  
  622.         
  623.     dc.l    j2bp-b1
  624.  
  625.     noplay
  626.       dc.l     0,end_song
  627.  
  628. j2c2:
  629.  
  630.     dc.l    j2tune1-b1
  631.  
  632.     noplay
  633.  
  634.         DC.L    0,end_song
  635.  
  636. j2c3:
  637.  
  638.     dc.l    j2dp-b1
  639.     noplay
  640.  
  641.     dc.l     0,end_song
  642.  
  643. j2c4:
  644.     ;noplay
  645.     dc.l    j2pattch4-b1
  646.     noplay
  647.  
  648.     dc.l     0,end_song
  649. ;************************************************
  650.  
  651. ;-----------------------------------------------
  652.  
  653. j2dp
  654.     kick
  655.     dc.w    k,sq
  656.     snare
  657.     dc.w    s,q
  658.  
  659.     kick
  660.     dc.w    k,sq+q
  661.  
  662.     test_sound2
  663.     dc.w    t,sq,t+20,sq,t+40,sq,t,q,t,sq,t+20,sq,t+30,sq,t+40,sq,t,sq,t+20,sq,t,q+sq
  664.  
  665.     kick
  666.     dc.w    k,sq
  667.  
  668.     snare
  669.     dc.w    s,q,s,sq
  670.  
  671.     kick
  672.     dc.w    k,sq
  673.  
  674.     test_sound2
  675.     dc.w    t,sq,t+20,sq,t+30,q,t+40,sq
  676.  
  677.     kick
  678.     dc.w    k,q,k,sq,k,q+sq+cr*3
  679.  
  680.     dc.w    end_patt
  681.  
  682.  
  683.     oct1d
  684.  
  685.  
  686. j2pattch4
  687.     
  688.     test_sound1
  689.  
  690.     dc.w    rest,cr*2,d03,sq,ab03,q,g03,q+cr
  691.     dc.w    g02,cr,d03,cr,g03,cr*2
  692.     dc.w    b03,sq,b03,sq,b03,sq,b03,sq,b03,sq,b03,q+sq+cr*2
  693.  
  694.     
  695.     dc.w    end_patt
  696.  
  697.  
  698. ;-------------------
  699.     octn
  700. j2bp
  701.  
  702.     bass_sound
  703.  
  704.  
  705.     dc.w    b01,sq,b02,sq,b01,sq,b01,sq+cr*4
  706.     dc.w    b01,cr,b01,cr,b01,cr,b01,sq,b02,cr*3+q+sq
  707.  
  708.     dc.w     end_patt
  709.  
  710.  
  711.  
  712.     octn
  713.  
  714.  
  715. j2tune1
  716.     oct1d
  717.  
  718.     ;lead_loop
  719.     test_sound1
  720.  
  721.     dc.w modon,1,1,2,2,6,6
  722.  
  723.     dc.w    rest,sq,a02,q,ab02,sq+cr*4,b02,cr+q+sq
  724.     dc.w    gb02,q,e02,sq,d02,sq,a01,sq,b01,sq
  725.     dc.w    b01,q+sq+cr*3
  726.     dc.w end_patt
  727.  
  728.  
  729. ;******************************************
  730.  
  731.  
  732.  
  733. cr  set   16
  734. q set  cr/2
  735. sq set q/2
  736. dsq set sq/4
  737.  
  738. tq1 set      8
  739. tq2 set   8
  740.  
  741. tsq1 set  4
  742. tsq2 set 4
  743.  
  744. tcr1 set 16
  745. tcr2 set 16
  746.  
  747.  
  748. oc    set    cr
  749. o6    set    q
  750. i8    set    cr*2
  751. l8    set    cr*2
  752.  
  753.  
  754.  
  755. j3c1:
  756.  
  757.         
  758.     dc.l    j3bp-b1
  759.  
  760.     noplay
  761.       dc.l     0,end_song
  762.  
  763. j3c2:
  764.  
  765.     dc.l    j3tune1-b1
  766.  
  767.     noplay
  768.  
  769.         DC.L    0,end_song
  770.  
  771. j3c3:
  772.  
  773.     ;noplay
  774.     dc.l    j3dp-b1
  775.     noplay
  776.     dc.l     0,end_song
  777.  
  778. j3c4:
  779.     dc.l    j3pattch4-b1
  780.     noplay
  781.  
  782.     dc.l     0,end_song
  783. ;************************************************
  784.  
  785. ;-----------------------------------------------
  786.  
  787. j3dp
  788.  
  789.     octn
  790.  
  791.     snare
  792.     dc.w    rest,sq,s,q,s,sq,s,sq,s,sq,s,sq
  793.     dc.w    s,q,s,q,s,sq,s,q,s,q,s,cr*4
  794.     dc.w    end_patt
  795.  
  796. j3pattch4
  797.     
  798.     test_sound1
  799.  
  800.     dc.w    rest,sq,e02,q,c02,sq,e02,sq,e02,sq,a02,sq
  801.     dc.w    e02,q,a02,q,g02,sq,e02,q,e02,q,e02,cr
  802.     
  803.     dc.w    end_patt
  804.  
  805.  
  806. ;-------------------
  807.     octn
  808. j3bp
  809.  
  810.     bass_sound
  811.  
  812.     dc.w    a01,sq,a02,q,a02,q,g02,sq,e02,sq,c02,sq,c02,sq
  813.     dc.w    a01,q+sq
  814.  
  815.     dc.w a02,cr,a01,cr
  816.  
  817.  
  818.  
  819.     dc.w     end_patt
  820.  
  821.  
  822.  
  823.     octn
  824.  
  825.  
  826. j3tune1
  827.     oct1d
  828.  
  829.     ;lead_loop
  830.     test_sound1
  831.  
  832.     dc.w modon,1,1,2,2,6,6
  833.  
  834.     dc.w    rest,sq,a02,q,e02,sq,g02,sq,a02,sq,c03,sq
  835.     dc.w    a02,q,c03,q,b02,sq,a02,q,a02,q,a02,cr
  836.  
  837.  
  838.  
  839.     dc.w end_patt
  840.  
  841.  
  842.  
  843.  
  844.  
  845. ;------------------------
  846. iff    equ 104
  847.  
  848.     ; sample parameters
  849.  
  850.  
  851. abassp
  852.         dc.w 1  
  853.              dc.l (abassd+iff)-b1
  854.              dc.w (2822)/2
  855.              dc.l (abassd+iff+2692)-b1
  856.              dc.w (2822-2692)/2
  857.  
  858. ;abassp
  859.         dc.w 1  
  860.              dc.l (abassd+iff)-b1
  861.              dc.w (2992-iff)/2
  862.              dc.l restd-b1
  863.              dc.w 16/2
  864.  
  865.  
  866. hguitp
  867.         dc.w 1  
  868.              dc.l hguitd-b1
  869.              dc.w 4010/2
  870.              dc.l (hguitd+1284)-b1
  871.              dc.w (4010-1284)/2
  872.  
  873.  
  874. sinep
  875.         dc.w 1  
  876.              dc.l sine_datad-b1
  877.              dc.w 16
  878.              dc.l sine_datad-b1
  879.              dc.w 16
  880.  
  881. sine1p
  882.         dc.w 1  
  883.              dc.l sine_data1d-b1
  884.              dc.w 16
  885.              dc.l sine_data1d-b1
  886.              dc.w 16
  887.  
  888.  
  889. snarep
  890.         dc.w 1  
  891.              dc.l (snared)-b1
  892.              dc.w (2240)/2 
  893.              dc.l restd-b1
  894.              dc.w 16/2
  895.  
  896. kickp
  897.         dc.w 1  
  898.              dc.l (kickd)-b1
  899.              dc.w (2272)/2         ;2272
  900.              dc.l restd-b1
  901.              dc.w 16/2
  902.  
  903. hatp
  904.         dc.w 1  
  905.              dc.l (hatd)-b1
  906.              dc.w (2983)/2 
  907.              dc.l restd-b1
  908.              dc.w 16/2
  909.  
  910. clapp
  911.         dc.w 1  
  912.              dc.l (hatd)-b1
  913.              dc.w (2568)/2 
  914.              dc.l restd-b1
  915.              dc.w 16/2
  916.  
  917.  
  918.  
  919. synmajp
  920.         dc.w 1  
  921.              dc.l (synmajd)-b1
  922.              dc.w (4204/2)/2
  923.              dc.l restd-b1
  924.              dc.w 16/2
  925.  
  926. synminp
  927.         dc.w 1  
  928.              dc.l (synmind)-b1
  929.              dc.w ((4032/2))/2 
  930.              dc.l restd-b1
  931.              dc.w 16/2
  932.  
  933. clavep
  934.         dc.w 1  
  935.              dc.l (claved+iff)-b1
  936.              dc.w ((2320/2))/2 
  937.              dc.l restd-b1
  938.              dc.w 16/2
  939.  
  940. tambp
  941.         dc.w 1  
  942.              dc.l (tambd+iff)-b1
  943.              dc.w ((1457/2))/2 
  944.              dc.l restd-b1
  945.              dc.w 16/2
  946.  
  947.  
  948.  
  949. rimp
  950.         dc.w 1  
  951.              dc.l (rimd+iff)-b1
  952.              dc.w ((400/2))/2 
  953.              dc.l restd-b1
  954.              dc.w 16/2
  955.  
  956. chinese_synp
  957.         dc.w 1  
  958.              dc.l (chinese_synd+iff)-b1
  959.              dc.w (8703/2)/2 
  960.              dc.l restd-b1
  961.              dc.w 16/2
  962.  
  963.  
  964. lead_loopp
  965.         dc.w 1  
  966.              dc.l (leadloopd)-b1
  967.              dc.w (4658)/2 
  968.              dc.l (leadloopd+4146)-b1
  969.              dc.w (4658-4146)/2 
  970.  
  971. ;----------------------------
  972. envelopes:
  973.  
  974.  
  975. rest_env:            dc.w 0,0,0,0,0,0,0,0,255
  976. flute_env:            dc.w 0,48,255
  977. dloop_env:            dc.w 0,38,255
  978. strings_env:            dc.w 0,35,255
  979. fhorn_env:            dc.w 0,38,255
  980. abass_env:            dc.w 0,45,255
  981. piano_env:            dc.w 0,48,255
  982. hato_env:            dc.w 0,28,255
  983. hatc_env:            dc.w 0,48,255
  984. hato_envl:            dc.w 0,48,255
  985. hatc_envl:            dc.w 0,48,255
  986.  
  987. clave_env:            dc.w 0,40,255
  988. rim_env:            dc.w 0,28,255
  989.  
  990.  
  991.  
  992.  
  993. flute_envq:            dc.w 0,18,255
  994. sine_env_short:            dc.w 0,40,39,37,36,34,0,28,25,22,20,0
  995.                 dc.w 18,17,16,15,14,13,12,11,0,10
  996.                 dc.w 9,8,7,6,5,4,3,2,1,0,255
  997.  
  998. sine_env_vshort:        dc.w 30,25,0,15,10,8,7,255
  999.  
  1000. sine_env:            dc.w 25,24,23,22,21,20
  1001.                 dc.w 15,14,13,12,0,9,8,7,6,5,4,0,255
  1002. syn1_envs
  1003. sine_envl:            dc.w 60,60,60,60,0,40,30,20
  1004.                 dc.w 17,16,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0,255
  1005.  
  1006. snare_env            dc.w 0,15,255
  1007. kick_env            dc.w 0,29,255
  1008. hat_env                dc.w 0,6,255
  1009. clap_env            dc.w 0,38,255
  1010. tamb_env            dc.w 0,20,255
  1011.  
  1012. sine_envloop            dc.w 0,25,255
  1013.  
  1014. chord_env:            dc.w 0,64,255
  1015.  
  1016.  
  1017. hguit_env:            dc.w 0,10,255
  1018. syn1_env:            dc.w 0,52,255
  1019. egs_env:            dc.w 0,22,255
  1020. synmaj_env:            dc.w 0,20,255
  1021. synmin_env:            dc.w 0,19,255
  1022. ;leadloop_env:            dc.w 0,28,255
  1023. leadloop_env
  1024. leadlooped_env            dc.w 0,60
  1025.                 dc.w  60,255
  1026.  
  1027. leadloop_envq
  1028.                 dc.w  40,255
  1029.  
  1030.  
  1031.  
  1032.  
  1033. chinese_syn_env            dc.w 0,30
  1034.                 dc.w  30,255
  1035.  
  1036.  
  1037. lead_env_short            
  1038.                 dc.w 48,45,43,42,40,35,32,28,18,12,8,5,0,255
  1039.  
  1040.  
  1041.  
  1042. ;**************************************************
  1043.  
  1044. ;;THE FX SAMPLES ARE PULLED IN HERE...THis section can be anywhere
  1045. ;; in lower memory,and in any order
  1046.  
  1047.  
  1048. ;abassd            incbin c:sf2d/inst/Cbassloopn.sam     ;bass+drum
  1049. abassd            incbin c:sf2d/inst/fuzzbass.sam 
  1050. snared            incbin c:sf2d/inst/snare.sam 
  1051. kickd            incbin c:sf2d/inst/kick2.sam 
  1052. hatd            incbin c:sf2d/inst/hat2.sam 
  1053. clapd            ;incbin c:sf2d/inst/clap.sam 
  1054. tambd            ;incbin c:sf2d/inst/tamb.sam 
  1055. synmajd            ;incbin c:sf2d/inst/synmajl.sam 
  1056. synmind            ;incbin c:sf2d/inst/synminl.sam 
  1057. hguitd            ;incbin c:sf2d/inst/hguitnn.sam 
  1058. leadloopd        ;incbin c:sf2d/inst/leadloopn.sam 
  1059. claved            ;incbin c:sf2d/inst/clave.sam 
  1060. rimd            ;incbin c:sf2d/inst/rim.sam 
  1061. chinese_synd        ;incbin c:sf2d/inst/chinese_syn.sam
  1062.  
  1063.  
  1064.  
  1065.  
  1066. test1p
  1067.         dc.w 1  
  1068.              dc.l (test1d+iff)-b1
  1069.              dc.w (test1_len)/2
  1070.              ;dc.l (test1d+iff+126)-b1
  1071.              ;dc.w (test1_len-126)/2
  1072.  
  1073.              dc.l restd-b1
  1074.              dc.w 16/2
  1075.  
  1076.  
  1077. test2p
  1078.         dc.w 1  
  1079.              dc.l (test2d+iff)-b1
  1080.              dc.w (test2_len)/2
  1081.              dc.l restd-b1
  1082.              dc.w 16/2
  1083.  
  1084. test2ps
  1085.         dc.w 1  
  1086.              dc.l (test2d+iff)-b1
  1087.              dc.w (test2_len)/2
  1088.              dc.l restd-b1
  1089.              dc.w 16/2
  1090.  
  1091.  
  1092.  
  1093.  
  1094. test1_len    equ    7406
  1095. test2_len    equ    3633
  1096.  
  1097. test1_env:            dc.w 0,25,255
  1098. test1_env_soft:            dc.w 0,26,255
  1099. test2_env:            dc.w 0,18,255
  1100.  
  1101.  
  1102. test1d            incbin c:sf2d/inst/synbrass.sam 
  1103. test2d            incbin c:sf2d/inst/tom.sam
  1104.  
  1105.  
  1106. ;********************************************
  1107.  
  1108.  
  1109. restd:
  1110. rest_data:
  1111.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1112.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1113.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1114.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1115.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1116.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1117. sine_datad:
  1118.              dc.w 127,80,50,25,0,-25,-50,-100,-127
  1119.              dc.w -127,-100,-50,-35,0,35,50,80,127
  1120.              dc.w 127,80,50,25,0,-25,-50,-100,-127
  1121.              dc.w -127,-100,-50,-35,0,35,50,80,127
  1122.  
  1123.  
  1124. sine_data1d:
  1125.              dc.w 127,120,118,110,100,99,88,77,66,55,44,30,20,5,4,0
  1126.              dc.w 0,-3,-5,-8,-10,-4,-19,-22,-24,-28,-30,-35,-40,-50,-70,-100
  1127.              dc.w 127,120,118,110,100,99,88,77,66,55,44,30,20,5,4,0
  1128.              dc.w 0,-3,-5,-8,-10,-4,-19,-22,-24,-28,-30,-35,-40,-50,-70,-100
  1129.              dc.w 127,120,118,110,100,99,88,77,66,55,44,30,20,5,4,0
  1130.              dc.w 0,-3,-5,-8,-10,1-4,-19,-22,-24,-28,-30,-35,-40,-50,-70,-100
  1131.  
  1132.  
  1133.  
  1134.  
  1135. endb1
  1136. ;*************************************************
  1137.  
  1138.     end
  1139.  
  1140.  
  1141.  
  1142.     dc.w modon,1,1,8,8,6,6
  1143.     dc.w pbend,down,1,60000,32
  1144.  
  1145.  
  1146.  
  1147.