|
You last visited: Today at 14:58
Advertisement
Includes gesucht
Discussion on Includes gesucht within the AutoIt forum part of the Coders Den category.
05/12/2010, 21:59
|
#16
|
elite*gold: 20
Join Date: Dec 2009
Posts: 1,850
Received Thanks: 484
|
Super, danke!
Habs jetzt (dank dir) auch mit der GUI hingrekrigt und kanns jetzt endlich compilen^^
Danke nochmal an alle für die Hilfe!
An der Stelle kann dann auch geclosed werden^^
|
|
|
05/12/2010, 22:11
|
#17
|
elite*gold: 0
Join Date: Apr 2008
Posts: 1,079
Received Thanks: 438
|
nice, aber zeig trotzdem mal source, vllt kann man ja noch tipps geben
|
|
|
05/12/2010, 22:22
|
#18
|
elite*gold: 237
Join Date: Sep 2008
Posts: 4,476
Received Thanks: 4,587
|
Nur mal ein paar generelle Bemerkungen zur Funktion an sich.
PHP Code:
$ms0 = MouseGetPos()
$clr2 = 1
Was bringt das? Nichts...
Wenn du diese "konstanten" Werte mit den aktuellen vergleichst, bringt das eigentlich gar nichts.
Ich nehme an, du willst die Lables nur dann updaten, wenn sich der Wert verändert hat. Du musst du den "alten" Wert jedoch dann zumindest mit dem "neuen" abgleichen.
Das wäre jedoch sinnlos, da das ganze auch einfach per Sleep(200) gepuffert werden kann und dir das ganze erspart.
|
|
|
05/12/2010, 23:38
|
#19
|
elite*gold: 20
Join Date: Dec 2009
Posts: 1,850
Received Thanks: 484
|
So, ich hab mir jetzt mal 3 Versionen von dem Programm gemacht.
Die 3. gefällt mir persönlich am besten, weil sie am genausten/schnellsten ist, obwohl es flimmert ._.
Bei den ersten beiden stimmen ab und zu die y-axis Werte nicht, weil das Programm durch
die ganzen If-Schleifen nichmehr so shcnell hinterher kommt^^
1.
PHP Code:
#include <GUIConstantsEx.au3> #include <EditConstants.au3> #include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1) $Form1_1 = GUICreate(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", 689, 22, 189, 252, BitOR($WS_CAPTION ,$WS_SYSMENU), $WS_EX_TOOLWINDOW) GUISetOnEvent($GUI_EVENT_CLOSE, "_exit") GUISetState(@SW_SHOW)
WinSetOnTop(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", "", 1)
$ms0 = MouseGetPos() $clr2 = 1 While 1 $ms1 = MouseGetPos() If $ms0[0] <> $ms1[0] Then $clr = PixelGetColor($ms0[0], $ms0[1]) $Label3 = GUICtrlCreateLabel($ms0[0], 400, 0, 51, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $ms0 = MouseGetPos() If $clr2 <> $clr Then $Label1 = GUICtrlCreateLabel($clr, 32, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel(Hex($clr), 192, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $clr2 = PixelGetColor($ms0[0], $ms0[1]) Else sleep(1) EndIf Else sleep(1) EndIf If $ms0[1] <> $ms1[1] Then $clr = PixelGetColor($ms0[0], $ms0[1]) $Label4 = GUICtrlCreateLabel($ms0[1], 560, 0, 51, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $ms0 = MouseGetPos() If $clr2 <> $clr Then $Label1 = GUICtrlCreateLabel($clr, 32, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel(Hex($clr), 192, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $clr2 = PixelGetColor($ms0[0], $ms0[1]) Else sleep(1) EndIf Else sleep(1) EndIf WEnd
Func _exit() Exit EndFunc
2.
PHP Code:
#include <GUIConstantsEx.au3> #include <EditConstants.au3> #include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$Form1_1 = GUICreate(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", 689, 22, 189, 252, BitOR($WS_CAPTION ,$WS_SYSMENU), $WS_EX_TOOLWINDOW) GUISetOnEvent($GUI_EVENT_CLOSE, "_exit") $Label3 = GUICtrlCreateLabel("MOVE", 400, 0, 51, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label4 = GUICtrlCreateLabel("MOVE", 560, 0, 51, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label1 = GUICtrlCreateLabel("MOVE", 32, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("MOVE", 192, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUISetState(@SW_SHOW)
WinSetOnTop(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", "", 1)
$ms0 = MouseGetPos() $clr2 = 1 While 1 $ms1 = MouseGetPos() If $ms0[0] <> $ms1[0] Then $clr = PixelGetColor($ms1[0], $ms1[1]) GUICtrlSetData($Label3, $ms1[0]) $ms0 = MouseGetPos() If $clr2 <> $clr Then GUICtrlSetData($Label1, $clr) GUICtrlSetData($Label2, Hex($clr)) $clr2 = PixelGetColor($ms1[0], $ms1[1]) $ms0 = MouseGetPos() EndIf ElseIf $ms0[1] <> $ms1[1] Then $ms1 = MouseGetPos() $clr = PixelGetColor($ms1[0], $ms1[1]) GUICtrlSetData($Label4, $ms1[1]) $ms0 = MouseGetPos() If $clr2 <> $clr Then GUICtrlSetData($Label1, $clr) GUICtrlSetData($Label2, Hex($clr)) $clr2 = PixelGetColor($ms1[0], $ms1[1]) $ms0 = MouseGetPos() EndIf EndIf WEnd
Func _exit() Exit EndFunc
3.
PHP Code:
#include <GUIConstantsEx.au3> #include <EditConstants.au3> #include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$Form1_1 = GUICreate(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", 689, 22, 189, 252, BitOR($WS_CAPTION ,$WS_SYSMENU), $WS_EX_TOOLWINDOW) GUISetOnEvent($GUI_EVENT_CLOSE, "_exit") $Label3 = GUICtrlCreateLabel("MOVE", 400, 0, 51, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label4 = GUICtrlCreateLabel("MOVE", 560, 0, 51, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label1 = GUICtrlCreateLabel("MOVE", 32, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("MOVE", 192, 0, 115, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUISetState(@SW_SHOW)
WinSetOnTop(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", "", 1)
While 1 $ms1 = MouseGetPos() $clr = PixelGetColor($ms1[0], $ms1[1]) GUICtrlSetData($Label3, $ms1[0]) GUICtrlSetData($Label4, $ms1[1]) GuiCtrlSetData($Label1, $clr) GUICtrlSetData($Label2, Hex($clr)) WEnd
Func _exit() Exit EndFunc
|
|
|
05/13/2010, 09:07
|
#20
|
elite*gold: 0
Join Date: Apr 2008
Posts: 1,079
Received Thanks: 438
|
this!
Code:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$Form1_1 = GUICreate(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", 689, 22, 189, 252, BitOR($WS_CAPTION, $WS_SYSMENU), $WS_EX_TOOLWINDOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "_exit")
$Label3 = GUICtrlCreateLabel("MOVE", 400, 0, 51, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("MOVE", 560, 0, 51, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("MOVE", 32, 0, 115, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("MOVE", 192, 0, 115, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
WinSetOnTop(" COLOR COLOR(HEX) MOUSE X MOUSE Y ", "", 1)
$ms0 = MouseGetPos()
While 1
$ms1 = MouseGetPos()
If $ms0[0] <> $ms1[0] Or $ms0[1] <> $ms1[1] Then
$ms0 = MouseGetPos()
$clr = PixelGetColor($ms0[0], $ms0[1])
GUICtrlSetData($Label3, $ms0[0])
GUICtrlSetData($Label4, $ms0[1])
GuiCtrlSetData($Label1, $clr)
GUICtrlSetData($Label2, Hex($clr))
EndIf
Sleep(1)
WEnd
Func _exit()
Exit
EndFunc ;==>_exit
Guck dir mal deine CPU Auslastung bei meinem Script an, und dann die bei deinem
|
|
|
05/13/2010, 12:39
|
#21
|
elite*gold: 20
Join Date: Dec 2009
Posts: 1,850
Received Thanks: 484
|
Ja ok kanns mir schon denken, dass der Prozessor da weniger zutun hat^^
Warscheinlich flimmerts bei deinem Script auch, aber is ja auch wayne.
Weil bei den anderen Scripts davor hatte ich immer das Problem, dass
der die y Werte nie genau angegeben hat, weil die in der ElseIf Schleife waren
und das Programm somit einfach zu lange gebraucht hat^^
€dit: Wtf bei deinem Script flimmerts nich D:
Ok, hab grad die Scripts verglichen und muss sagen, sehr schön gemacht Moep^^
€dit 2: Ich glaub das flimmert jetzt nicht wegen GUICtrlSetData.
|
|
|
 |
|
Similar Threads
|
New Cabal EU Bot. (includes GG Bypass)
06/23/2010 - Cabal Hacks, Bots, Cheats, Exploits & Macros - 10 Replies
This is new Cabal Europe Macroing/Botting program.
It includes Game-Guard Bypass and other features.
It's NOT Fake.. Before you admins/haters post some crap.. TRY IT FIRST.
Its UP-TO-DATE Illusion Castle.. (After new update it WON'T WORK!)
~G
|
Character Bot Includes Eminem
11/29/2009 - Soldier Front Hacks, Bots, Cheats & Exploits - 2 Replies
This is a character Bot for Soldier front, it is undetected so you can use it.
NO ROKMC BUT EMINEM!
http://img39.imageshack.us/img39/6721/immagine3j. png
Here is the download link:
force_090.rar
|
WTS: Steam Account; includes only 1.6 (non esl!)
10/06/2009 - Steam Trading - 4 Replies
Hi @
Verkaufe hier meinen CS 1.6 Account, er ist weder gebannt noch in der ESL eingetragen (kann somit frei genutzt werden ;)).
Auf wunsch kann ich ein Screen machen (momentan nur kein Steam drauf) oder auch ein Foto von der Verpackung + Kassenzettel.
Preis: 10 €
Nach dem Kauf erhaltet ihr eine Text-Datei welche die Accountdaten beinhaltet :)
|
[Guide] to 2nd RB Quest *includes a map!*
03/09/2009 - CO2 Guides & Templates - 3 Replies
This is for all the players who are doing the 2nd reborn quest and having a hard time. I made the map and guide by myself and I hope this helps you guys. I hope this in a way makes the quest easier for you or faster. Anyways onto the product. Enjoy!
*Side Note: My calculations may be off so sincerest apologies if so!
*Side Note: The map may be a little off but please bare with that. Also, remember it's not always on the actual spot because monsters do tend to move i.e, the Curses. And it's...
|
Botting includes no dc client users too?
03/08/2008 - Silkroad Online - 1 Replies
So,I'm fully legit, only using no-dc client and i havent bought silk for 3 months.Do i have possibility to get banned. Maybe anybody remembers last banning in 2007 summer or anything else
|
All times are GMT +1. The time now is 14:58.
|
|