home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: Steel Sky In Game Driver Etc / Lowe_SteelSkyInGameDriverEtc.adf / ssblank.data < prev    next >
Encoding:
Text File  |  1978-10-05  |  6.4 KB  |  476 lines
  1.  
  2. develop    equ 1        ;set to zero for assembling data blks
  3.             ;or testing length of current data
  4.             ;set to 1 for music development
  5.  
  6.  
  7.  
  8.     ifne develop
  9.  
  10.     include driver.s
  11.  
  12.     endc
  13.  
  14.     opt p+
  15.             ;STEEL SKY DEATH DATA
  16.  
  17. b1
  18.  
  19.     dc.w    song_table-b1
  20.     dc.w    fxjump_table-b1
  21.  
  22.  
  23.  
  24.     ifeq develop
  25.  
  26.         ;  ALL EQUs
  27.  
  28. a00  equ  508*2
  29. bb00  equ  480*2
  30. b00  equ  453*2
  31.  
  32. c01  equ  428*2
  33. db01  equ  404*2
  34. d01 equ  381*2
  35. eb01  equ  360*2
  36. e01  equ  339*2
  37. f01  equ  320*2
  38. gb01  equ  302*2
  39. g01  equ  285*2
  40. ab01 equ 269*2
  41. a01  equ  508
  42. bb01  equ  480
  43. b01  equ  453
  44.  
  45. c02  equ  428
  46. db02  equ  404
  47. d02  equ  381
  48. eb02  equ  360
  49. e02  equ  339
  50. f02  equ  320
  51. gb02  equ  302
  52. g02  equ  285
  53. ab02 equ 269
  54. a02  equ  254
  55. bb02  equ  240
  56. b02  equ  226
  57.  
  58. c03  equ  214
  59. db03  equ  202
  60. d03  equ  190
  61. eb03  equ  180
  62. e03  equ  170
  63. f03  equ  160
  64. gb03  equ  151
  65. g03  equ  143
  66. ab03 equ 135
  67. a03  equ  127
  68.  
  69. bb03  equ  480*2
  70. b03  equ  453*2
  71.  
  72. c04  equ  428*2
  73. db04  equ  404*2
  74. d04 equ  381*2
  75. eb04  equ  360*2
  76. e04  equ  339*2
  77. f04  equ  320*2
  78. gb04  equ  302*2
  79. g04  equ  285*2
  80. ab04 equ 269*2
  81. a04  equ  508
  82. bb04  equ  480
  83. b04  equ  453
  84.  
  85. c05  equ  428
  86. db05  equ  404
  87. d05  equ  381
  88. eb05  equ  360
  89. e05  equ  339
  90. f05  equ  320
  91. gb05  equ  302
  92. g05  equ  285
  93. ab05 equ 269
  94. a05  equ  254
  95. bb05  equ  240
  96. b05  equ  226
  97.  
  98. c06  equ  214
  99. db06  equ  202
  100. d06  equ  190
  101. eb06  equ  180
  102. e06  equ  170
  103. f06  equ  160
  104. gb06  equ  151
  105. g06  equ  143
  106. ab06 equ 135
  107. a06  equ  127
  108. bb06  equ  480*2
  109. b06  equ  453*2
  110.  
  111. c07  equ  428*2
  112. db07  equ  404*2
  113. d07 equ  381*2
  114. eb07  equ  360*2
  115. e07  equ  339*2
  116. f07  equ  320*2
  117. gb07  equ  302*2
  118. g07  equ  285*2
  119. ab07 equ 269*2
  120. a07  equ  508
  121. bb07  equ  480
  122. b07  equ  453
  123.  
  124. c08  equ  428
  125. db08  equ  404
  126. d08  equ  381
  127. eb08  equ  360
  128. e08  equ  339
  129. f08  equ  320
  130. gb08  equ  302
  131. g08  equ  285
  132. ab08 equ 269
  133. a08  equ  254
  134. bb08  equ  240
  135. b08  equ  226
  136.  
  137.  
  138. v equ 0
  139.  
  140. no_loop equ 0
  141. loop equ 0
  142. chann1reg   equ $dff0a0    
  143. chann2reg   equ $dff0b0
  144. chann3reg   equ $dff0c0
  145. chann4reg   equ $dff0d0
  146. dmacon     equ $dff096
  147. int_bf_int   equ   $dff01e
  148. int_bf_w    equ   $dff09a
  149. vhposr     equ   $dff006
  150. in_line    equ   0
  151. new_snd    equ   4
  152. end_song     equ   1
  153. end_patt    equ   8
  154. new_env    equ   12
  155. pbend     equ   16
  156.  
  157.  
  158.  
  159. hi: equ 223
  160. lo:  equ 446
  161.  
  162. r22    equ 134
  163. r20    equ 179        ;correctum
  164. r19    equ 150
  165. r18    equ 178
  166. r17    equ 200
  167. r16:    equ 227        ;correctum
  168. r15:    equ 249
  169. r14    equ 280
  170. r13:    equ 305
  171. r12:    equ 333
  172. r11:    equ 361
  173. r10:    equ 389
  174. r9:    equ 419
  175. r8:    equ 446
  176. r7:    equ 446+112
  177. r6:    equ 446+223
  178. r5:    equ 446+223+112
  179. r4:    equ 446*2
  180. r3:    equ 446*3
  181. r2:    equ 446*4
  182. r1:    equ 446*8
  183.  
  184.  
  185. filter: equ $bfe001
  186. filter_on equ 44
  187. filter_off equ 48
  188.  
  189. modon     equ   20
  190. pboff     equ   24
  191. modoff     equ   28
  192. rest     equ 32
  193. end_fxp  equ 36
  194. end_fx3  equ 36
  195. end_fx4  equ 40
  196. acc    equ 52
  197. repeat    equ 56
  198. down      equ   1
  199. up       equ   2
  200.  
  201. fx    equ 0
  202.  
  203.     endc
  204.  
  205.     ;"""""""""""""""""""""""""""""""""""""""""""""""""
  206.  
  207. max_songs:    dc.l  3
  208.  
  209.     ;;; DATA
  210.  
  211. song_table:
  212.         dc.l s1_b-b1,s2_b-b1,s3_b-b1,s4_b-b1    ;beach
  213.         dc.l ss1-b1,ss1-b1,ss1-b1,ss1-b1    ;silence
  214.  
  215.  
  216. fxp:
  217.  
  218.  
  219. fxjump_table:  
  220.  
  221. max_fx    dc.l    10    ;number + 1 for test routines only
  222. ;______________________________________________________________________
  223.  
  224.  
  225. ;sstart: dc.l 0,end_song
  226.  
  227. ;pstart: dc.w end_patt
  228.  
  229.  
  230. ;----------------------------------
  231.  
  232. ;;;;;;;;;;;;;;;;;;;;;   Music Data ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  233.  
  234. cr  set   24
  235. q set  cr/2
  236. sq set q/2
  237. dsq set sq/4
  238.  
  239. tq1 set      7
  240. tq2 set   6
  241. tsq1 set  3
  242. tsq2 set 4
  243.  
  244. ss1:
  245.  
  246.     dc.l    pr-b1
  247.       dc.l     0,end_song
  248.  
  249.  
  250. pr:
  251.     dc.w    new_env
  252.     dc.l    rest_env-b1
  253.     dc.w    c03,cr*4
  254.     dc.w     end_patt
  255.  
  256.  
  257.  
  258.  
  259.  
  260.  
  261.  
  262. ;************************************************
  263.  
  264. songs:
  265.  
  266.  
  267. ;------
  268. s1_b:
  269.  
  270.     dc.l    wave_snd-b1
  271.     dc.l    wave-b1
  272.  
  273.       dc.l     0,end_song
  274. s2_b:
  275.  
  276.     dc.l    wave_sndx-b1
  277.     dc.l    wavex-b1
  278.  
  279.         DC.L    0,end_song
  280.  
  281. s3_b:
  282.  
  283.     dc.l    seagull1_snd-b1
  284.     dc.l    pr-b1
  285.     dc.l     0,end_song
  286.  
  287. s4_b:
  288.  
  289.     dc.l    seagull2_snd-b1
  290.     dc.l    pr-b1
  291.  
  292.     dc.l     0,end_song
  293. ;----------
  294.  
  295.  
  296. wave
  297.  
  298.     dc.w    r4,150,r5,170,r3,180,r3,200,r2,190
  299.     dc.w end_patt
  300.  
  301. wavex
  302.     dc.w modon,4,4,8,8,6,6
  303.     dc.w    r1,200
  304.     ;dc.w    rest,12,r4,150,r5,170,r3,180,r3,200,r2,190-12
  305.     dc.w end_patt
  306.  
  307. seagull1
  308.     dc.w pbend,down,2,10000,1
  309.     dc.w  a03,10,a03,12
  310.     dc.w    rest,300
  311.     dc.w  f03,16,a03,8
  312.     dc.w  a03,8,g03,12
  313.     dc.w    rest,250
  314.  
  315.     dc.w end_patt
  316.  
  317.  
  318. seagull2
  319.     dc.w pbend,down,1,10000,1
  320.     dc.w  g03,5,rest,100,g03,15,f03,10
  321.     dc.w    rest,200
  322.     dc.w  e03,15,rest,100,e03,8,f03,10
  323.     dc.w    rest,450
  324.     dc.w end_patt
  325. wavep:
  326.         dc.w 1  
  327.              dc.l waved+iff-b1
  328.              dc.w (9094-iff)/2 
  329.              dc.l restd-b1
  330.              dc.w 16/2
  331.  
  332. seagull1_snd:
  333.     dc.w    new_env
  334.     dc.l    seagull_envvq-b1
  335.     dc.w    new_snd
  336.     dc.l    flutep-b1
  337.     dc.w     end_patt
  338.  
  339. seagull2_snd:
  340.     dc.w    new_env
  341.     dc.l    seagull_envq-b1
  342.     dc.w    new_snd
  343.     dc.l    flutep-b1
  344.     dc.w     end_patt
  345. wave_snd:
  346.     dc.w    new_env
  347.     dc.l    wave_envq-b1
  348.     dc.w    new_snd
  349.     dc.l    wavep-b1
  350.     dc.w     end_patt
  351.  
  352. wave_sndx:
  353.     dc.w    new_env
  354.     dc.l    wave_envvq-b1
  355.     dc.w    new_snd
  356.     dc.l    wavep-b1
  357.     dc.w     end_patt
  358.  
  359.  
  360.  
  361. seagull_envq:            dc.w 0,8,255
  362. seagull_envvq:            dc.w 0,4,255
  363. wave_envq:            dc.w 0,18,255
  364. wave_envvq:            dc.w 0,8,255
  365.  
  366. ;-----
  367.  
  368.  
  369. ;----------------
  370. pri:
  371.     dc.w    rest,65000
  372.     dc.w    rest,65000
  373.     dc.w    rest,65000
  374.     dc.w    rest,65000
  375.     dc.w    rest,65000
  376.     dc.w    rest,65000
  377.     dc.w    rest,65000
  378.     dc.w end_patt
  379.  
  380. ;--------------------
  381.  
  382. sounds:
  383.  
  384. flute_snd:
  385.     dc.w    new_env
  386.     dc.l    flute_env-b1
  387.     dc.w    new_snd
  388.     dc.l    flutep-b1
  389.     dc.w     end_patt
  390.  
  391. sine_snd:
  392.     dc.w    new_env
  393.     dc.l    sine_env_short-b1
  394.     dc.w    new_snd
  395.     dc.l    sinep-b1
  396.     dc.w     end_patt
  397.  
  398. flute_sndq:
  399.     dc.w    new_env
  400.     dc.l    flute_envq-b1
  401.     dc.w    new_snd
  402.     dc.l    flutep-b1
  403.     dc.w     end_patt
  404.  
  405.  
  406.  
  407. ;***********************************************
  408.  
  409. parameters:
  410.  
  411. iff    equ 108
  412.  
  413.     ; sample parameters
  414.  
  415.  
  416. flutep
  417.         dc.w 1  
  418.              dc.l fluted+iff-b1
  419.              dc.w 7278/2
  420.              dc.l fluted+4173+iff-b1
  421.              dc.w 3106/2
  422.  
  423. sinep
  424.         dc.w 1  
  425.              dc.l sined-b1
  426.              dc.w 16/2 
  427.              dc.l sined-b1
  428.              dc.w 16/2
  429.  
  430.  
  431.  
  432. envelopes:
  433.  
  434.  
  435. rest_env:            dc.w 0,0,0,0,0,0,0,0,255
  436. flute_env:            dc.w 0,48,255
  437. flute_envq:            dc.w 0,28,255
  438. trumpet_env:            dc.w 0,35,255
  439. trumpet_envq:            dc.w 0,25,255
  440. sine_env_short:            dc.w 0,50,45,40,35,30,25,20,15,10,0,255
  441.  
  442.  
  443. ;**************************************************
  444.  
  445. ;;THE FX SAMPLES ARE PULLED IN HERE...THis section can be anywhere
  446. ;; in lower memory,and in any order
  447.  
  448. fluted            incbin c:instruments/flute.sam 
  449. waved            incbin c:instruments/wave.sam 
  450.  
  451.  
  452. ;********************************************
  453.  
  454.  
  455. restd:
  456. rest_data:
  457.              dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  458. sined:
  459. sine_datad:
  460.              dc.w 127,80,50,25,0,-25,-50,-100,-127
  461.              dc.w -127,-100,-50,-35,0,35,50,80,127
  462.              dc.w 127,80,50,25,0,-25,-50,-100,-127
  463.              dc.w -127,-100,-50,-35,0,35,50,80,127
  464.  
  465. endb1
  466. ;*************************************************
  467.  
  468.     end
  469.  
  470.  
  471.  
  472.  
  473.     dc.w modon,1,1,8,8,6,6
  474.     dc.w pbend,down,1,60000,32
  475.  
  476.