Subversion Repositories Kolibri OS

Compare Revisions

Ignore whitespace Rev 1793 → Rev 1794

/programs/media/startmus/trunk/STARTMUS.ASM
0,0 → 1,73
use32
db 'MENUET01'
dd 1
dd start
dd i_end
dd 0x400
dd 0x400
dd 0,0
 
include '..\..\macros.inc'
 
start:
mov eax, 55
mov ebx, eax
mov esi, melody2
int 0x40
mov eax, 5
mov ebx, 1000
int 0x40
mov eax, -1
int 0x40
 
melody1:
db 0xE4, 0x35, 0x99, 0x33, 0x99, 0x31, 0x99, 0x33
db 0xE4, 0x35, 0x99, 0x35, 0x99, 0x36, 0x99, 0x38, 0x99, 0x3A
db 0xE4, 0x36, 0xE4, 0x36
db 0xB2, 0xFF
db 0xE4, 0x33, 0x99, 0x31, 0x99, 0x2C, 0x99, 0x31
db 0xE4, 0x33, 0xB2, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xE4, 0x35, 0xE4, 0x35
db 0xB2, 0xFF
db 0x99, 0x35, 0x99, 0x36
db 0xE4, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xB2, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xB2, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xE4, 0x39, 0xE4, 0x39
db 0xB2, 0xFF
db 0x99, 0x35, 0x99, 0x36
db 0xE4, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xB2, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xB2, 0x33, 0x99, 0x35, 0x99, 0x36
db 0xE4, 0x35, 0xE4, 0x35
db 0
 
melody2:
db 0x90, 0x31, 0x90, 0x33, 0x90, 0x35, 0x90, 0x36
db 0xA0, 0xFF
db 0xA0, 0x06
db 0x90, 0xFF
db 0xA0, 0x06
db 0x90, 0xFF
db 0x90, 0x33, 0x90, 0x35, 0x90, 0x37, 0x90, 0x38
db 0xA0, 0xFF
db 0xA0, 0x18
db 0x90, 0xFF
db 0xA0, 0x18
db 0x90, 0xFF
db 0x90, 0x33, 0x90, 0x35, 0x90, 0x37, 0x90, 0x38
db 0xA0, 0xFF
db 0x90, 0x33, 0x90, 0x35, 0x90, 0x37, 0x90, 0x38
db 0xA0, 0xFF
db 0x90, 0x31, 0x90, 0x33, 0x90, 0x35, 0x90, 0x36
db 0xA0, 0xFF
db 0xA0, 0x16
db 0x90, 0xFF
db 0xA0, 0x16
db 0
 
melody3:
db 0x99, 0x31, 0xB2, 0x36, 0x99, 0x3A, 0xB2, 0x36
db 0x99, 0x33, 0xB2, 0x28, 0xBC, 0x38
db 0
i_end: