Pixelsearch will nicht so wie ich will

[emtec22]

HI,

hier mein versuch mit Pixelsearch

;sucht einen weißen Pixel
$PixelSearch = Pixelsearch(0,@DesktopHeight,@DesktopWidth,@Deskto pDepth,0xFFFFFF)
If Not @error Then
MouseClick ( "Left", $PixelSearch[0], $PixelSearch[1])
Else
MsgBox(0,"Ergebnis","Ich finde die Farbe nicht")
EndIf


Er findet nie meine Farbe egal was ich auch eingebe an Hexwerten.
Habe ich dort einen Fehler drin?? Gehe ich einfach mal von aus aber wo ist er ??

[blauwiggle]

du hast nen leerzeichen bei "@DesktopDepth"
ansonsten könnts an der graka liegen. gf 8800?

[emtec22]

hi,

das Leerzeichen ist nur hier in dem Board ich wiess nicht warum aber wenn ich es hier einfüge dann macht er die Leerzeile.

Graka ist eine Ati radeon hd 2400 pro, hab es aber auch auf meinem Server FX5200 getestet auch da finded er nichts, leider.

Sonst eine Idee ??


Ich dachte erst es liegt daran das ich bei mir an 2 TFTs arbeite, dann habe ich aber von Bitchbi @Desktop Befehle gefunden und naja damit denke ich habe ich auch diese beiden abgedeckt.

Hoffe mir kann jemand helfen

[wadimwadim]

Versuchs mal so:
$PixelSearch = Pixelsearch(0,0,@DesktopWidth,@DesktopHeight,0xFFF FFF)
If Not @error Then
MouseClick ( "Left", $PixelSearch[0], $PixelSearch[1])
Else
MsgBox(0,"Ergebnis","Ich finde die Farbe nicht")
EndIf
sollte so besser sein

[emtec22]

danke aber warum noch eine 0 , dachte ich hätte mit @Desktop die perfekte Funktion

rennt nun danke dir

[emtec22]

HotKeySet("{END}","_exitit")

Func _exitit()
exit 0
EndFunc



WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")



sleep(2000)




$PixelSearch = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, "0x3E426D")
If Not @error Then
MouseClick ( "Left", $PixelSearch[0], $PixelSearch[1])
Else
Send("aaa")

EndIf

Habe nun mit Textmod mir ein Terrain erstellt das ich absuchen kann. Problem ist nun ich möchte den char solange drehen bis er dann die Farbe sieht.

Ich dachte an eine Do oder while schleife , bekomme es aber nicht hin das er dann immer wieder erst pixel checkt falls nicht eben aaa drücken und wenn er den pixel gefunden hat soll die Funktion stoppen.

[wadimwadim]

While <expression>
statements
...
WEnd

Hilfe einfach lesen...

HotKeySet("{END}","_exitit")

Func _exitit()
exit 0
EndFunc

WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")
sleep(2000)

While True
$PixelSearch = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, 0x3E426D)
If Not @error Then
MouseClick ( "Left", $PixelSearch[0], $PixelSearch[1])
Else
Send("a")
EndIf
Wend