Guest User

Adjust volume at the right margin of the screen

a guest
Aug 17th, 2016
203
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ; Adjust volume at the right margin of the screen.
  2. WheelUp::
  3.     CoordMode, Mouse, Screen
  4.     SysGet, widthX, 16
  5.     MouseGetPos, mouseX
  6.     rightMargin := widthX-10
  7.     if mouseX > %rightMargin%
  8.         SoundSet +5
  9.     else
  10.         Send {WheelUp}
  11.     return
  12.  
  13. WheelDown::
  14.     CoordMode, Mouse, Screen
  15.     SysGet, widthX, 16
  16.     MouseGetPos, mouseX
  17.     rightMargin := widthX-10
  18.     if mouseX > %rightMargin%
  19.         SoundSet -5
  20.     else
  21.         Send {WheelDown}
  22.     return
Advertisement
Add Comment
Please, Sign In to add comment