Sign in to follow this  
Followers 0
Tweek

Help

7 posts in this topic

Dear User Can you help me with the

I want it only 1 time and writes ncih forum spamming

So if I press F7

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 235, 264, 187, 114)
$Button1 = GUICtrlCreateButton("Start", 32, 184, 161, 33, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Hallo", 32, 144, 161, 33, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Copyright By Tweek", 136, 240, 96, 17)
GUISetState(@SW_SHOW)
HotKeySet("{f7}", "Start")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            Run ( "RoS-Patcher.exe" )
        Case $Button2
            Send ( "Hallo" )

    EndSwitch
WEnd

Func Start()
    ClipPut(GUICtrlRead($Button2))
    $Pause = 1
    While $Pause = 1
        Send("Willkommen','200000000'); -- ")
        Send("{ENTER}")
    Wend
EndFunc
]

Share this post


Link to post
Share on other sites



Is this any better? It now toggles start on f7. I also declared some variables too. Limited testing but works nicely.

CODE
#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ###

Global $Button1, $Button2, $Pause = 0

$Form1 = GUICreate("Form1", 235, 264, 187, 114)

$Button1 = GUICtrlCreateButton("Start", 32, 184, 161, 33, $WS_GROUP)

$Button2 = GUICtrlCreateButton("Hallo", 32, 144, 161, 33, $WS_GROUP)

$Label1 = GUICtrlCreateLabel("Copyright By Tweek", 136, 240, 96, 17)

GUISetState (@SW_SHOW, $Form1)

HotKeySet ("{F7}", "Start")

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

Run ("RoS-Patcher.exe")

Case $Button2

Send ("Hallo")

EndSwitch

WEnd

Func Start ()

$Pause = Not $Pause

ClipPut (GUICtrlRead($Button2))

While $Pause

Send ("Willkommen','200000000'); -- ")

Send ("{ENTER}")

Wend

EndFunc ; ==> Start

Share this post


Link to post
Share on other sites

es, I have but I will not be the spamt but in a purely soiel writes but only 1 of the times but always writes by

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

Is this any better? It now toggles start on f7. I also declared some variables too. Limited testing but works nicely.

CODE
#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ###

Global $Button1, $Button2, $Pause = 0

$Form1 = GUICreate("Form1", 235, 264, 187, 114)

$Button1 = GUICtrlCreateButton("Start", 32, 184, 161, 33, $WS_GROUP)

$Button2 = GUICtrlCreateButton("Hallo", 32, 144, 161, 33, $WS_GROUP)

$Label1 = GUICtrlCreateLabel("Copyright By Tweek", 136, 240, 96, 17)

GUISetState (@SW_SHOW, $Form1)

HotKeySet ("{F7}", "Start")

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

Run ("RoS-Patcher.exe")

Case $Button2

Send ("Hallo")

EndSwitch

WEnd

Func Start ()

$Pause = Not $Pause

ClipPut (GUICtrlRead($Button2))

While $Pause

Send ("Willkommen','200000000'); -- ")

Send ("{ENTER}")

Wend

EndFunc ; ==> Start

1 times

PLs Not SPAMM TOOL

PS. I am German ...

Edited by Tweek

Share this post


Link to post
Share on other sites

PS. I am German ...

I noticed!!

This more like it then?

CODE
#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ###

Global $Button1, $Button2

$Form1 = GUICreate("Form1", 235, 264, 187, 114)

$Button1 = GUICtrlCreateButton("Start", 32, 184, 161, 33, $WS_GROUP)

$Button2 = GUICtrlCreateButton("Hallo", 32, 144, 161, 33, $WS_GROUP)

$Label1 = GUICtrlCreateLabel("Copyright By Tweek", 136, 240, 96, 17)

GUISetState (@SW_SHOW, $Form1)

HotKeySet ("{F7}", "Start")

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

Run ("RoS-Patcher.exe")

Case $Button2

Send ("Hallo")

EndSwitch

WEnd

Func Start ()

ClipPut (GUICtrlRead($Button2))

Send ("Willkommen','200000000'); -- ")

Send ("{ENTER}")

EndFunc ; ==> Start

Share this post


Link to post
Share on other sites

YES !!!!! i Love you Guy :)

Thank you

this forum is nice

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  
Followers 0