Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | RSS feed

  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 _SetVolume@12
  9.  
  10. extrn hSound
  11.  
  12. align 4
  13. _SetVolume@12:       ;str:dword, lvol:dword,rvol: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 12             ;.inp_size
  24.            push ebx            ;.input
  25.            push SND_SETVOLUME  ;.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 12
  36.  
  37.