|
You last visited: Today at 15:15
Advertisement
Problem im Bot Bitte Helfen
Discussion on Problem im Bot Bitte Helfen within the AutoIt forum part of the Coders Den category.
03/27/2010, 10:57
|
#1
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
Problem im Bot Bitte Helfen
Hi com
Also ich wollte mir gestern und heute einen Levelbot für Nostale machen
und dann hab ich den halt gescriptet..xD also ich bin nicht grade sehr gut in AutoIt und deshalb brauch ich hilfe.
also so sie der aus...
Code:
GuiCreate("Easy Nostale LvL Bot",311,239,278,136)
$button1=GuiCtrlCreateButton("Start",8,30,298,30)
$button2=GuiCtrlCreateButton("Stop",9,68,298,28)
$button3=GuiCtrlCreateButton("Start",9,125,298,27)
$button4=GuiCtrlCreateButton("Stop",9,161,297,28)
$button5=GuiCtrlCreateButton("Exit",9,200,298,32)
$label1=GuiCtrlCreateLabel("Pick Up Starten",70,10,121,15)
$label2=GuiCtrlCreateLabel("Auto Attack",78,107,100,15)
GuiSetState()
While 1
$msg=GuiGetMsg()
If $msg=-3 Then Exit
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
If $msg=$button3 Then button3()
If $msg=$button4 Then button4()
If $msg=$button5 Then button5()
Wend
Func button1()
While(1)
sleep(500)
send("x")
WEnd
EndFunc
Func button2()
;Soll die Funktion von Button1 Stoppen
EndFunc
Func button3()
While(1)
sleep(1200)
send(" ")
WEnd
EndFunc
Func button4()
;Soll die Funktion von Button3 Stoppen
EndFunc
Func button5()
;Soll das Programm schließen
EndFunc
bitte helft mir ich habe keine ahnung wie man was stoppt oda so und weiß auch nicht wircklich wie ich den Bot dann schließe.
Thx gibts für jeden der mir hilft oben drauf.XD
|
|
|
03/27/2010, 11:00
|
#2
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
Also das Programm wird mit
Beendet.
Wie man eine Funktion allerdings beendet, weiß ich nicht.
|
|
|
03/27/2010, 11:08
|
#3
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
@General Desert
also thx kriegst du schonmal...
bloß..ich glaube das prog geht dann nua aus
wenn ich die funktionen beende weil sonst hat mir das auch
nicht sehr viel gebracht
|
|
|
03/27/2010, 11:17
|
#4
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
Quote:
Func button5()
;Soll das Programm schließen
EndFunc
|
Es gibt eine Möglichkeit, aber ich weiß nicht ob dir die so gefällt.
Psoudo Code
PHP Code:
HotKeySet("A", "Ende")
AdlibEnabled("Start", 10000) ;Die Funktion wird jetzt aller 1000sek aufgerufen. Vlt ungünstig
Func Start() ;Deine Funktion EndFunc
Func Ende() AdlibDisable("Start") EndFunc
So gehts theoretisch
|
|
|
03/27/2010, 11:21
|
#5
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
ne also ich möchte nur mit den buttons arbeiten mit hotkeys will ich
erst später arbeiten
|
|
|
03/27/2010, 11:23
|
#6
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
Ja, dann legest du die Ende() Funktion halt auf den Button
PHP Code:
if $msg = $Button2 then Ende()
|
|
|
03/27/2010, 11:27
|
#7
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
sry falls ich dich nerve aba ich bin nicht grade der hellste
kannst du mir vllt zeigen wo ganz genau?
|
|
|
03/27/2010, 11:43
|
#8
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
PHP Code:
GuiCreate("Easy Nostale LvL Bot",311,239,278,136) $button1=GuiCtrlCreateButton("Start",8,30,298,30) $button2=GuiCtrlCreateButton("Stop",9,68,298,28) $button3=GuiCtrlCreateButton("Start",9,125,298,27) $button4=GuiCtrlCreateButton("Stop",9,161,297,28) $button5=GuiCtrlCreateButton("Exit",9,200,298,32) $label1=GuiCtrlCreateLabel("Pick Up Starten",70,10,121,15) $label2=GuiCtrlCreateLabel("Auto Attack",78,107,100,15) GuiSetState()
While 1 $msg=GuiGetMsg() If $msg=-3 Then Exit If $msg=$button1 Then AdlibEnabled("Button1", 10000);Ruft die Funktion aller 1000sek auf If $msg=$button2 Then Ende1() If $msg=$button3 Then AdlibEnabled("Button3", 10000) If $msg=$button4 Then Ende2() If $msg=$button5 Then button5() Wend
Func button1() While(1) sleep(500) send("x") WEnd EndFunc
Func button2() AdlibDisable("Button1") EndFunc
Func button3() While(1) sleep(1200) send(" ") WEnd EndFunc
Func button4() AdlibDisable("Button3") EndFunc
Func button5() Exit 1 EndFunc
|
|
|
03/27/2010, 11:47
|
#9
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
ich habe den code jetzt getestet doch da stand bei autoit dann error und so
also ich konnte den nicht benutzen...??????
€:also diese funktion gibt es nicht
|
|
|
03/27/2010, 11:50
|
#10
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
du hast die GUI UDF´s nicht included.
Füge das ganz ganz oben noch ein
PHP Code:
#include <GUIConstantsEx.au3> #include <WindowsConstants.au3>
Was kommt sonst noch für ein Fehler? Ich habs nicht gestestet
|
|
|
03/27/2010, 11:54
|
#11
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
hat trotzdem nicht funktioniert???
€: also das adlib oda so ist dann ja auch nicht blau
|
|
|
03/27/2010, 11:56
|
#12
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
da hab ichs falsch geschrieben.
Schau mal in die Hilfe. Das muss irgendwie AdlibEnabled und AdlibDisabled heißen.
|
|
|
03/27/2010, 12:07
|
#13
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
ok warte mach ich
€: also AdlibEnabled und Disable gibts dort nicht
aber ich habe ControlEnable und Disable gefunden doch hat auch nicht viel gebracht...????
|
|
|
03/27/2010, 12:16
|
#14
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
|
|
|
03/27/2010, 12:37
|
#15
|
elite*gold: 0
Join Date: Feb 2010
Posts: 191
Received Thanks: 21
|
hat trotzdem nichts gebracht????
also gibts trotzdem nicht
|
|
|
 |
