|
You last visited: Today at 17:38
Advertisement
PROBLEM
Discussion on PROBLEM within the AutoIt forum part of the Coders Den category.
07/04/2009, 22:01
|
#1
|
elite*gold: 0
Join Date: Dec 2008
Posts: 128
Received Thanks: 25
|
PROBLEM
Hallo leute,
wieso funzt mien Script net?
Code:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 113, 95, 193, 125)
$Checkbox1 = GUICtrlCreateCheckbox("AutoAttack", 8, 8, 81, 17)
$Checkbox2 = GUICtrlCreateCheckbox("AutoPotten", 8, 24, 81, 17)
$Checkbox3 = GUICtrlCreateCheckbox("PickUp", 8, 40, 73, 17)
$Button1 = GUICtrlCreateButton("Start", 16, 64, 81, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
Case $Checkbox2
Case $Checkbox3
Case $Button1
start ()
EndSwitch
WEnd
Func start ()
WinActivate("METIN2")
If $Checkbox1=1 Then
While(1)
Send("{Space}")
WEnd
EndIf
If $Checkbox2=1 Then
While(1)
Send("{1}")
Sleep(100)
WEnd
EndIf
If $Checkbox3=1 Then
While(1)
Send("{y}")
Sleep(133)
WEnd
EndIf
EndFunc
|
|
|
07/04/2009, 22:17
|
#2
|
elite*gold: 20
Join Date: Oct 2008
Posts: 1,835
Received Thanks: 1,638
|
Quote:
Originally Posted by lucabest
Hallo leute,
wieso funzt mien Script net?
|
Code:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 113, 95, 193, 125)
$Checkbox1 = GUICtrlCreateCheckbox("AutoAttack", 8, 8, 81, 17)
$Checkbox2 = GUICtrlCreateCheckbox("AutoPotten", 8, 24, 81, 17)
$Checkbox3 = GUICtrlCreateCheckbox("PickUp", 8, 40, 73, 17)
$Button1 = GUICtrlCreateButton("Start", 16, 64, 81, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
start ()
EndSwitch
WEnd
Func start ()
WinActivate("METIN2")
If Guictrlread($Checkbox1) = 1 Then
While 1
Send("{Space}")
WEnd
EndIf
If Guictrlread($Checkbox2) = 1 Then
While 1
Send("{1}")
Sleep(100)
WEnd
EndIf
If Guictrlread($Checkbox3) = 1 Then
While 1
Send("{y}")
Sleep(133)
WEnd
EndIf
EndFunc
Hab das Script mal verbessert:
1. Case $Checkbox1 ist überflüssig
2. Du hast Guictrlread vergessen, sonst liest er die Checkboxen nicht aus
Ich geb dir noch nen Tipp:
Code:
While 1
Send("{Space}")
WEnd
Würd da noch nen Sleep einfügen.
|
|
|
Similar Threads
|
Metin 2 Pserver Problem/ Lösung für das Matrix Kartennummer Problem
01/04/2010 - Metin2 Private Server - 3 Replies
Hy Leute
Wie in der Überschrift genannt, hab ich gerade ein Problem mit meinem Metin 2Server.
Ich lasse ihn via Loopbackadapter laufen, funktioniert auch ganz gut.
Ich hab aber jetzt das Poblem, das in meinem Account nur noch Krieger mit Level null stehen.
Wie kann ich das Beheben??, das is auch manchmal da, wenn ich via Navicat n neuen Account mach. Hoffe einer hatt ne Lösung
Hab n Screenshot im Anhang
Aber ich hab ja auch ne Lösung für n anderes Problem.
Gestern hatte ich beim...
|
[Problem] Problem with server starting - cannot find quest index for PaxHeader
12/22/2009 - Metin2 Private Server - 1 Replies
Hello!
I have this same problem as here when i'm starting my server:
http://www.elitepvpers.com/forum/metin2-pserver-di scussions-questions/307143-metin2-serverfiles-ques t-index-fehler.html
But I didn't know the answer.. how to repair this?
Greetings
|
All times are GMT +2. The time now is 17:38.
|
|