Hallo, bin recht neu hier 
aehm ich bin mir zu 100% sicher, dass ich irgendwo las, dass man die monitor gamma via eines bestimmten autoIt befehls einstellen kann.
Hoffentlich kann mir jemand diesen befehl geben, denn ich brauche ihn sehr dringend. wenn dies nicht möglich ist, hab ich zwar schon eine anderen weg gefunden, aber da brauch ich dann wohl auch wieder hilfe =D
lg arx
Ist mir bisher noch nicht begegnet ( was nix heißen muß 
), aber ich weiß auch nicht ob das generell möglich ist, da die Einstellung ja schon von PC zu PC nicht im selben Menü ist. Viele Grafiktreiber versorgen dich dort mit zusätzlichen Tabs, auf denen herstellerspezifische Einstellungen vorgenommen werden können.
vielen dank für deine schnelle antwort. ich hab aber ein problem, welches auch durch am grafiktreiber rumspielen nicht änderbar ist ( glaub ich, hab auch keine lust mich damit auseinander zu setzen.)
hab schon einen anderen lösungsweg im kopf, aber dafür brauch ich auch wieder hilfe.
Send("^+1")
[/autoit]
dies würde doch strg alt und dann 1 drücken, aber alles nach ein ander. ich muss es aber so haben, als würde ich den taskmanager öffnen wollen also erst strg drücken + halten, dann alt drücken + halten und dann 1.
Hallo
Jup, gab es mal im Englischen Forum, habs mal auf die neue Version angepasst:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <UpDownConstants.au3>
#include <WindowsConstants.au3>
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=D:\My Documents\icons\default.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=CALGamma loader Use /h to load gamma settings without gui
#AutoIt3Wrapper_Res_Description=Sets a software gamma correction
#AutoIt3Wrapper_Res_Fileversion=1.0.0.3
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=p
#AutoIt3Wrapper_Res_LegalCopyright=Chris Lambert
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Opt ("GuiOnEventMode",1)
[/autoit] [autoit][/autoit] [autoit]$redStartValue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Red")
If $redStartValue > 386 or $redStartValue < 0 or $redStartValue = "" then $redStartValue = 128
$greenStartValue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Green")
If $greenStartValue > 386 or $greenStartValue < 0 or $greenStartValue = "" then $greenStartValue = 128
$blueStartValue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Blue")
If $blueStartValue > 386 or $blueStartValue < 0 or $blueStartValue = "" then $blueStartValue = 128
_SetGamma($redStartValue,$greenStartValue,$blueStartValue)
[/autoit] [autoit][/autoit] [autoit]If $CMDLINE[0] > 0 and $CMDLINE[1] = "/h" then Exit
[/autoit] [autoit][/autoit] [autoit]Global $lastRed = $redStartValue
Global $lastGreen = $greenStartValue
Global $lastBlue = $blueStartValue
;Global Const $WM_HSCROLL = 0x0114 ;Already declared in Autoit 3.2.10.0
;Global Const $WM_VSCROLL = 0x0115 ;Already declared in Autoit 3.2.10.0
Global Const $slideMin = 0
Global Const $slideMax = 386
FileInstall("GammaImage.jpg",@tempdir & "\GammaImage.jpg",1)
$Main = GUICreate("Gamma Adjust", 1024, 530,-1,-1,$WS_EX_DLGMODALFRAME)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents")
GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents")
$Pic1 = GUICtrlCreatePic(@tempdir & "\GammaImage.jpg", 8, 8, 689, 481, BitOR($SS_NOTIFY,$WS_GROUP ),$WS_EX_DLGMODALFRAME )
GuiCtrlCreateLabel("Red",712,10,41)
$RedSlider = GUICtrlCreateSlider(712, 28, 41, 461,BitOr($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1,$slideMax,$slideMin)
GUICtrlSetData(-1,$redStartValue)
GuiCtrlCreateLabel("Green",786,10,41)
$GreenSlider = GUICtrlCreateSlider(786, 28, 41, 461,BitOr($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1,$slideMax,$slideMin)
GUICtrlSetData(-1,$greenStartValue)
GuiCtrlCreateLabel("Blue",857,10,41)
$BlueSlider = GUICtrlCreateSlider(857, 28, 41, 461,BitOr($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1,$slideMax,$slideMin)
GUICtrlSetData(-1,$blueStartValue)
$lockTick = GuiCtrlCreateCheckBox("Lock Sliders",910,10)
[/autoit] [autoit][/autoit] [autoit]$Normal = GuiCtrlCreateButton("Normal",910,50,90,40)
GUICtrlSetOnEvent(-1,"_Normalize")
$Reset = GuiCtrlCreateButton("Reset",910,100,90,40)
GUICtrlSetOnEvent(-1,"_Reset")
$Reset = GuiCtrlCreateButton("Save",910,150,90,40)
GUICtrlSetOnEvent(-1,"_Save")
$Reset = GuiCtrlCreateButton("Quit",910,200,90,40)
GUICtrlSetOnEvent(-1,"_Quit")
GUICtrlCreateLabel("R",910,355,20)
GuiCtrlSetFont(-1,14)
$RedInput = GUICtrlCreateInput($redStartValue,930,350,70,30,$ES_NUMBER + $ES_READONLY)
GUICtrlSetLimit(-1,3)
GuiCtrlSetFont(-1,14)
$Redupdown = GUICtrlCreateUpdown(-1,$UDS_NOTHOUSANDS+$UDS_ARROWKEYS)
GUICtrlSetLimit ( -1, 386 ,0 )
GUICtrlCreateLabel("G",910,405,20)
GuiCtrlSetFont(-1,14)
$GreenInput = GUICtrlCreateInput($GreenStartValue,930,400,70,30,$ES_NUMBER + $ES_READONLY)
GUICtrlSetLimit(-1,3)
GuiCtrlSetFont(-1,14)
$Greenupdown = GUICtrlCreateUpdown(-1,$UDS_NOTHOUSANDS+$UDS_ARROWKEYS)
GUICtrlSetLimit ( -1, 386 ,0 )
GUICtrlCreateLabel("B",910,455,20)
GuiCtrlSetFont(-1,14)
$BlueInput = GUICtrlCreateInput($BlueStartValue,930,450,70,30,$ES_NUMBER + $ES_READONLY)
GUICtrlSetLimit(-1,3)
GuiCtrlSetFont(-1,14)
$Blueupdown = GUICtrlCreateUpdown(-1,$UDS_NOTHOUSANDS+$UDS_ARROWKEYS)
GUICtrlSetLimit ( -1, 386 ,0 )
GUISetState(@SW_SHOW)
GUIRegisterMsg($WM_VSCROLL, "WM_HVSCROLL")
While 1
sleep (100)
WEnd
Func _Save()
$newRed = GuiCtrlRead($RedSlider)
$newGreen = GuiCtrlRead($GreenSlider)
$newBlue = GuiCtrlRead($BlueSlider)
RegWrite("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Red","REG_SZ", $newRed)
RegWrite("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Green","REG_SZ", $newGreen)
RegWrite("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Blue","REG_SZ", $newBlue)
Msgbox(0 + 262144,"Saved","Gamma Settings have been saved")
EndFunc
Func _Quit()
$newRed = GuiCtrlRead($RedSlider)
$newGreen = GuiCtrlRead($GreenSlider)
$newBlue = GuiCtrlRead($BlueSlider)
$savedRed = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Red")
$savedGreen = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Green")
$savedBlue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Blue")
If $savedRed = "" then $savedred = 128
If $savedGreen = "" then $savedGreen = 128
If $savedBlue = "" then $savedBlue = 128
If $newRed <> $savedRed then
;prompt to save
$ans = MsgBox(4 + 262144,"Settings Change","Settings have not been saved do you wish to save changes before exiting")
If $ans = 6 then
_Save()
Else
_SetGamma($savedRed,$savedGreen,$savedBlue)
EndIf
ElseIf $newGreen <> $savedGreen then
$ans = MsgBox(4 + 262144,"Settings Change","Settings have not been saved do you wish to save changes before exiting")
If $ans = 6 then
_Save()
Else
_SetGamma($savedRed,$savedGreen,$savedBlue)
EndIf
ElseIf $newBlue <> $savedBlue then
$ans = MsgBox(4 + 262144,"Settings Change","Settings have not been saved do you wish to save changes before exiting")
If $ans = 6 then
_Save()
Else
_SetGamma($savedRed,$savedGreen,$savedBlue)
EndIf
EndIf
FileDelete(@tempdir & "\GammaImage.jpg")
Exit
EndFunc
Func WM_HVSCROLL($hWndGUI, $MsgID, $WParam, $LParam)
Switch $LParam
Case GUICtrlGetHandle($RedSlider),GUICtrlGetHandle($GreenSlider),GUICtrlGetHandle($BlueSlider)
ConsoleWrite("Set new Gamma Slider" & @crlf)
Case GUICtrlGetHandle($Redupdown),GUICtrlGetHandle($Greenupdown),GUICtrlGetHandle($Blueupdown)
ConsoleWrite("Set new Gamma Input" & @crlf)
GuiCtrlSetdata($RedSlider,GuiCtrlRead($RedInput))
GuiCtrlSetdata($GreenSlider,GuiCtrlRead($GreenInput))
GuiCtrlSetdata($BlueSlider,GuiCtrlRead($BlueInput))
;Return
EndSwitch
If BitAnd(GuiCtrlRead($lockTick),$GUI_CHECKED) then
Switch $LParam
Case GUICtrlGetHandle($RedSlider),GUICtrlGetHandle($Redupdown)
ConsoleWrite("Red Slider" & @crlf)
$newRed = GuiCtrlRead($RedSlider)
$redDiff = $newRed - $lastRed
$newGreen = GuiCtrlRead($GreenSlider) + $redDiff
$newBlue = GuiCtrlRead($BlueSlider) + $redDiff
GuiCtrlSetData($GreenSlider,$newGreen)
GuiCtrlSetData($BlueSlider,$newBlue)
Case GUICtrlGetHandle($GreenSlider),GUICtrlGetHandle($Greenupdown)
ConsoleWrite("Green Slider" & @crlf)
$newGreen = GuiCtrlRead($GreenSlider)
$greenDiff = $newGreen - $lastGreen
$newRed = GuiCtrlRead($RedSlider) + $greenDiff
$newBlue = GuiCtrlRead($BlueSlider) + $greenDiff
GuiCtrlSetData($RedSlider,$newRed)
GuiCtrlSetData($BlueSlider,$newBlue)
Case GUICtrlGetHandle($BlueSlider),GUICtrlGetHandle($Blueupdown)
ConsoleWrite("Blue Slider" & @crlf)
$newBlue = GuiCtrlRead($BlueSlider)
$blueDiff = $newBlue - $lastBlue
$newRed = GuiCtrlRead($RedSlider) + $BlueDiff
$newGreen = GuiCtrlRead($GreenSlider) + $blueDiff
GuiCtrlSetData($RedSlider,$newRed)
GuiCtrlSetData($GreenSlider,$newGreen)
EndSwitch
Else
$newRed = GuiCtrlRead($RedSlider)
$newGreen = GuiCtrlRead($GreenSlider)
$newBlue = GuiCtrlRead($BlueSlider)
EndIf
GuiCtrlSetData($RedInput,$newRed)
GuiCtrlSetData($GreenInput,$newGreen)
GuiCtrlSetData($BlueInput,$newBlue)
_SetGamma($newRed,$newGreen,$newBlue)
$lastRed = $newRed
$lastGreen = $newGreen
$lastBlue = $newBlue
EndFunc
Func _Reset()
GuiCtrlSetData($RedSlider,$redStartValue)
GuiCtrlSetData($GreenSlider,$greenStartValue)
GuiCtrlSetData($BlueSlider,$blueStartValue)
$lastRed = $redStartValue
$lastGreen = $greenStartValue
$lastBlue = $blueStartValue
GuiCtrlSetData($RedInput,$redStartValue)
GuiCtrlSetData($GreenInput,$greenStartValue)
GuiCtrlSetData($BlueInput,$blueStartValue)
_SetGamma($redStartValue,$greenStartValue,$blueStartValue)
EndFunc
Func _Normalize()
GuiCtrlSetData($RedSlider,128)
GuiCtrlSetData($GreenSlider,128)
GuiCtrlSetData($BlueSlider,128)
$lastRed = 128
$lastGreen = 128
$lastBlue = 128
GuiCtrlSetData($RedInput,128)
GuiCtrlSetData($GreenInput,128)
GuiCtrlSetData($BlueInput,128)
_SetGamma()
EndFunc
Func _GammaTo2d($vm_RampSaved)
Local $avDisplay[257][3]
For $i = 0 to 256
$avDisplay[$i][0] = DllStructGetData($vm_RampSaved,1,$i)
$avDisplay[$i][1] = DllStructGetData($vm_RampSaved,1,$i + 256)
$avDisplay[$i][2] = DllStructGetData($vm_RampSaved,1,$i + 512)
Next
Return $avDisplay
EndFunc
Func _SetGamma($vRed=128,$vGreen=128,$vBlue=128)
Local $n_ramp,$rVar,$gVar,$bVar,$Ret,$i,$dc
If $vRed < 0 or $vRed > 386 then
SetError(1)
Return -1 ;Invalid Red value
EndIf
If $vGreen < 0 or $vGreen > 386 then
SetError(2)
Return -1 ;Invalid Green value
EndIf
If $vBlue < 0 or $vBlue > 386 then
SetError(3)
Return -1 ;Invalid Blue value
EndIf
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$n_ramp = DllStructCreate("short[" & (256*3) & "]")
For $i = 0 to 256
[/autoit] [autoit][/autoit] [autoit]$rVar = $i * ($vRed + 128)
If $rVar > 65535 then $rVar = 65535
$gVar = $i * ($vGreen + 128)
If $gVar > 65535 then $gVar = 65535
$bVar = $i * ($vBlue + 128)
If $bVar > 65535 then $bVar = 65535
DllStructSetData($n_ramp,1,Int($rVar),$i) ;red
DllStructSetData($n_ramp,1,Int($gVar),$i+256) ;green
DllStructSetData($n_ramp,1,Int($bVar),$i+512) ;blue
Next
$ret = DLLCall("gdi32.dll","int","SetDeviceGammaRamp", _
"int",$dc[0],"ptr",DllStructGetPtr($n_Ramp))
;~ If Not $ret[0] Then MsgBox(4096,"WARNING", _
;~ "WARNING: Cannot set DeviceGammaRamp.",5)
$dc = 0
$n_Ramp = 0
EndFunc
[/autoit] [autoit][/autoit] [autoit]Func _GetGammaRamp()
Local $dc, $m_RampSaved,$ret,$avDisplay
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$m_RampSaved = DllStructCreate("short[" & (256*3) & "]")
$ret = DLLCall("gdi32.dll","int","GetDeviceGammaRamp", _
"int",$dc[0],"ptr",DllStructGetPtr($m_RampSaved))
If Not $ret[0] Then MsgBox(4096,"WARNING", _
"WARNING: Cannot initialize DeviceGammaRamp.")
$avDisplay = _GammaTo2d($m_RampSaved)
$dc = 0
$m_RampSaved = 0
Return $avDisplay
EndFunc
Func _GetGammaRampRaw()
Local $dc, $m_RampSaved,$ret
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$m_RampSaved = DllStructCreate("short[" & (256*3) & "]")
$ret = DLLCall("gdi32.dll","int","GetDeviceGammaRamp", _
"int",$dc[0],"ptr",DllStructGetPtr($m_RampSaved))
If Not $ret[0] Then
MsgBox(4096,"WARNING", _
"WARNING: Cannot initialize DeviceGammaRamp.")
Return -1
Else
Return $m_RampSaved
EndIf
EndFunc
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Func _SetGammaRampRaw($raw_Ramp)
Local $dc, $ret
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$ret = DLLCall("gdi32.dll","int","GetDeviceGammaRamp", _
"int",$dc[0],"ptr",DllStructGetPtr($raw_Ramp))
If Not $ret[0] Then MsgBox(4096,"WARNING", _
"WARNING: Cannot initialize DeviceGammaRamp.")
EndFunc
[/autoit] [autoit][/autoit] [autoit]Func SpecialEvents()
ConsoleWrite("Special Events WinHandle = " & @GUI_WINHANDLE & " ControlID = " & @GUI_CtrlId & @crlf)
Select
Case @GUI_CTRLID = $GUI_EVENT_MINIMIZE
WinSetState(@GUI_WINHANDLE,"",@SW_MINIMIZE)
Case @GUI_CTRLID = $GUI_EVENT_RESTORE
WinSetState(@GUI_WINHANDLE,"",@SW_RESTORE)
EndSelect
EndFunc
Mfg Spider
Alles anzeigenHallo
Jup, gab es mal im Englischen Forum, habs mal auf die neue Version angepasst:
Spoiler anzeigen
[autoit]#include <EditConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <UpDownConstants.au3>
#include <WindowsConstants.au3>
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=D:\My Documents\icons\default.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=CALGamma loader Use /h to load gamma settings without gui
#AutoIt3Wrapper_Res_Description=Sets a software gamma correction
#AutoIt3Wrapper_Res_Fileversion=1.0.0.3
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=p
#AutoIt3Wrapper_Res_LegalCopyright=Chris Lambert
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****Opt ("GuiOnEventMode",1)
[/autoit] [autoit][/autoit] [autoit]$redStartValue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Red")
[/autoit] [autoit][/autoit] [autoit]
If $redStartValue > 386 or $redStartValue < 0 or $redStartValue = "" then $redStartValue = 128
$greenStartValue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Green")
If $greenStartValue > 386 or $greenStartValue < 0 or $greenStartValue = "" then $greenStartValue = 128
$blueStartValue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Blue")
If $blueStartValue > 386 or $blueStartValue < 0 or $blueStartValue = "" then $blueStartValue = 128_SetGamma($redStartValue,$greenStartValue,$blueStartValue)
[/autoit] [autoit][/autoit] [autoit]If $CMDLINE[0] > 0 and $CMDLINE[1] = "/h" then Exit
[/autoit] [autoit][/autoit] [autoit]Global $lastRed = $redStartValue
[/autoit] [autoit][/autoit] [autoit]
Global $lastGreen = $greenStartValue
Global $lastBlue = $blueStartValue;Global Const $WM_HSCROLL = 0x0114 ;Already declared in Autoit 3.2.10.0
[/autoit] [autoit][/autoit] [autoit]
;Global Const $WM_VSCROLL = 0x0115 ;Already declared in Autoit 3.2.10.0Global Const $slideMin = 0
[/autoit] [autoit][/autoit] [autoit]
Global Const $slideMax = 386FileInstall("GammaImage.jpg",@tempdir & "\GammaImage.jpg",1)
[/autoit] [autoit][/autoit] [autoit]
$Main = GUICreate("Gamma Adjust", 1024, 530,-1,-1,$WS_EX_DLGMODALFRAME)GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit")
[/autoit] [autoit][/autoit] [autoit]
GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents")
GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents")
$Pic1 = GUICtrlCreatePic(@tempdir & "\GammaImage.jpg", 8, 8, 689, 481, BitOR($SS_NOTIFY,$WS_GROUP ),$WS_EX_DLGMODALFRAME )GuiCtrlCreateLabel("Red",712,10,41)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$RedSlider = GUICtrlCreateSlider(712, 28, 41, 461,BitOr($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1,$slideMax,$slideMin)
GUICtrlSetData(-1,$redStartValue)GuiCtrlCreateLabel("Green",786,10,41)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$GreenSlider = GUICtrlCreateSlider(786, 28, 41, 461,BitOr($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1,$slideMax,$slideMin)
GUICtrlSetData(-1,$greenStartValue)GuiCtrlCreateLabel("Blue",857,10,41)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$BlueSlider = GUICtrlCreateSlider(857, 28, 41, 461,BitOr($TBS_VERT,$TBS_AUTOTICKS))
GUICtrlSetLimit(-1,$slideMax,$slideMin)
GUICtrlSetData(-1,$blueStartValue)$lockTick = GuiCtrlCreateCheckBox("Lock Sliders",910,10)
[/autoit] [autoit][/autoit] [autoit]$Normal = GuiCtrlCreateButton("Normal",910,50,90,40)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent(-1,"_Normalize")$Reset = GuiCtrlCreateButton("Reset",910,100,90,40)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent(-1,"_Reset")$Reset = GuiCtrlCreateButton("Save",910,150,90,40)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent(-1,"_Save")$Reset = GuiCtrlCreateButton("Quit",910,200,90,40)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent(-1,"_Quit")GUICtrlCreateLabel("R",910,355,20)
[/autoit] [autoit][/autoit] [autoit]
GuiCtrlSetFont(-1,14)
$RedInput = GUICtrlCreateInput($redStartValue,930,350,70,30,$ES_NUMBER + $ES_READONLY)
GUICtrlSetLimit(-1,3)
GuiCtrlSetFont(-1,14)
$Redupdown = GUICtrlCreateUpdown(-1,$UDS_NOTHOUSANDS+$UDS_ARROWKEYS)
GUICtrlSetLimit ( -1, 386 ,0 )GUICtrlCreateLabel("G",910,405,20)
[/autoit] [autoit][/autoit] [autoit]
GuiCtrlSetFont(-1,14)
$GreenInput = GUICtrlCreateInput($GreenStartValue,930,400,70,30,$ES_NUMBER + $ES_READONLY)
GUICtrlSetLimit(-1,3)
GuiCtrlSetFont(-1,14)
$Greenupdown = GUICtrlCreateUpdown(-1,$UDS_NOTHOUSANDS+$UDS_ARROWKEYS)
GUICtrlSetLimit ( -1, 386 ,0 )GUICtrlCreateLabel("B",910,455,20)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GuiCtrlSetFont(-1,14)
$BlueInput = GUICtrlCreateInput($BlueStartValue,930,450,70,30,$ES_NUMBER + $ES_READONLY)
GUICtrlSetLimit(-1,3)
GuiCtrlSetFont(-1,14)
$Blueupdown = GUICtrlCreateUpdown(-1,$UDS_NOTHOUSANDS+$UDS_ARROWKEYS)
GUICtrlSetLimit ( -1, 386 ,0 )GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUIRegisterMsg($WM_VSCROLL, "WM_HVSCROLL")While 1
[/autoit] [autoit][/autoit] [autoit]
sleep (100)
WEndFunc _Save()
[/autoit] [autoit][/autoit] [autoit]
$newRed = GuiCtrlRead($RedSlider)
$newGreen = GuiCtrlRead($GreenSlider)
$newBlue = GuiCtrlRead($BlueSlider)
RegWrite("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Red","REG_SZ", $newRed)
RegWrite("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Green","REG_SZ", $newGreen)
RegWrite("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Blue","REG_SZ", $newBlue)
Msgbox(0 + 262144,"Saved","Gamma Settings have been saved")
EndFuncFunc _Quit()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$newRed = GuiCtrlRead($RedSlider)
$newGreen = GuiCtrlRead($GreenSlider)
$newBlue = GuiCtrlRead($BlueSlider)
$savedRed = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Red")
$savedGreen = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Green")
$savedBlue = RegRead("HKEY_LOCAL_MACHINE\Software\TIC\CALGamma","Blue")
If $savedRed = "" then $savedred = 128
If $savedGreen = "" then $savedGreen = 128
If $savedBlue = "" then $savedBlue = 128
If $newRed <> $savedRed then
;prompt to save
$ans = MsgBox(4 + 262144,"Settings Change","Settings have not been saved do you wish to save changes before exiting")
If $ans = 6 then
_Save()
Else
_SetGamma($savedRed,$savedGreen,$savedBlue)
EndIf
ElseIf $newGreen <> $savedGreen then
$ans = MsgBox(4 + 262144,"Settings Change","Settings have not been saved do you wish to save changes before exiting")
If $ans = 6 then
_Save()
Else
_SetGamma($savedRed,$savedGreen,$savedBlue)
EndIf
ElseIf $newBlue <> $savedBlue then
$ans = MsgBox(4 + 262144,"Settings Change","Settings have not been saved do you wish to save changes before exiting")
If $ans = 6 then
_Save()
Else
_SetGamma($savedRed,$savedGreen,$savedBlue)
EndIf
EndIf
FileDelete(@tempdir & "\GammaImage.jpg")
Exit
EndFuncFunc WM_HVSCROLL($hWndGUI, $MsgID, $WParam, $LParam)
[/autoit] [autoit][/autoit] [autoit]
Switch $LParam
Case GUICtrlGetHandle($RedSlider),GUICtrlGetHandle($GreenSlider),GUICtrlGetHandle($BlueSlider)
ConsoleWrite("Set new Gamma Slider" & @crlf)
Case GUICtrlGetHandle($Redupdown),GUICtrlGetHandle($Greenupdown),GUICtrlGetHandle($Blueupdown)
ConsoleWrite("Set new Gamma Input" & @crlf)
GuiCtrlSetdata($RedSlider,GuiCtrlRead($RedInput))
GuiCtrlSetdata($GreenSlider,GuiCtrlRead($GreenInput))
GuiCtrlSetdata($BlueSlider,GuiCtrlRead($BlueInput))
;Return
EndSwitch
If BitAnd(GuiCtrlRead($lockTick),$GUI_CHECKED) then
Switch $LParam
Case GUICtrlGetHandle($RedSlider),GUICtrlGetHandle($Redupdown)
ConsoleWrite("Red Slider" & @crlf)
$newRed = GuiCtrlRead($RedSlider)
$redDiff = $newRed - $lastRed
$newGreen = GuiCtrlRead($GreenSlider) + $redDiff
$newBlue = GuiCtrlRead($BlueSlider) + $redDiff
GuiCtrlSetData($GreenSlider,$newGreen)
GuiCtrlSetData($BlueSlider,$newBlue)
Case GUICtrlGetHandle($GreenSlider),GUICtrlGetHandle($Greenupdown)
ConsoleWrite("Green Slider" & @crlf)
$newGreen = GuiCtrlRead($GreenSlider)
$greenDiff = $newGreen - $lastGreen
$newRed = GuiCtrlRead($RedSlider) + $greenDiff
$newBlue = GuiCtrlRead($BlueSlider) + $greenDiff
GuiCtrlSetData($RedSlider,$newRed)
GuiCtrlSetData($BlueSlider,$newBlue)
Case GUICtrlGetHandle($BlueSlider),GUICtrlGetHandle($Blueupdown)
ConsoleWrite("Blue Slider" & @crlf)
$newBlue = GuiCtrlRead($BlueSlider)
$blueDiff = $newBlue - $lastBlue
$newRed = GuiCtrlRead($RedSlider) + $BlueDiff
$newGreen = GuiCtrlRead($GreenSlider) + $blueDiff
GuiCtrlSetData($RedSlider,$newRed)
GuiCtrlSetData($GreenSlider,$newGreen)
EndSwitch
Else
$newRed = GuiCtrlRead($RedSlider)
$newGreen = GuiCtrlRead($GreenSlider)
$newBlue = GuiCtrlRead($BlueSlider)[/autoit] [autoit][/autoit] [autoit]
EndIf
GuiCtrlSetData($RedInput,$newRed)
GuiCtrlSetData($GreenInput,$newGreen)
GuiCtrlSetData($BlueInput,$newBlue)
_SetGamma($newRed,$newGreen,$newBlue)
$lastRed = $newRed
$lastGreen = $newGreen
$lastBlue = $newBlue
EndFuncFunc _Reset()
[/autoit] [autoit][/autoit] [autoit]
GuiCtrlSetData($RedSlider,$redStartValue)
GuiCtrlSetData($GreenSlider,$greenStartValue)
GuiCtrlSetData($BlueSlider,$blueStartValue)
$lastRed = $redStartValue
$lastGreen = $greenStartValue
$lastBlue = $blueStartValue
GuiCtrlSetData($RedInput,$redStartValue)
GuiCtrlSetData($GreenInput,$greenStartValue)
GuiCtrlSetData($BlueInput,$blueStartValue)
_SetGamma($redStartValue,$greenStartValue,$blueStartValue)
EndFuncFunc _Normalize()
[/autoit] [autoit][/autoit] [autoit]
GuiCtrlSetData($RedSlider,128)
GuiCtrlSetData($GreenSlider,128)
GuiCtrlSetData($BlueSlider,128)
$lastRed = 128
$lastGreen = 128
$lastBlue = 128
GuiCtrlSetData($RedInput,128)
GuiCtrlSetData($GreenInput,128)
GuiCtrlSetData($BlueInput,128)
_SetGamma()
EndFuncFunc _GammaTo2d($vm_RampSaved)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Local $avDisplay[257][3]
For $i = 0 to 256
$avDisplay[$i][0] = DllStructGetData($vm_RampSaved,1,$i)
$avDisplay[$i][1] = DllStructGetData($vm_RampSaved,1,$i + 256)
$avDisplay[$i][2] = DllStructGetData($vm_RampSaved,1,$i + 512)
Next
Return $avDisplay
EndFuncFunc _SetGamma($vRed=128,$vGreen=128,$vBlue=128)
[/autoit] [autoit][/autoit] [autoit]
Local $n_ramp,$rVar,$gVar,$bVar,$Ret,$i,$dc
If $vRed < 0 or $vRed > 386 then
SetError(1)
Return -1 ;Invalid Red value
EndIf
If $vGreen < 0 or $vGreen > 386 then
SetError(2)
Return -1 ;Invalid Green value
EndIf
If $vBlue < 0 or $vBlue > 386 then
SetError(3)
Return -1 ;Invalid Blue value
EndIf
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$n_ramp = DllStructCreate("short[" & (256*3) & "]")For $i = 0 to 256
[/autoit] [autoit][/autoit] [autoit]$rVar = $i * ($vRed + 128)
[/autoit] [autoit][/autoit] [autoit]
If $rVar > 65535 then $rVar = 65535
$gVar = $i * ($vGreen + 128)
If $gVar > 65535 then $gVar = 65535
$bVar = $i * ($vBlue + 128)
If $bVar > 65535 then $bVar = 65535
DllStructSetData($n_ramp,1,Int($rVar),$i) ;red
DllStructSetData($n_ramp,1,Int($gVar),$i+256) ;green
DllStructSetData($n_ramp,1,Int($bVar),$i+512) ;blueNext
[/autoit] [autoit][/autoit] [autoit]
$ret = DLLCall("gdi32.dll","int","SetDeviceGammaRamp", _
"int",$dc[0],"ptr",DllStructGetPtr($n_Ramp));~ If Not $ret[0] Then MsgBox(4096,"WARNING", _
[/autoit] [autoit][/autoit] [autoit]
;~ "WARNING: Cannot set DeviceGammaRamp.",5)
$dc = 0
$n_Ramp = 0EndFunc
[/autoit] [autoit][/autoit] [autoit]Func _GetGammaRamp()
[/autoit] [autoit][/autoit] [autoit]
Local $dc, $m_RampSaved,$ret,$avDisplay
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$m_RampSaved = DllStructCreate("short[" & (256*3) & "]")$ret = DLLCall("gdi32.dll","int","GetDeviceGammaRamp", _
[/autoit] [autoit][/autoit] [autoit]
"int",$dc[0],"ptr",DllStructGetPtr($m_RampSaved))If Not $ret[0] Then MsgBox(4096,"WARNING", _
[/autoit] [autoit][/autoit] [autoit]
"WARNING: Cannot initialize DeviceGammaRamp.")$avDisplay = _GammaTo2d($m_RampSaved)
[/autoit] [autoit][/autoit] [autoit]
$dc = 0
$m_RampSaved = 0
Return $avDisplay
EndFuncFunc _GetGammaRampRaw()
[/autoit] [autoit][/autoit] [autoit]
Local $dc, $m_RampSaved,$ret
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$m_RampSaved = DllStructCreate("short[" & (256*3) & "]")$ret = DLLCall("gdi32.dll","int","GetDeviceGammaRamp", _
[/autoit] [autoit][/autoit] [autoit]
"int",$dc[0],"ptr",DllStructGetPtr($m_RampSaved))If Not $ret[0] Then
[/autoit] [autoit][/autoit] [autoit]
MsgBox(4096,"WARNING", _
"WARNING: Cannot initialize DeviceGammaRamp.")
Return -1
Else
Return $m_RampSaved
EndIfEndFunc
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Func _SetGammaRampRaw($raw_Ramp)
[/autoit] [autoit][/autoit] [autoit]
Local $dc, $ret
$dc = DLLCall("user32.dll","int","GetDC","hwnd",0)
$ret = DLLCall("gdi32.dll","int","GetDeviceGammaRamp", _
"int",$dc[0],"ptr",DllStructGetPtr($raw_Ramp))If Not $ret[0] Then MsgBox(4096,"WARNING", _
[/autoit] [autoit][/autoit] [autoit]
"WARNING: Cannot initialize DeviceGammaRamp.")EndFunc
[/autoit] [autoit][/autoit] [autoit]Func SpecialEvents()
[/autoit] [autoit][/autoit] [autoit]
ConsoleWrite("Special Events WinHandle = " & @GUI_WINHANDLE & " ControlID = " & @GUI_CtrlId & @crlf)
Select
Case @GUI_CTRLID = $GUI_EVENT_MINIMIZE
WinSetState(@GUI_WINHANDLE,"",@SW_MINIMIZE)
Case @GUI_CTRLID = $GUI_EVENT_RESTORE
WinSetState(@GUI_WINHANDLE,"",@SW_RESTORE)EndSelect
[/autoit]
EndFuncMfg Spider
vielen dank! ich werd mich damit später auseinander setzen, und mich bei fragen dazu nochmal melden.
wäre super, wenn jetzt jemand noch auf meine frage aus post #3 eingehen kann.
mfg arx
[autoit]wäre super, wenn jetzt jemand noch auf meine frage aus post #3 eingehen kann.
Send("{CTRLDOWN}{ALTDOWN}1{ALTUP}{CTRLUP}")
[/autoit]
