Hallo!
das ist hex.. "0x" hat nichts zubedeuten für dich, das sagt autoit nur das es hex ist.. B5A2DE So ist es aufgebaut.. also die 1. beiden (hier B5) ist rot die 2. beiden (hier A2) grün und die letzen beiden (hier DE) blau..
Mfg Spider
Hallo!
das ist hex.. "0x" hat nichts zubedeuten für dich, das sagt autoit nur das es hex ist.. B5A2DE So ist es aufgebaut.. also die 1. beiden (hier B5) ist rot die 2. beiden (hier A2) grün und die letzen beiden (hier DE) blau..
Mfg Spider
Hallo!
Der Aufruf von FileWriteLog geht volgendermaßen:
[autoit]#include <file.au3>
$sDateiName = "C:\test.txt"
$sText = "Hallo log 001 :)"
_FileWriteLog($sDateiName,$sText);schreibt in C:\test.txt: Jahr-Monat-Tag Stunde:Minute:Sekunde : Hallo log 001
;also z.B.: 2007-01-02 11:34:35 : Hallo log 001
Viel spaß und viel Erfolg noch bei programieren!
Mfg Spider
Hallo!
nich ganz pee.. wenn er es so ausführt: Pause /8 dann würde er ja /8*1000 rechnen --> Syntax error.. also $time = StringTrimLeft($cmdline[1],1)
Ich würde es aber ohne / machen.. dann hätte pee nämlich recht^^ ausserdem ist das ohne / üblich wenn man nur 1 parameter hat.. Also "Pause 8" --> 8 isekunden
Mfg Spider
hallo
ich bin der erste und ich werde der letze sein, hoffentlich Auch von mir nohcmal ein schönes neues Jahr, und danke das ihr uns bis jetzt treu geblieben seit! Hoffe das dies auch noch ein paar jährchen anhalt Also ein schönes neues!!
Mfg Spider
Hallo!
Ein frohes neues um 0:00 wünscht euch GtaSpider Guten rutsch..
Mfg Spider
___________________________
Automatisch generiert mit AutoIt
Hallo!
Entweder so wie Pee es gesagt hat, mit GUI.. da brauchst du dir aber kaum arbeit machen da es sowas schon gibt: http://www.autoitscript.com/forum/index.php?s=&showtopic=29454&view=findpost&p=210240
Oder du machst es falls du zu faul bist die funktion zu kopieren ( :lol: ) einfach so:
For $i = 10 to 1 Step -1
MsgBox(0,"","Shutdown in "&$i,1)
Next
Hab ich nich ausprobiert nur schnell im Browser geschrieben, du weißt ja aber was ich mein^^
MfG Spider
Hallo und herzlich :willkommen:
Knuspertux? hmm ich kenn ein spiel von kantonix das heißt supertux^^ benutzt du zufällig kantonix oder irgendein anderes linux? Falls ja sollte ich vlt mal eine jobsuche als Profiler starten :party4: falls nein hab ichs zummindest versucht
naja.. lange rede kurzer sinn.. hoffe du hast viel spaß hier!
Mfg Spider
Edit: Juhu^^ 777er Post :stolz_bin:
Hallo!
Schönes script, danke Habe vor einiger zeit auchmal damit rumhantiert, für ein Settrans (transparten setzen) programm! Leider hab ich das programm weggeworfen ~~ hab es in einfacher form nochmal mit deiner Funktion nachgebaut.. das programm umrandet einfach nur das momentan aktive fenster..
Also noch ein bsp:
#include <GUIConstants.au3>
HotKeySet("{ESC}", "_end")
MsgBox(0,"by gtaspider","Close mit ESC!")
Global $start = MouseGetPos()
$gui = GUICreate("GUI", 30, 30, $start[0] - 15, $start[1] - 15, $WS_POPUP, $WS_EX_TOPMOST+$WS_EX_TOOLWINDOW)
GUISetBkColor(0xff0000)
;~ _GUICreateInvRect($gui, 5, 5, 20, 20)
GUISetState()
While 1
Sleep(100)
$now = WinGetTitle("")
$now = WinGetPos($now)
WinMove($gui, "", $now[0], $now[1],$now[2],$now[3])
_GUICreateInvRect($gui, 5, 5, $now[2]-10, $now[3]-10)
WEnd
Func _GUICreateInvRect($hwnd, $l, $t, $w, $h)
$pos = WinGetPos($hwnd)
$1 = 0
$2 = 0
$3 = $pos[2]
$4 = $t
$ret = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", $1, "long", $2, "long", $3, "long", $4)
$1 = 0
$2 = 0
$3 = $l
$4 = $pos[3]
$ret2 = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", $1, "long", $2, "long", $3, "long", $4)
$1 = $l + $w
$2 = 0
$3 = $pos[2]
$4 = $pos[3]
$ret3 = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", $1, "long", $2, "long", $3, "long", $4)
$1 = 0
$2 = $t + $h
$3 = $pos[2]
$4 = $pos[3]
$ret4 = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", $1, "long", $2, "long", $3, "long", $4)
DllCall("gdi32.dll", "long", "CombineRgn", "long", $ret[0], "long", $ret[0], "long", $ret2[0], "int", 2)
DllCall("gdi32.dll", "long", "CombineRgn", "long", $ret[0], "long", $ret[0], "long", $ret3[0], "int", 2)
DllCall("gdi32.dll", "long", "CombineRgn", "long", $ret[0], "long", $ret[0], "long", $ret4[0], "int", 2)
DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $hwnd, "long", $ret[0], "int", 1)
EndFunc ;==>_GUICreateInvRect
Func _GuiHole($h_win, $i_x, $i_y, $i_sizew, $i_sizeh)
Dim $pos, $outer_rgn, $inner_rgn, $wh, $combined_rgn, $ret
$pos = WinGetPos($h_win)
$outer_rgn = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", 0, "long", 0, "long", $pos[2], "long", $pos[3])
If IsArray($outer_rgn) Then
$inner_rgn = DllCall("gdi32.dll", "long", "CreateEllipticRgn", "long", $i_x, "long", $i_y, "long", $i_x + $i_sizew, "long", $i_y + $i_sizeh)
If IsArray($inner_rgn) Then
$combined_rgn = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", 0, "long", 0, "long", 0, "long", 0)
If IsArray($combined_rgn) Then
DllCall("gdi32.dll", "long", "CombineRgn", "long", $combined_rgn[0], "long", $outer_rgn[0], "long", $inner_rgn[0], "int", 4)
$ret = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $combined_rgn[0], "int", 1)
If $ret[0] Then
Return 1
Else
Return 0
EndIf
Else
Return 0
EndIf
Else
Return 0
EndIf
Else
Return 0
EndIf
EndFunc ;==>_GuiHole
[/autoit] [autoit][/autoit] [autoit]Func _end()
Exit (0)
EndFunc ;==>_end
Mfg Spider
Hallo!
ka^^ das sagt mir das wörterbuch von google wenn ich "volume ID defenition" eingebe.. und google lügt nich *WITZ DES TAGES*
Mfg Spider
Hallo!
Das man die Volume ID auslesen bzw schreiben kann
Was ist eine Volume ID: A series of characters, recorded on the diskette, used to identify the diskette to the user and to the system.
Falls man halt z.b. ein Passwortprogramm schreiben will und das verschlüsseln will (_GetVolumeID() ) oder falls man bestimmte programme austrixen will die das auch so machen (_SetVolumeID() (Icq... aber pssst^^))
Mfg Spider
Hallo!
Ja es ist soweit! Es ist weihnachten Und aus diesem Grund habe ich für euch (naja.. eigentlich für mich^^) 2 Funktionen geschrieben! Einmal _GetVolumeID und einmal _SetVolumeID
Für _GetvolumeID brauch man keine extra programme (auser comspec halt^^) aber für _SetVolumeID brauch man leider Volumeid.exe (Im Dateianhang in der ZIP)
ACHTUNG! Die VolumeID zu ändern kann gefährlich sein, also bitte die finger davon lassen wenn man sich nicht 100% sicher ist was man machts bzw was die Volume ID überhaupt ist!
Ausserdem muss der PC (wider leider) nach dem Setzen der ID auf NTFS neugestartet werden!
Naja "lange" rede kurzer sinn.. hier ist das skript und die dazugehörigen dateien
MsgBox(0,"VolumeID from D: without -",StringReplace(_GetVolumeID("D:"),"-",""))
[/autoit] [autoit][/autoit] [autoit]_SetVolumeID("C:",_GetVolumeID("C:"))
If @error Then Exit MsgBox(16,"","Error: Impossible to set the VolumeID!")
MsgBox(0,"","VolumeID succes set!")
;===============================================================================
;
; Function Name: _GetVolumeID
; Description:: Receives the Volume ID of the given Volume
; Parameter(s): $sHD: The Volume path (e.g. C:)
; Requirement(s): -
; Return Value(s): Volume ID on succes
; Return 0 and @error = 1 on faild
; Author: GtaSpider
;
;===============================================================================
Func _GetVolumeID($sHD = "C:")
Local $xVolid = DriveGetSerial($sHD)
IF @error Then Return SetError(1,0,0)
$xVolid = Hex($xVolid,
Return StringLeft($xVolid, 4) & "-" & StringRight($xVolid, 4)
EndFunc ;==>_GetVolumeID
;===============================================================================
;
; WARNING!!! Save you volume ID bevor you will change it, cause many programms need this ID (e.g. ICQ for pw's) WARNING!!!
;
; Function Name: _SetVolumeID
; Description:: Set the Volume ID of the given Volume
; Parameter(s): $sHD: The Volume path (e.g. C:)
; $iID: The Volume ID to set (e.g. 1234-1234 or 12341234)
; Requirement(s): Volumeid.exe (in ZIP)
; Return Value(s): Return 1 on succes
; Return 0 and @error = 1 on faild
; Author: GtaSpider
;
; Note: new NTFS volume ids will not appear in directory listings until after the next reboot.
;
;===============================================================================
Func _SetVolumeID($sHD,$iID)
Local $pid
If Not StringInStr($iID,"-") Then $iID = StringLeft($iID,4)&"-"&StringRight($iID,4)
$pid = Run("Volumeid.exe "&$sHD&" "&$iID,"",@SW_HIDE,6)
While ProcessExists($pid)
Sleep(50)
WEnd
If StringInStr(StdoutRead($pid),"xxxx-xxxx") Then Return SetError(1,0,0)
Return 1
EndFunc
Mfg Spider
Edit: lol.. VolumeID ist weitaus einfacher auszulesen, habe das UDF mal geupdatet
Hallo!
Von mir natürlich auch ein herzlichen schönes frohes (weißes?) Weihnachten! Und guten rutsch (einfach ma über die mehrwegsteuer hinwegsehen )
Mfg Spider
Hallo!
Sleeps werden in Millisekunden eingegeben also nicht mal 100 sondern mal 1000^^ also Sleep(4000) = 4sek! Ansosnten funktiniert das Skript!
[autoit]Send("{7 down}") ; 1 Klick auf 7
Send("{7 up}")
ist auch überflüssig das is das gleiche wie Send("7")!
Mfg Spider
@Spoiler:
Hallo und herzlich :willkommen:
Fensterkoordinaten kriegst du mit WinGetPos raus!
Habe dir mal ein bsp skript geschrieben das das macht was du willst (glaub ich jdnfalls^^ )
$farbe = 0xffffff ;Rot: FF Grün: FF Blau: FF (hexidezimale zahlen also ff ist das höchste!)
$name_des_fensters = "" ;Hier musst du den namen des Fensters eintragen wessen koordianten du haben willst
$wgp = WinGetPos($name_des_fensters) ;Hier wird die Position des Fensters ermittelt und in einem Array zurückgegeben.
While 1
$ps = PixelSearch($wgp[0],$wgp[1],$wgp[2],$wgp[3],$farbe);$wgp[0] = X, $wgp[1] = Y,$wgp[2] = Breite,$wgp[3] = Länge, $farbe = die farbe (oben definiert)
If Not @error Then _KeyDown();Wenn kein error, also die farbe existiert, dann soll er das "Script" ausführem (also die funktion!")
Sleep(200)
WEnd
Func _KeyDown()
;Hier werden die "KeyDowns" (in autoit Send) erstellt:
Opt("SendKeyDownDelay",4000);Wie lange die taste untenbleiben soll! Die Zahl (4000) muss in Millisekunden angegeben werden also sind 4000ms=4sek!
Send("W");W
Opt("SendKeyDownDelay",400)
Send("a");a
Opt("SendKeyDownDelay",4000)
Send("w");w
Opt("SendKeyDownDelay",400)
Send("d");d
Opt("SendKeyDownDelay",30000)
Send("w");w
Opt("SendKeyDownDelay",1000)
Send("f");f
EndFunc
Mfg Spider
Hallo!
herzlichen glüchwunsch zu deinem 300sten post, huggy
Du glaubst garnicht wieviel geld ich krieg von Leibniz das ich hier den keks reingepackt hab
Mfg Spider
Hallo!
Danke für den keks Und das mit leben = hart usw kann ich bestätigen^^ Und deine mitschüler kannst du nich auf die ignorierenliste schikcen, weil du sie täglich siehst (mich kümmertr das aber weniger^^ hab momentan 3 leute aus meiner klasse auf ignorieren =) )
und bevor ich es vergessen.. das ist dein "Meger" keks:
[Blockierte Grafik: http://upload.wikimedia.org/wikipedia/de/thumb/4/4c/Butterkeks.jpg/200px-Butterkeks.jpg]
Mgf Spider
Hallo!
äh.. ok^^ hat es irgendein bestimmten grund warum du den post geöfnet hast? ich mein du hast recht und so.. aber was bringt uns diese kentnissname?Naja gut.. dann trage ich auch mal was dazu bei:
Warum trinkt mega hochprozentigen alkohol um 13:05?
Mfg Schpida
Hallo!
Schönes schlusswort, huggy Jonk hat aber recht, wir werden hier keine illegalen sachen schieben (und wenn nur unterm tisch ) Also dsa machen was huggy schon sagte (google fragen..)
In dem sinne: Thread Closed
Mfg Spider
Hallo!
Jo sehr schön! Hab es ja auch schon voher getestet (engl Forum). Hab auch mal im internet ein paar highscores von Tower of Hanoi geknackt, danke dafür
Mfg Spider