EzHotKey 板


LINE

之前在WOW和D3使用視窗模式時覺得畫面太暗 所以寫了個AHK來做畫面亮度的調整 功能: 切換到指定視窗時自動改變螢幕亮度 操作: 在要調整的視窗內按下Scroll Lock鍵以指定該視窗 之後切換到該視窗時便會自動改變亮度,離開該視窗時還原亮度 右下icon裡的options可設定亮度值 執行檔: http://goo.gl/zmiZLm 調整亮度的寫法參考了下列網址: brightness.ahk http://goo.gl/EgTi1s C#: How to change the color/gamma and brightness http://goo.gl/7M6xX2 原始碼: #SingleInstance,force OnExit, Exit1 SetFormat, FloatFast, 2.2 ;建立右下圖示選單 menu,tray, icon, %A_ScriptFullPath%, 1 menu,tray, nostandard menu,tray, add, Enable, ToggleFunction menu,tray, add menu,tray, add, Options, ShowPanel menu,tray, add, Quit, exit1 menu,tray, default, Enable menu,tray, check , Enable ;載入設定值 IniRead, myWindow, SetWindowGamma.ini ,SetWindowGamma , TargetWindow,%A_Space% IniRead, defGamma, SetWindowGamma.ini ,SetWindowGamma , DefaultGamma, 1.0 IniRead, setGamma, SetWindowGamma.ini ,SetWindowGamma , SetGamma, 1.2 IniRead, minGamma, SetWindowGamma.ini ,SetWindowGamma , MinGamma, 0.5 IniRead, maxGamma, SetWindowGamma.ini ,SetWindowGamma , MaxGamma, 2.2 ;檢查及初始化設定值 tmp1:=defGamma+setGamma+minGamma+maxGamma if tmp1 is not number { defGamma:=1.0 setGamma:=1.2 minGamma:=0.5 maxGamma:=2.2 gosub SaveSetting } else { if(maxGamma < minGamma) { tmp1:=maxGamma maxGamma:=minGamma minGamma:=tmp1 } if(minGamma<0) minGamma:=0 if(maxGamma<0) maxGamma:=3 if(setGamma < minGamma) setGamma:=minGamma if(setGamma > maxGamma) setGamma:=maxGamma } barMin:=minGamma*100 barMax:=maxGamma*100 barSet:=setGamma*100 ;繪製設定介面 Gui Hidden:New Gui Hidden:Cancel Gui MyPanel:New Gui MyPanel: +OwnerHidden Gui MyPanel: -Caption +Border +AlwaysOnTop Gui MyPanel: Add,Text,x11 y26 w49 h23,Program: Gui MyPanel: Add,Edit,ReadOnly x60 y24 w130 h19,%myWindow% Gui MyPanel: Add,Text,-wrap x17 y48 w180 h28,(use ScrollLock to select a program) Gui MyPanel: Add,Groupbox,x15 y86 w172 h104,Gamma: Gui MyPanel: Add,Text,x58 y113 w36 h18,Set to: Gui MyPanel: Add,Edit,ReadOnly vMyGamma x91 y111 w35 h21,%setGamma% Gui MyPanel: Add,Text,x160 y170 w25 h17,%maxGamma% Gui MyPanel: Add,Text,x24 y169 w25 h17,%minGamma% Gui MyPanel: Add,Slider,x20 y134 w163 h33 range%barMin%-%barMax% vSlideNum AltSubmit gSlide1,%barSet% Gui MyPanel: Show,Hide xCenter yCenter w200 h198,SetWindowGammaGUI Global switch1=1 ;切換亮度 Loop { WinGet,theProcess,processname,A WinWaitNotActive, ahk_exe theProcess, ,60 if(switch1==0) continue if(ErrorLevel==0) { IfWinActive, ahk_exe %myWindow% SetScreenBrightness(setGamma) else SetScreenBrightness(defGamma) } } ShowPanel: IfWinExist, SetWindowGammaGUI Gui MyPanel: Cancel else { GuiControl, MyPanel: ,Edit1, %myWindow% Gui MyPanel: show } WinWaitNotActive, SetWindowGammaGUI SetScreenBrightness(defGamma) Gui MyPanel: Cancel return Slide1: setGamma:=SlideNum/100 Guicontrol, MyPanel: ,Edit2, %setGamma% SetScreenBrightness(setGamma) return ScrollLock:: if(switch1==0) { SendInput {ScrollLock} return } WinGet,theProcess,processname,A if( myWindow != theProcess ) { myWindow = %theProcess% SetScreenBrightness(setGamma) } else SendInput {ScrollLock} return ToggleFunction: Gui MyPanel: Cancel if(switch1) { SetScreenBrightness(defGamma) menu,tray, Uncheck, Enable switch1:=0 menu,tray, icon, %A_ScriptFullPath%, 3 } else { menu,tray, Check, Enable switch1:=1 menu,tray, icon, %A_ScriptFullPath%, 1 } return SaveSetting: IniWrite, %myWindow% , SetWindowGamma.ini ,SetWindowGamma , TargetWindow IniWrite, %defGamma% , SetWindowGamma.ini ,SetWindowGamma , DefaultGamma IniWrite, %setGamma% , SetWindowGamma.ini ,SetWindowGamma , SetGamma IniWrite, %minGamma% , SetWindowGamma.ini ,SetWindowGamma , MinGamma IniWrite, %maxGamma% , SetWindowGamma.ini ,SetWindowGamma , MaxGamma return Exit1: SetScreenBrightness(defGamma) gosub SaveSetting ExitApp SetScreenBrightness(brightness) { if( (hDesktopDC := DllCall("GetDC", uint, 0, uint)) = 0 ) return False arraysize := 256*2 VarSetCapacity(ramp, 3*arraysize, 0) Loop, 256 { ;--- set brightness --- ;arrayvalue := (A_Index-1)*(brightness+128) ;--- set gamma --- arrayvalue := ( ( A_index / 256 )**( 1 / brightness ) * 65535) + 0.5 if(arrayvalue>65535) arrayvalue := 65535 NumPut(arrayvalue, ramp, (A_Index-1)*2, "UShort") ;r NumPut(arrayvalue, ramp, arraysize+(A_Index-1)*2, "UShort") ;g NumPut(arrayvalue, ramp, arraysize*2+(A_Index-1)*2, "UShort") ;b } retvalue := DllCall("SetDeviceGammaRamp", uint, hDesktopDC, uint, &ramp) DllCall("ReleaseDC", uint, 0, uint, hDesktopDC) return retvalue } --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.44.115.227
※ 文章網址: http://webptt.com/m.aspx?n=bbs/EzHotKey/M.1399712867.A.829.html
1F:推 SilentWorld:感謝提供! 05/12 21:21
※ 編輯: onelife (114.44.117.91), 04/28/2015 21:45:29







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:Boy-Girl站內搜尋

TOP