Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 16:24

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



2 Scripts miteinander verbinden

Discussion on 2 Scripts miteinander verbinden within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
´Romka's Avatar
 
elite*gold: 10
Join Date: Dec 2008
Posts: 772
Received Thanks: 175
2 Scripts miteinander verbinden

Hallo
ich will mall wissen wie ich diese 2 Skripts verbinden kann
Code:
#include <GUIConstants.au3>  
$Form1 = GUICreate("Multi Bot by .FreakY", 250, 250, 200, 200)
$Button3 = GUICtrlCreateButton("AN", 45, 135, 161, 33, 0)
$Button4 = GUICtrlCreateButton("AUS", 45, 175, 161, 33, 0)
$label2=GuiCtrlCreateLabel("AutoAtack",100,115,101,15)
GUISetState(@SW_SHOW) 
guictrlsetstate($button4,$gui_disable)
$state = false 
While 1
	$nMsg = GUIGetMsg() 
	Switch $nMsg 
		Case $GUI_EVENT_CLOSE 
		case $button3  
			guictrlsetstate($button4,$gui_enable) 
			guictrlsetstate($button3,$gui_disable)
			ToolTip("") 
			$state = true 
		case $button4
			guictrlsetstate($button3,$gui_enable) 
			guictrlsetstate($button4,$gui_disable)
			$state = false
		EndSwitch
		if $state =true then
			send ("{*}")
			sleep(10)
		endif
		
WEnd
Code:
#include <GUIConstants.au3>  
$Form1 = GUICreate("Multi Bot by .FreakY", 250, 250, 200, 200)
$Button1 = GUICtrlCreateButton("AN ", 45, 23, 161, 33, 0)
$Button2 = GUICtrlCreateButton("AUS", 45, 59, 161, 33, 0)
$label1=GuiCtrlCreateLabel("PicUp",110,2,100,15)
GUISetState(@SW_SHOW) 
guictrlsetstate($button2,$gui_disable)
$state = false 
While 1
	$nMsg = GUIGetMsg() 
	Switch $nMsg 
		Case $GUI_EVENT_CLOSE 
		case $button1
			guictrlsetstate($button2,$gui_enable)
			guictrlsetstate($button1,$gui_disable) 
			ToolTip("") 
			$state = true 
		case $button2 
			guictrlsetstate($button1,$gui_enable) 
			guictrlsetstate($button2,$gui_disable)
			$state = false 
		EndSwitch 
		if $state = true Then 
			send("{^}")
			sleep(10) 
		endif 
 
WEnd
Bitte um schnelle Hilfe
MfG
.FreakY
´Romka is offline  
Old 02/24/2010, 22:42   #2
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,147
Änder mal die GUI, aber wenn du 2 GUIs in einem Script verwendet möchtest musst du den wreiterten GUIGetMsg Modus verwenden:

PHP Code:
#include <GUIConstants.au3>

#Region GUI 1
$Form1 GUICreate("Multi Bot by .FreakY"2502502500)
$Button3 GUICtrlCreateButton("AN"45135161330)
$Button4 GUICtrlCreateButton("AUS"45175161330)
$label2=GuiCtrlCreateLabel("AutoAtack",100,115,101,15)
GUISetState(@SW_SHOW)
#EndRegion GUI 1

#Region GUI 2
$Form2 GUICreate("Multi Bot by .FreakY"25025000)
$Button1 GUICtrlCreateButton("AN "4523161330)
$Button2 GUICtrlCreateButton("AUS"4559161330)
$label1=GuiCtrlCreateLabel("PicUp",110,2,100,15)
GUISetState(@SW_SHOW)
#EndRegion GUI 2

$state false

While 1
    $nMsg 
GUIGetMsg(1)
    Switch 
$nMsg[1]
        Case 
$Form1
            
Switch $nMsg[0]
                Case 
$GUI_EVENT_CLOSE
                    
Exit
                case 
$button3
                    guictrlsetstate
($button4,$gui_enable)
                    
guictrlsetstate($button3,$gui_disable)
                    
ToolTip("")
                    
$state true
                
case $button4
                    guictrlsetstate
($button3,$gui_enable)
                    
guictrlsetstate($button4,$gui_disable)
                    
$state false
            
EndSwitch
        Case 
$Form2
            
Switch $nMsg[0]
                Case 
$GUI_EVENT_CLOSE
                    
Exit
                case 
$button1
                    guictrlsetstate
($button2,$gui_enable)
                    
guictrlsetstate($button1,$gui_disable)
                    
ToolTip("")
                    
$state true
                
case $button2
                    guictrlsetstate
($button1,$gui_enable)
                    
guictrlsetstate($button2,$gui_disable)
                    
$state false
            
EndSwitch
    EndSwitch
    if 
$state true Then
        send
("{^}")
        
sleep(10)
    endif
WEnd 
Sieht aber sinnlos aus
KDeluxe is offline  
Thanks
1 User
Reply


Similar Threads Similar Threads
moin miteinander =D
08/23/2010 - Say Hello - 9 Replies
blah
2 Computer miteinander verbinden
08/22/2010 - Main - 6 Replies
Hi an alle ;) Ich wollte mal fragen ob es möglich ist meinen PC mit einem anderen PC über ein Lan- bzw Crossover-Kabel zu Verbinden. Das alles hat nicht mit Internet zu tun... ich möchte nur zb ein Programm was für 2 Computer ist benutzen können, dazu muss das Programm auf beiden Rechnern installiert sein und es muss eine Verbindung zwischen den beiden PC's sein. Nochmal: Ich möchte nicht den einen PC als Router für i-netoder so benutzen, Internet brauche ich in der Zeit nicht!! ...
Accounts miteinander verknüpfen
08/02/2010 - WarRock - 13 Replies
Kann mir einer sagen(mit Link pls) wie ich zwei Accounts miteinander verknüpfen kann? -Danke-



All times are GMT +2. The time now is 16:24.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.