注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

Undefined

For imagination,for science,for justice.

 
 
 

日志

 
 

[AHK]鼠标滚轮音量调节  

2010-04-13 19:25:29|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
使用:按住鼠标右键,滑动滚轮调节音量。

  1. ;2010.04.12
  2. ;NiGH优化.

  3. #MaxThreads 6
  4. #InstallKeybdHook
  5. color1 = 6BD536
  6. color2 = FFFFFF
  7. color3 = 94632D
  8. color4 = FFCD00
  9. color5 = AA55AA
  10. color6 = FF5555
  11. random,n,1,6
  12. barcolor := color%n% ;取随机色的写法,我会看下色彩的理论,再写出随机生成颜色代码,因为我还不知道计算明度跟饱和度的公式.
  13. current := 80 ;初始音量值
  14. gui,1:-caption +alwaysontop +owner ;去标题栏
  15. gui,1:margin,0,0 ;去边距
  16. gui,1:color,3F3F3F ;随便设置一个背景色,以备后面设置透明用
  17. gui,1:font,s16 cwhite,Arial
  18. gui,1:add,text,x7 y0,-
  19. gui,1:add,text,x190 y1,+
  20. gui,1:add,progress,x21 y2 w165 h22 c%barcolor% background3F3F3F vMyProgress, 80
  21. gui,1:show,w208 h26,mainboard
  22. ;~Gui,1:+LastFound ;设置为LastFound
  23. ;~GUI_ID:=WinExist() ;获得窗口的句柄
  24. winset,TransColor,black 200,mainboard
  25. gui,1:Hide
  26. send, {volume_up 50}
  27. send, {volume_down 10} ;我的win7用volume_up&down,效果出来都是双倍的,up10就是加20,下同
  28. SetTimer, Check, 50
  29. SetTimer, MenuCancel, 30
  30. Return
  31. Check:
  32. GetKeyState,T,Rbutton
  33. If (T = "U")
  34. {
  35. ;~DllCall("AnimateWindow","UInt",GUI_ID,"Int",500,"UInt",0x90000)  ;以淡出的方式退出
  36. Gui,1:hide
  37. SetTimer, MenuCancel, Off
  38. }
  39. If (current > 100)
  40. current := 100
  41. If (current < 0)
  42. current := 0
  43. Return
  44. MenuCancel:
  45. IfWinExist,ahk_class #32768
  46. WinClose,ahk_class #32768 ;在右键菜单出现时关闭它(因为它会遮盖住音量条).
  47. Return
  48. #IfWinExist, mainboard
  49. wheeldown::
  50. If (T = "D")
  51. {
  52. SetTimer, MenuCancel, On
  53. Loop,5
  54. {
  55.   current:=current-2
  56.   GuiControl,,MyProgress,%current%
  57.   Sleep 50
  58. }
  59. Send {Volume_Down 5}
  60. }
  61. Return
  62. WheelUp::
  63. If (T = "D")
  64. {
  65.   SetTimer, MenuCancel, On
  66.   Loop,5
  67.   {
  68.    current:=current+2
  69.    GuiControl,,MyProgress,%current%
  70.    Sleep 50
  71.   }
  72.   Send {Volume_Up 5}
  73. }
  74. Return

  75.   #IfWinnotExist, mainboard
  76.   ~wheeldown::
  77.   If (T = "D")
  78.   {
  79.    SetTimer, MenuCancel, On
  80.    gui,1:show
  81.    Loop,5
  82.    {
  83.     current:=current-2
  84.     GuiControl,,MyProgress,%current%
  85.     Sleep 50
  86.    }
  87.    Send {Volume_Down 5}
  88.   }
  89.   Return
  90.    ~WheelUp::
  91.    If (T = "D")
  92.    {
  93.     SetTimer, MenuCancel, On
  94.     gui,1:show
  95.     Loop,5
  96.     {
  97.      current:=current+2
  98.      GuiControl,,MyProgress,%current%
  99.      Sleep 50
  100.     }
  101.     Send {Volume_Up 5}
  102.    }
  103.    Return
  评论这张
 
阅读(987)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017