易语言模拟键盘按键实现设置系统扬声器音频音量的加减/最大/静音/指定 (无返回值)

CNWTEPRG

1. .版本 2
   
2. .支持库 eAPI
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. 
   
9. _临时子程序 ()
   
10. 返回 (0)
    
11. 
    
12. .子程序 _临时子程序
    
13. 
    
14. 音量_最大 ()
    
15. 
    
16. .子程序 音响_减, , 公开, 减2%
    
17. 
    
18. 模拟按键 (174, , )
    
19. 
    
20. .子程序 音量_加, , 公开, 加2%
    
21. 
    
22. 模拟按键 (175, , )
    
23. 
    
24. .子程序 音量_最大, , 公开
    
25. 
    
26. .计次循环首 (50, )
    
27.     音量_加 ()
    
28. .计次循环尾 ()
    
29. 
    
30. 
    
31. .子程序 音量_静音, , 公开
    
32. 
    
33. .计次循环首 (50, )
    
34.     音响_减 ()
    
35. .计次循环尾 ()
    
36. 
    
37. 
    
38. 
    
39. .子程序 音量_指定, , 公开
    
40. .参数 音量, 字节型, , 范围:0~100 必须是偶数
    
41. 
    
42. .如果真 (音量 ＞ 100)
    
43.     音量 ＝ 100
    
44. .如果真结束
    
45. 音量_静音 ()
    
46. .计次循环首 (音量 ÷ 2, )
    
47.     音量_加 ()
    
48. .计次循环尾 ()
    

复制代码