Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
5022 Serge 1
format MS COFF
2
 
3
include "snd.inc"
4
include "proc32.inc"
5
 
6
section '.text' align 16 code readable executable
7
 
8
extrn hSound
9
 
10
public _SetBufferPos@8
11
 
12
align 4
13
_SetBufferPos@8:        ;str:dword, offs:dword
14
 
15
           push ebx
16
           push ecx
17
 
18
           xor eax, eax
19
           lea ebx, [esp+12]   ;[stream]
20
 
21
           push eax            ;.out_size
22
           push eax            ;.output
23
           push 8              ;.inp_size
24
           push ebx            ;.input
25
           push SND_SETPOS     ;.code
26
           push dword [hSound] ;.handle
27
 
28
           mov eax, 68
29
           mov ebx, 17
30
           mov ecx, esp
31
           int 0x40
32
           add esp, 24
33
           pop ecx
34
           pop ebx
35
           ret 8
36