Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 695 → Rev 696

/programs/develop/ktcc/trunk/libc/kolibrisys/sound.asm
1,7 → 1,7
format ELF
include "public_stdcall.inc"
section '.text' executable
public_stdcall _ksy_sound_load_block,4
public_stdcall _ksys_sound_load_block,4
;arg1 - blockptr
mov edx,ebx
mov eax,55
11,7 → 11,7
mov ebx,edx
ret 4
public_stdcall _ksy_sound_play_block,0
public_stdcall _ksys_sound_play_block,0
mov edx,ebx
mov eax,55
xor ebx,ebx
20,7 → 20,7
mov ebx,edx
ret
public_stdcall _ksy_sound_set_channels,4
public_stdcall _ksys_sound_set_channels,4
;arg1 - channels
push ebx
mov eax,55
31,7 → 31,7
pop ebx
ret 4
public_stdcall _ksy_sound_set_data_size,4
public_stdcall _ksys_sound_set_data_size,4
;arg1 - data size
push ebx
mov eax,55
43,7 → 43,7
pop ebx
ret 4
public_stdcall _ksy_sound_set_frequency,4
public_stdcall _ksys_sound_set_frequency,4
;arg1 - frequency
push ebx
mov eax,55
54,12 → 54,12
pop ebx
ret 4
public_stdcall _ksy_sound_speaker_play,4
public_stdcall _ksys_sound_speaker_play,4
;arg1 - data
mov edx,ebx
mov eax,55
mov ebx,55
mov ecx,[esp+4]
mov esi,[esp+4]
int 0x40
mov ebx,edx
ret 4
ret 4