Changes

TRACKERS MB SRC EN EXAMPDAT

3,543 bytes added, 06:09, 17 July 2019
Created page with "*q-,u+ db 0feh dw start dw einde dw start org 08000h start: ; pattern / position data's xpos: db 01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16 db 17,18,19,20,21,22,..."
*q-,u+
db 0feh
dw start
dw einde
dw start
org 08000h

start:

; pattern / position data's

xpos: db 01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16
db 17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32
db 33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48
db 49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64
db 65,66,67,68,69,70,71,72,73,74,75,76,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
db 1,1,1,1,1,1,1,1

; last position

xleng: db 0

; user code # 1

xuser1: dw 157 ;1 xor 156

; instrument data

xmmvoc: db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah
db 060h,020h,011h,080h,0f3h,0f3h,024h,035h,00ah

; instrument-numbers module

xmmsti: db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

; instrument-numbers pac + volumes

xpasti: db 1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0

; stereo settings

xstpr: db 3,3,3,3,3,3,1,1,1,3

; initial tempo

xtempo: db 6

; sustain mode

xsust: db 00100000b

; naam song

xnaam: db "MoonBlaster v1.4. Coding by R.Schrijvers"

; preferred chip

xchip: db 2

; initial instrument module

xbegvm: db 1,1,1,1,1,1,1,1,1

; initial instrument pac

xbegvp: db 1,1,1,1,1,1,1,1,1

; original data's pac

xorgp1: db 060h,020h,011h,085h,0f3h,0f3h,024h,035h
db 060h,020h,011h,085h,0f3h,0f3h,024h,035h
db 060h,020h,011h,085h,0f3h,0f3h,024h,035h
db 060h,020h,011h,085h,0f3h,0f3h,024h,035h
db 060h,020h,011h,085h,0f3h,0f3h,024h,035h
db 060h,020h,011h,085h,0f3h,0f3h,024h,035h

; instrument number's originals

xorgnr: db 1,1,1,1,1,1


;samplekit name

xsmpkt: db "NONE "

; drum block

xdrblk: db 010000b ;bassdrum
db 01000b ;snare
db 0100b ;tom
db 010b ;cymbal
db 01b ;hi-hat
db 011000b ;bassdrum+snare
db 010100b ;bassdrum+tom
db 010010b ;bassdrum+cymbal
db 010001b ;bassdrum+hi-hat
db 01100b ;snaredrum+tom
db 01010b ;snaredrum+cymbal
db 01001b ;snaredrum+hi-hat
db 0110b ;tom+cymbal
db 0101b ;tom+hi-hat
db 011b ;cymbal+hi-hat

; msx music drums volumes

xdrvol: db 000h,042h,024h

; msx music drums frequencies

xdrfrq:
db 020h,005h,050h,005h,0c0h,001h
db 020h,005h,050h,005h,0c0h,001h
db 020h,005h,050h,005h,0c0h,001h

; user code # 2 (=1,but coded in another way)

xuser2: dw 668 ;1 xor 669

; reverberation

xrever: db 0,0,0,0,0,0,0,0,0

; repeat position

xloop: db 0ffh

einde: end

������������������������������������������������������������������������������������������������������������������������������