10 times ?

[motormad]

why doe it do this function so many times?

While 1                                                                                             ; //Initialize loop
    $msg = GUIGetMsg()                                                                              ; //Recive Input
    Select
        Case $msg = $GUI_EVENT_CLOSE ;or $msg = $Exit                                               ; //If the Exit or Close button is clicked, close the app.
            Exit    

    Case $msg = $B_1
            global $I 
    ShackEFist()

    Case $msg = $B_2
    Ghello()    
    
    Case $msg = $B_3
    MyLocation()

    Case $msg = $B_4
    DEEDS_Shout1()
    
    Case $msg = $B_5
    DEEDS_Shout2()

    EndSelect
WEnd

;----------------------------------------------------------------------------


Func ShackEFist()
 $I = $i+1  
 ConsoleWrite($i)
send("{ENTER}")
send("/test ")

EndFunc

[UEZ]

What is $B_1? A button?

Everytime when $msg = $B_1 the function ShackEFist() will be called!

Maybe you provide the whole script to get a better overview!

Br,

UEZ

[motormad]

expandcollapse popup

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Tabbed Notebook Dialog", 413, 298, 306, 241)
GUISetIcon("D:\005.ico")
$PageControl1 = GUICtrlCreateTab(8, 8, 396, 256)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TEST")
$B_1 = GUICtrlCreateButton("1", 32, 48, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_2 = GUICtrlCreateButton("2", 30, 86, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_3 = GUICtrlCreateButton("3", 30, 126, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_4 = GUICtrlCreateButton("4", 30, 166, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_5 = GUICtrlCreateButton("5", 30, 206, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("&OK", 166, 272, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("&Cancel", 246, 272, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("&Help", 328, 272, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

;~ While 1
;~ $nMsg = GUIGetMsg()
;~ Switch $nMsg
    
;~ Case $GUI_EVENT_CLOSE
;~ Exit

;~ Case $B_1
;~ ShackEFist()

;~ Case $B_2
;~ Ghello() 
    
;~ Case $B_3
;~ MyLocation()

;~ Case $B_4
;~ DEEDS_Shout1()
;~ Case $B_5
;~ DEEDS_Shout2()
;~ EndSwitch
;~ WEnd

While 1                                                                                             ; //Initialize loop
    $msg = GUIGetMsg()                                                                              ; //Recive Input
    Select
        Case $msg = $GUI_EVENT_CLOSE ;or $msg = $Exit                                               ; //If the Exit or Close button is clicked, close the app.
            Exit    

    Case $msg = $B_1
            global $I 
    ShackEFist()

    Case $msg = $B_2
    Ghello()    
    
    Case $msg = $B_3
    MyLocation()

    Case $msg = $B_4
    DEEDS_Shout1()
    
    Case $msg = $B_5
    DEEDS_Shout2()

    EndSelect
WEnd

;----------------------------------------------------------------------------


Func ShackEFist()
 $I = $i+1  
 ConsoleWrite($i)
send("{ENTER}")
send("/test ")

EndFunc

ok sorry

[water]

It's running fine here. I had to insert dummy functions for Ghello(), MyLocation(), DEEDS_Shout1() and DEEDS_Shout2().

Every time I press button "1" the variable $i is incremented by one and displayed on the console.

So: No error here

Edited November 15, 2010 by water

[UEZ]

It has something to do with the Send function but I don't know the reason why the function is called several times!

You can use send("{ENTER}", 1) instead!

Br,

UEZ

[motormad]

Thanx water and UEZ?

i wil use

send("{ENTER 1}")

but the problem is the same .

Ill try to find it tomorrow and let you know

[motormad]

Thanx water and UEZ?

i wil use

send("{ENTER 1}")

but the problem is the same .

Ill try to find it tomorrow and let you kn

[motormad]

expandcollapse popup

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Tabbed Notebook Dialog", 413, 298, 306, 241)
GUISetIcon("D:\005.ico")
;~ $PageControl1 = GUICtrlCreateTab(8, 8, 396, 256)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TEST")
$B_1 = GUICtrlCreateButton("1", 32, 48, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_2 = GUICtrlCreateButton("2", 30, 86, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_3 = GUICtrlCreateButton("3", 30, 126, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_4 = GUICtrlCreateButton("4", 30, 166, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
$B_5 = GUICtrlCreateButton("5", 30, 206, 353, 33, $WS_GROUP)
GUICtrlSetFont(-1, 9, 800, 0, "Tahoma")
;~ $TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
;~ $TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
;~ GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("&OK", 166, 272, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("&Cancel", 246, 272, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("&Help", 328, 272, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

;~ While 1
;~ $nMsg = GUIGetMsg()
;~ Switch $nMsg
    
;~ Case $GUI_EVENT_CLOSE
;~ Exit

;~ Case $B_1
;~ ShackEFist()

;~ Case $B_2
;~ Ghello() 
    
;~ Case $B_3
;~ MyLocation()

;~ Case $B_4
;~ DEEDS_Shout1()
;~ Case $B_5
;~ DEEDS_Shout2()
;~ EndSwitch
;~ WEnd

While 1                                                                                             ; //Initialize loop
    $msg = GUIGetMsg()                                                                              ; //Recive Input
    Select
        Case $msg = $GUI_EVENT_CLOSE ;or $msg = $Exit                                               ; //If the Exit or Close button is clicked, close the app.
            Exit    

    Case $msg = $B_1
            global $YYB
    ShackEFist()

    Case $msg = $B_2
    Ghello()    
    
    Case $msg = $B_3
    MyLocation()

    Case $msg = $B_4
    DEEDS_Shout1()
    
    Case $msg = $B_5
    DEEDS_Shout3()

    EndSelect
WEnd



Func ShackEFist()
 $YYB = $YYB+1  
 ConsoleWrite($YYB)
send("{ENTER 1}")
send("1")
send("{ENTER 2}")
send("2")
send("{ENTER 2}")
send("3")
send("{ENTER 2}")
send("4")
send("{ENTER 2}")
send("5")
send("{ENTER 2}")
send("6")
send("{ENTER 1}")
    
EndFunc

I cant find it ??

it makes the run 9 times ?

[BrewManNH]

Your problem is that the script is sending the Enter key every time you hit the ShakeFist button $B_1. What that is doing is it's clicking the last button you pressed, which happens to be the $B_1 button, so it just loops itself. You need to switch to the window that you want to send the keystrokes to before you actually start sending them. Otherwise, you're only interacting with your GUI.

[motormad]

OEPS

thanx