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