|
Similar Threads
|
Problem.Bitte helfen.
04/25/2010 - Metin2 Private Server - 0 Replies
Hey
Ich habe ein problem mit der portmap.also.ich hab server usw. alles on auch alle ports in der portmap , aber nach einiger zeit schalten sich immer 3 ports aus und dnan is login off und das geht immer wieder so.kann mir vllt. jemand weiterhelfen , damit das weggeht?
|
Hab ein Problem, bitte helfen :(
04/23/2010 - Metin2 Private Server - 2 Replies
Also, ich hab meinen Server, will der FreeBSD Console drauf installiere, aber er sagt, dass das net geht, aulso glaub ich, dass ich die 2003 Version brauche, kann die mir jemand zum download zur verfügung stellen, und wenn ich mit Sun Box mache, die wird irgendwie net richtig installiert, wer mir helfen kann, bekommt ein dickes THX :)
|
Problem bitte helfen ;D
10/12/2009 - Metin2 Private Server - 1 Replies
sers habe dass problem dass beim starten des servers nach .-start
connetcion refused kommt und zwar unendlich also es hört nicht mehr auf
weiss da jmd was
danke
|
Problem bitte helfen!
06/07/2009 - Metin2 Private Server - 1 Replies
hi
Wie die Überschrift es sagt hab ich ein Problem
Und zwar was hat das zu bedeuten?
http://img38.imageshack.us/img38/7729/4365789.jpg
Sry dass ich schon wieder ein Thread aufmach jedoch beim
Probleme mit den PServern antwortet mir keiner -.-
|
All times are GMT +1. The time now is 15:19.
|
|