Herzlichen Glückwunsch.
Danke für alles was du zu diesem Forum beigetragen hast, ohne dir würd hier echt was fehlen
Naja.. Dann feier jetzt erstmal schön
Mfg Spider
Herzlichen Glückwunsch.
Danke für alles was du zu diesem Forum beigetragen hast, ohne dir würd hier echt was fehlen
Naja.. Dann feier jetzt erstmal schön
Mfg Spider
Hallo
Es gibt sowas cooles wie die Suche oder Google, dass nächste mal vor dem Posten Suchen (Sollte eigentlich selbstverständlich sein..)
Mfg Spider
"non-gaming-grafikkarte" zzzZZZ^^ hat ein geringeren Takt als meine Und wer brauch schon 4gig beim Grafikspeicher?
Ich sehs schon kommen, in nem Jahr beschwer ich mich im gleichen Post dadrüber, dass meine Graka nur 1 anstatt den dann üblichen 8gb hat
Mfg Spider
Hallo
Ich wollte mal fragen, ob ich gute restliche Hardware für ne GTX 280 hab (Bevor jetzt hier wieder ne disskusion über ATI oder nVidia ausbricht.. jaja ich weiß^^ hätt ich mir damals nur die 4870x2 gekauft :P)
Hab nämlich mal was davon gehört, dass meine GraKa zu gut für mein MB ist^^
Mein System:
[Blockierte Grafik: http://sig.sysprofile.de/quicksys/sysp-28827.png]
Sollte eigentlich alles gut laufen, wollte mich halt nur nochmal vergewissern
Bei Crysis (hoch, 1680x1050) und FarCry2 (maximum,1680x1050,4xAA) stockt er nämlich schon manchmal
Mfg Spider
Hallo
War da jetzt ne Frage drin?
Falls ja, such mal im Forum nach VLC über google suche..
Mfg spider
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
Hallo
Über ein Modem? oO
Hast du dich denn schon eingewählt? Das macht AutoIt afaik nicht automatisch
Mfg Spider
Hallo und herzlich Willkommen.
Mfg Spider
Hallo
Hab mit 13 angefangen
Bin nun 16.. Man man man, damals noch im Windows-Unattended Board. Und dann als ich mit 200 Post (absoluter Hammer) als Moderator gewählt wurde von dem deutschen AutoIt Forum.
Hach, dass waren noch Zeiten
Naja aber back at topic: Willkommen im Forum
Mfg Spider
Hallo
Mh, naja.. Das Tool hab ich vor mehr als 2 Jahren geschrieben
Glaub hab nicht mehr soo viel Lust das noch umzuschreiben Wahrscheinlich könnte man das mit der Akuellen Autoit Version etwas Verschnellern/verbessern.
Aber wie gesagt.. Keine Lust
Falls du Lust hast, gerne. Dann werde ich dich auch bei den Credits mit einfügen..
Mfg Spider
Hallo
Ups, sind noch Falsche Includes drin, danke. Hab oben mal geändert.
Mfg Spider
Hallo
AutoIt war mal OpenSource. Ist es jetzt aber nicht mehr wegen Decompilen
Mfg Spider
Hallo
Jo, Pastebin ist schon praktisch. Aber mir reichen die Spoiler, da man ja meistens nur 1-2 Sourcecodes pro Thread hat
Mfg Spider
Hallo
Du hast eine __SetProgress($sRecvString,$iCompleteSize) funktion bei der RapidPrem..##
Mfg Spider
Hallo
@K1773R: Screen von ner UDF ohne GUI wird schwer
Geschwidigkeit hab ich noch nicht ausgestestet, aber werd ich bald mal machen.
FireFlyer: Danke Aber zu 1.: Ich wollte ja das immer nur eine Datei gesendet wird. Natürlich kann man das auch ausbauen, und dann TCPListen vor der UDF klemmen oder sowas... Und zu 2.: Wird doch Zeile 44 beim Send:
$sBuff = Binary(StringTrimLeft($sFile,StringInStr($sFile,"\",-1,-1))&",")&FileRead($iFileOp)
[/autoit]
Und Zeile 44-46 beim Recv:
$sTmp = StringLeft($sRecv, StringInStr($sRecv, ",") - 1)
$sRecv = StringTrimLeft($sRecv, StringLen($sTmp) + 1)
If StringLen($sFileName) < 1 Then $sFileName = $sTmp
Mfg Spider
Hallo
Wenn du aber nicht mit Schleife arbeiten willst, sondern mit HotKeySet (OnEvent) dann benutze diese UDF:
_MouseSetOnEvent() UDF!
Mfg Spider
Hallo
Du willst also den Prozess von dem aktuell aktiven Fenster herrausfinden?
[autoit]$iPID = WinGetProcess("");Gib PID (Process ID) von dem momentan aktiven Fenster aus
[/autoit]Mfg Spider