Jump to content
Sign in to follow this  
hawky

Please help whit position send.

Recommended Posts

hawky

if we use this script and we press end for the position.

if you press send he dont take the position but i go to position (0, 0) can someone help me ?:)

; ----------------------------------------------------------------------------
;
; Autoklikker v1.0
; Author:         Hawky, SuMMeRNiGHt
;
; ----------------------------------------------------------------------------
;*********************************************|GUI|*********************************************
#include <GUIConstants.au3>
Global $sendf1
HotKeySet("{ESC}", "Terminate")
HotKeySet("{HOME}", "startp")
HotKeySet("{End}", "GetPos")
Opt("GUIOnEventMode",1)
GUICreate ( "asdf ", 300, 160)
GUICtrlCreatePic("C:\back.jpg",0,0,300,90,$WS_EX_TRANSPARENT) 
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
$1 = GUICtrlCreateLabel ( "asdf", 20, 10, 265, 15)
$2 = GUICtrlCreateLabel ( "", 20, 25, 265, 15)
$3 = GUICtrlCreateLabel ( "asdf", 20, 40, 265, 15)
$4 = GUICtrlCreateLabel ( "asdf", 20, 55, 265, 12)
$5 = GUICtrlCreateLabel ( "asdf", 20, 70, 265, 15)
$6 = GUICtrlCreateInput ("", 20, 85, 30, 15)
$7 = GUICtrlCreateInput ("", 65, 85, 30, 15 )
$8 = GUICtrlCreateLabel ( ",", 53, 85, 10, 15)
$9 = GUICtrlCreateLabel ( "asdf", 20, 135, 265, 15)
$send = GUICtrlCreateButton ( "START", 20, 105, 75)
GUICtrlSetOnEvent($send,"startp")
GUISetState(@SW_SHOW)

    $x = $6
    $y = $7
    
While 1
    Sleep(100)
    if $sendf1 == "1" Then 
MouseClick( "left", $6, $7, 1, 5)
Send("{enter}")
sleep(21000)
Send("{F5}")
sleep(1000)

    EndIf
WEnd

Func Terminate()
    Exit 0
EndFunc


Func startp()
  if $sendf1 == "1" Then
    $sendf1="0"
  else 
    $sendf1="1"
EndIf
EndFunc

Func pauze()
    
Endfunc

Func GetPos()
    $pos = MouseGetPos()
    GUIctrlSetData($x,$pos[0]) 
    GUIctrlSetData($y,$pos[1]) 
    $x = $6
    $y = $7
EndFunc


Func CLOSEClicked()
exit
EndFunc
Func EndScript()
Exit
EndFunc

tankss

Edited by hawky

Share this post


Link to post
Share on other sites
Paulie

The problem is here:

Replace this (Line 36)

MouseClick( "left", $6, $7, 1, 5)

With This

MouseClick( "left", GuiCtrlRead($6), GuiCtrlRead($7), 1, 5)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×