probleme mit MouseClickPlus

[bladerofdarknes]

hallo com, ich suche hilfe bei meinem script (hier ein ausschnitt) die stelle soll einfach ein paar koords anklicken

PHP Code:

#RequireAdmin
#include <MouseClickPlus.au3>

Opt("MouseClickDelay", 1)
Opt("MouseCoordMode", 0)


MsgBox("info", "info", "zum beenden F1 drücken!")
HotKeySet("{F1}", "ende")
WinWaitActive("METIN2")

While 1
ToolTip("it works!", "", "")
sleep(10)
_MouseClickPlus("METIN2", "left", 735, 572, 1)
sleep(10)
_MouseClickPlus("METIN2", "left", 670, 534, 1)
sleep(10)
_MouseClickPlus("METIN2", "left", 401, 362, 1)
sleep(10)
_MouseClickPlus("METIN2", "left", 361, 349, 1)
WEnd

Func ende()
    Exit
EndFunc 


hier der inhalte der MouseClickPlus:

PHP Code:

;===============================================================================
  ;
  ; Function Name:  _MouseClickPlus()
  ; Version added:  0.1
  ; Description:    Sends a click to window, not entirely accurate, but works
  ;                 minimized.
  ; Parameter(s):   $Window     =  Title of the window to send click to
  ;                 $Button     =  "left" or "right" mouse button
  ;                 $X          =  X coordinate
  ;                 $Y          =  Y coordinate
  ;                 $Clicks     =  Number of clicks to send
  ; Remarks:        You MUST be in "MouseCoordMode" 0 to use this without bugs.
  ; Author(s):      Insolence <insolence_9@yahoo.com>
  ;
  ;===============================================================================
 Func _MouseClickPlus($Window, $Button = "left", $X = "", $Y = "", $Clicks = 1)
    Local $MK_LBUTTON       =  0x0001
    Local $WM_LBUTTONDOWN   =  0x0201
    Local $WM_LBUTTONUP     =  0x0202

    Local $MK_RBUTTON       =  0x0002
    Local $WM_RBUTTONDOWN   =  0x0204
    Local $WM_RBUTTONUP     =  0x0205

    Local $WM_MOUSEMOVE     =  0x0200

    Local $i                = 0

    Select
    Case $Button = "left"
       $Button     =  $MK_LBUTTON
       $ButtonDown =  $WM_LBUTTONDOWN
       $ButtonUp   =  $WM_LBUTTONUP
    Case $Button = "right"
       $Button     =  $MK_RBUTTON
       $ButtonDown =  $WM_RBUTTONDOWN
       $ButtonUp   =  $WM_RBUTTONUP
    EndSelect

    If $X = "" OR $Y = "" Then
       $MouseCoord = MouseGetPos()
       $X = $MouseCoord[0]
       $Y = $MouseCoord[1]
    EndIf

    For $i = 1 to $Clicks
       DllCall("user32.dll", "int", "SendMessage", _
          "hwnd",  WinGetHandle( $Window ), _
          "int",   $WM_MOUSEMOVE, _
          "int",   0, _
          "long",  _MakeLong($X, $Y))

       DllCall("user32.dll", "int", "SendMessage", _
          "hwnd",  WinGetHandle( $Window ), _
          "int",   $ButtonDown, _
          "int",   $Button, _
          "long",  _MakeLong($X, $Y))

       DllCall("user32.dll", "int", "SendMessage", _
          "hwnd",  WinGetHandle( $Window ), _
          "int",   $ButtonUp, _
          "int",   $Button, _
          "long",  _MakeLong($X, $Y))
    Next
 EndFunc




 Func _MakeLong($LoWord,$HiWord)
    Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
 EndFunc 


[HardCore.1337]

METIN2 ist glaube nicht der Titel der Anwendung.
Der Titel heißt anderes, ich weiß aber nicht genau wie.

[bladerofdarknes]

hab wo gelesen das es den gleichen effekt haben soll wie controlclick, also kann es ja bei metin2 nicht gehen oder?
wollte das schon mit meinen dürftigen C# kentnissen machen aber das endet nicht gut ;D

[HOLYsw]

Ps= das war nur müll was ich geschrieben hab

[bladerofdarknes]

jojo egal, ich habe gerade etwas zeit und hatte mir wegen hardcore.1337 ja schon einmal delphi angeschaut und war eigentlich relativ fasziniert von den möglichkeiten, probiere es gerade damit zu machen

[HardCore.1337]

[bladerofdarknes]

ahh danke, viele dank =)
könntest du mich eventuell später für so 20 min supporten? ich habe irgendwie immer das selbe problem mit (lazerus) delphi..
wäre super