Subversion Repositories Kolibri OS

Rev

Rev 374 | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 374 Rev 376
1 
format MS COFF
 1 
format MS COFF
2 
 
 2 
 
3 
include "snd.inc"
 3 
include "snd.inc"
4 
include "proc32.inc"
 4 
include "proc32.inc"
5 
 
 5 
 
6 
section '.text' align 16 code readable executable
 6 
section '.text' align 16 code readable executable
7 
 
 7 
 
8 
public _SetMasterVol@4
 8 
public _SetMasterVol@4
9 
 
 9 
 
10 
extrn hrdwSound
10 
extrn hrdwSound
11 
 
 11 
 
12 
align 4
 12 
align 4
13 
proc _SetMasterVol@4 stdcall,vol:dword
 13 
_SetMasterVol@4:         ;vol:dword
14 
           locals
 - 
 
15 
             handle     dd ?
 - 
 
16 
             io_code    dd ?
 - 
 
17 
             input      dd ?
 - 
 
18 
             inp_size   dd ?
 - 
 
19 
             output     dd ?
 - 
 
20 
             out_size   dd ?
 - 
 
21 
           endl
 - 
 
22
14
23 
           push ebx
 15 
           push ebx
24 
           push ecx
 16 
           push ecx
25 
           mov eax, [hrdwSound]
 - 
 
26 
           lea ebx, [vol]
 - 
 
27 
           xor ecx, ecx
 - 
 
28 
 
 17 
 
29 
           mov [handle], eax
 18 
           xor eax, eax
- 
 
 19 
           lea ebx, [esp+12]   ;[stream]
- 
 
 20 
 
30 
           mov [io_code], DEV_SET_MASTERVOL
 21 
           push eax            ;.out_size
31 
           mov [input], ebx
 22 
           push eax            ;.output
32 
           mov [inp_size], 4
 23 
           push 4              ;.inp_size
33 
           mov [output], ecx
 24 
           push ebx            ;.input
- 
 
 25 
           push DEV_SET_MASTERVOL ;.code
34 
           mov [out_size], ecx
 26 
           push dword [hrdwSound] ;.handle
35 
 
 27 
 
36 
           mov eax, 68
 28 
           mov eax, 68
37 
           mov ebx, 17
 29 
           mov ebx, 17
38 
           lea ecx, [handle]
 30 
           mov ecx, esp
39 
           int 0x40
 31 
           int 0x40
- 
 
 32 
           add esp, 24
40 
           pop ecx
33 
           pop ecx
41 
           pop ebx
 34 
           pop ebx
42 
           ret
 35 
           ret 4
43 
endp
 -