Subversion Repositories Kolibri OS

Rev

Rev 374 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
374 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 
 
376 serge 10 
public _GetBufferPos@8
374 serge 11 
 
12 
align 4
376 serge 13 
_GetBufferPos@8:     ;str:dword, p_pos:dword
374 serge 14 
 
15 
           push ebx
16 
           push ecx
376 serge 17 
 
18 
           lea eax, [esp+16]
19 
           lea ebx, [esp+12]   ;[stream]
374 serge 20 
 
376 serge 21 
           push 4              ;.out_size
22 
           push eax            ;.output
23 
           push 4              ;.inp_size
24 
           push ebx            ;.input
25 
           push SND_GETPOS     ;.code
26 
           push dword [hSound] ;.handle
374 serge 27 
 
28 
           mov eax, 68
29 
           mov ebx, 17
376 serge 30 
           mov ecx, esp
374 serge 31 
           int 0x40
376 serge 32 
           add esp, 24
374 serge 33 
           pop ecx
34 
           pop ebx
376 serge 35 
           ret 8
36