home *** CD-ROM | disk | FTP | other *** search
- ;-----------------------------------------------------------------------------
- ; Mucho danx to Psi for showing me how this shit works. :) -FT
- ;-----------------------------------------------------------------------------
- music_channels equ 8
- music_speed equ 7
- music_instruments LABEL BYTE
- dw OFFSET ains1
- dw OFFSET ains2
- dw OFFSET ains3
- dw OFFSET ains4
- dw OFFSET ains5
- dw OFFSET ains6
- dw OFFSET ains7
- dw OFFSET ains8
- ains1 LABEL BYTE
- db 64,69,128,1,130,244,240,26,3,1,4
- ains2 LABEL BYTE
- db 65,194,6,0,35,242,240,240,1,0,4
- ains3 LABEL BYTE
- db 0,0,192,0,248,210,240,31,0,0,10
- ains4 LABEL BYTE
- db 15,0,0,7,243,229,240,240,0,3,10
- ains5 LABEL BYTE
- db 84,208,0,2,243,245,255,127,0,0,14
- ains6 LABEL BYTE
- db 64,69,128,1,130,244,240,26,3,1,4
- ains7 LABEL BYTE
- db 65,194,6,0,35,242,240,240,1,0,4
- ains8 LABEL BYTE
- db 65,194,6,4,35,242,240,240,1,0,4
- music_patterns LABEL BYTE
- ach0 dw OFFSET ach0d,OFFSET ach0d
- ach1 dw OFFSET ach1d,OFFSET ach1d
- ach2 dw OFFSET ach2d,OFFSET ach2d
- ach3 dw OFFSET ach3d,OFFSET ach3d
- ach4 dw OFFSET ach4d,OFFSET ach4d
- ach5 dw OFFSET ach5d,OFFSET ach5d
- ach6 dw OFFSET ach6d,OFFSET ach6d
- ach7 dw OFFSET ach7d,OFFSET ach7d
- ach0d LABEL BYTE
- db 084h,022h,022h,022h,082h,022h,027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah
- db 02Ah,02Ah,082h,02Ah,025h,084h,02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h
- db 022h,022h,022h,082h,022h,027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah
- db 02Ah,082h,02Ah,025h,084h,02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h,022h
- db 022h,022h,082h,022h,027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah,02Ah
- db 082h,02Ah,025h,084h,02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h,022h,022h
- db 022h,082h,022h,027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah,02Ah,082h
- db 02Ah,025h,084h,02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h,022h,022h,022h
- db 082h,022h,027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah,02Ah,082h,02Ah
- db 025h,084h,02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h,022h,022h,022h,082h
- db 022h,027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah,02Ah,082h,02Ah,025h
- db 084h,02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h,022h,022h,022h,082h,022h
- db 027h,084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah,02Ah,082h,02Ah,025h,084h
- db 02Ah,02Ah,081h,02Ah,030h,082h,032h,029h,025h,084h,022h,022h,022h,082h,022h,027h
- db 084h,030h,030h,030h,082h,030h,032h,084h,02Ah,02Ah,02Ah,082h,02Ah,025h,084h,02Ah
- db 02Ah,081h,02Ah,030h,082h,032h,029h,025h,0
- ach1d LABEL BYTE
- db 090h,012h,020h,01Ah,088h,01Ah,015h,090h,012h,020h,01Ah,088h,01Ah,015h,090h,012h
- db 020h,01Ah,088h,01Ah,015h,090h,012h,020h,01Ah,088h,01Ah,015h,090h,012h,020h,01Ah
- db 088h,01Ah,015h,090h,012h,020h,01Ah,088h,01Ah,015h,090h,012h,020h,01Ah,088h,01Ah
- db 015h,090h,012h,020h,01Ah,088h,01Ah,015h,0
- ach2d LABEL BYTE
- db 084h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h,020h
- db 020h,0
- ach3d LABEL BYTE
- db 082h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h,064h
- db 064h,0
- ach4d LABEL BYTE
- db 084h,00Ch,088h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h
- db 071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h
- db 071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h
- db 071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h,071h
- db 071h,071h,084h,071h,0
- ach5d LABEL BYTE
- db 0C0h,00Ch,082h,052h,055h,054h,055h,052h,055h,054h,055h,050h,055h,054h,055h,050h
- db 055h,054h,055h,04Ah,055h,054h,055h,059h,055h,054h,055h,04Ah,055h,054h,055h,059h
- db 055h,054h,055h,052h,055h,054h,055h,052h,055h,054h,055h,050h,055h,054h,055h,050h
- db 055h,054h,055h,04Ah,055h,054h,055h,059h,055h,054h,055h,04Ah,055h,054h,055h,059h
- db 055h,054h,055h,052h,055h,054h,055h,052h,055h,054h,055h,050h,055h,054h,055h,050h
- db 055h,054h,055h,04Ah,055h,054h,055h,059h,055h,054h,055h,04Ah,055h,054h,055h,059h
- db 055h,054h,055h,052h,055h,054h,055h,052h,055h,054h,055h,050h,055h,054h,055h,050h
- db 055h,054h,055h,04Ah,055h,054h,055h,059h,055h,054h,055h,04Ah,055h,054h,055h,059h
- db 055h,054h,055h,052h,055h,054h,055h,052h,055h,054h,055h,050h,055h,054h,055h,050h
- db 055h,054h,055h,04Ah,055h,054h,055h,059h,055h,054h,055h,04Ah,055h,054h,055h,059h
- db 055h,054h,055h,052h,055h,054h,055h,052h,055h,054h,055h,050h,055h,054h,055h,050h
- db 055h,054h,055h,04Ah,055h,054h,055h,059h,055h,054h,055h,04Ah,055h,054h,055h,059h
- db 055h,054h,0C2h,055h,0
- ach6d LABEL BYTE
- db 0FEh,00Ch,082h,00Ch,081h,045h,044h,08Eh,045h,081h,044h,045h,086h,047h,081h,045h
- db 047h,086h,049h,081h,050h,049h,082h,047h,083h,049h,047h,082h,045h,083h,044h,042h
- db 040h,03Ah,082h,039h,037h,035h,032h,050h,08Ah,052h,082h,054h,055h,083h,054h,052h
- db 084h,050h,082h,049h,050h,052h,086h,04Ah,049h,084h,047h,088h,045h,082h,049h,050h
- db 052h,049h,059h,057h,055h,052h,059h,055h,057h,052h,059h,057h,055h,052h,059h,060h
- db 055h,052h,059h,057h,055h,052h,05Ah,057h,055h,052h,059h,055h,057h,054h,055h,052h
- db 054h,050h,054h,055h,052h,050h,054h,055h,057h,054h,054h,055h,052h,050h,055h,054h
- db 050h,052h,055h,057h,059h,057h,05Ah,059h,055h,052h,055h,057h,054h,052h,055h,054h
- db 052h,049h,060h,057h,059h,062h,060h,062h,059h,055h,060h,057h,059h,062h,060h,062h
- db 059h,055h,060h,057h,059h,062h,064h,060h,062h,059h,060h,057h,055h,054h,057h,055h
- db 054h,050h,084h,052h,08Ch,059h,084h,050h,08Ch,057h,084h,04Ah,09Ch,055h,0
- ach7d LABEL BYTE
- db 0FEh,00Ch,085h,00Ch,081h,045h,044h,08Eh,045h,081h,044h,045h,086h,047h,081h,045h
- db 047h,086h,049h,081h,050h,049h,082h,047h,083h,049h,047h,082h,045h,083h,044h,042h
- db 040h,03Ah,082h,039h,037h,084h,035h,082h,050h,08Ah,052h,082h,054h,055h,083h,054h
- db 052h,084h,050h,082h,049h,050h,052h,086h,04Ah,049h,084h,047h,088h,045h,082h,049h
- db 050h,084h,052h,082h,059h,057h,055h,052h,059h,055h,057h,052h,059h,057h,055h,052h
- db 059h,060h,055h,052h,059h,057h,055h,052h,05Ah,057h,055h,052h,059h,055h,057h,054h
- db 055h,052h,084h,054h,082h,054h,055h,052h,050h,054h,055h,057h,054h,054h,055h,052h
- db 050h,055h,054h,050h,052h,055h,057h,059h,057h,05Ah,059h,055h,052h,055h,057h,054h
- db 052h,055h,054h,084h,052h,082h,060h,057h,059h,062h,060h,062h,059h,055h,060h,057h
- db 059h,062h,060h,062h,059h,055h,060h,057h,059h,062h,064h,060h,062h,059h,060h,057h
- db 055h,054h,057h,055h,083h,054h,090h,055h,054h,09Eh,052h,0
-