Rev 374 | Go to most recent revision | 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 | public _SetPan@8 |
||
9 | |||
10 | extrn hSound |
||
11 | |||
12 | align 4 |
||
376 | serge | 13 | _SetPan@8: ;str:dword, pan:dword |
374 | serge | 14 | push ebx |
15 | push ecx |
||
376 | serge | 16 | |
17 | xor eax, eax |
||
18 | lea ebx, [esp+12] ;[stream] |
||
374 | serge | 19 | |
376 | serge | 20 | push eax ;.out_size |
21 | push eax ;.output |
||
22 | push 12 ;.inp_size |
||
23 | push ebx ;.input |
||
24 | push SND_SETPAN ;.code |
||
25 | push dword [hSound] ;.handle |
||
374 | serge | 26 | |
27 | mov eax, 68 |
||
28 | mov ebx, 17 |
||
376 | serge | 29 | mov ecx, esp |
374 | serge | 30 | int 0x40 |
376 | serge | 31 | add esp, 24 |
374 | serge | 32 | pop ecx |
33 | pop ebx |
||
376 | serge | 34 | ret 8 |