;######################################################################## ;# speed is = 1953 / BPM # ;# verses are 1...31 or 65...95 for volume decrease on last 2 verses # ;#----------------------------------------------------------------------# ;# timing: # ;# _dummy filling byte for even bytes in a row # ;# __ende the end # ;# _endvs end of "preview" # ;# takt16 play note(s) and wait 1/16, before next notes start # ;# takt18 play note(s) and wait 1/8 , before next notes start # ;# takt36 play note(s) and wait 3/16, before next notes start # ;# takt14 play note(s) and wait 1/4 , before next notes start # ;# takt38 play note(s) and wait 3/8 , before next notes start # ;# takt12 play note(s) and wait 1/2 , before next notes start # ;# takt34 play note(s) and wait 3/4 , before next notes start # ;#----------------------------------------------------------------------# ;# note set: (x=channel): # ;# c0___x ... dis5_x NameOctave_Channel # ;# ---------------------------------------------------------------------# ;# envelope set (x=channel): # ;# n116_x 1/16 138_x 3/8 # ;# n108_x 1/8 102_x 1/2 # ;# n136_x 3/16 304_x 3/4 # ;# n104_x 1/4 101_x 1/1 # ;#----------------------------------------------------------------------# ;# volume: vol__x nnn (nnn 0...255) # ;# halftone shift: ver__x nnn (nnn 0...255, calculated mod 64)# ;# wavetable: wad__x ll hh first Low-, then High-Byte # ;# envelope-table: ead__x ll hh first Low-, then High-Byte # ;############----------------############################################ .db "----------------",68,100 ;name, 4 verses and speed .db 160,93 ;set volumes .db ver__1,12 ;shift channel 1 +1 octave .db ver__2,12 ;shift channel 2 +1 octave .db n104_1,n104_2 ;set initial envelopes .db __ende,_dummy ;this was the end