hallo an alle
ich brauche hilfe:
ich habe eine bot mit timer gescribtet, aber ich möchte dass man die zeit eingeben kann----> dass heißt man soll sebst bestimmen können wie lange der bot läuft
Mach ein Gui wo man eingeben kann wielange der bot laufen soll in Minuten Stunden whatever.....
Rechne das in Millisekunden um ....
Timer mit TimerDiff...
If TimerDiff = $Eingegebene_Zeit then exit
ja des mit den buttons haba ich schon gelöst aber ich habe ein anderes problem weil ich nocht weiß wie ich den buttons einzelne funktionen zuweisen kann:
hier der php code
PHP Code:
GUICreate("TIMER")
GUISetState (@SW_SHOW)
Opt("GUICoordMode",2)
GUICtrlCreateButton( "on", 20, 20, 90)
GUICtrlCreateButton( "off", 20, 20,90)
GUICtrlCreateInput( "HIER DIE ZEIT IN MILISEKUNDEN EINGEBEN", 20, 20, 200)
$begin = timerinit()
While 1
$msg = GUIGetMsg()
Wend
Global $Paused
while 2
Sleep(100)
WEnd
Func Start()
while True
$dif = TimerDiff($begin)
If Int ($dif) > 1800000 Then
ProcessClose ("metin2.bin")
Shutdown (5)
ElseIf $dif < (18000000) Then
Send(" 1 y 2 y 3 y 4 y")
EndIf
Sleep(60)
WEnd
EndFunc
Func pause()
$Paused = Not $Paused
While $Paused
Sleep(100)
WEnd
EndFunc
ich möchte dem button on die funktion start zuweisen und dem button of die funktion pause zuweisen... und in das eingabefeld soll die zeit in milisecunden eingegeben werden und wenn ich on drücke soll er dann die zeit bei timerdiff nehmen
also hier soll er wenn ich in das inputfeld 36000000 eingebe den befehl hinter ($diff) mit 36000000 belegen und nicht mit 18000000
GUICreate("TIMER")
GUICtrlCreateButton( "on", 20, 20, 90 )
GUICtrlCreateButton( "off", 20, 20,90)
GUICtrlCreateInput( "HIER DIE ZEIT IN MILISEKUNDEN EINGEBEN", 20, 20, 200)
GUISetState (@SW_SHOW)
$begin = timerinit()
While 1
$msg = GUIGetMsg()
Wend
Global $Paused
while 2
Sleep(100)
WEnd
Func Start()
while True
$dif = TimerDiff($begin)
If Int ($dif) > 1800000 Then
ProcessClose ("metin2.bin")
Shutdown (5)
ElseIf $dif < (18000000) Then
Send(" 1 y 2 y 3 y 4 y")
EndIf
Sleep(60)
WEnd
EndFunc
Func pause()
$Paused = Not $Paused
While $Paused
Sleep(100)
WEnd
EndFunc
hab den code etwas anschaulicher gemacht
trozdem sieht es so aus, als hättest du wahrlos copy&paste von verschiedenen programmen benutzt (falls nicht entschuldige ich mich für diesen ausdruck)
2 gleiche buttons auf einem haufen oO?
die option guicoordmode hat hier garkeinen sinn
while's behindern sich gegenseitig
warum um gottes willen willst du den shutdown befehl anwenden ?
sehr fraglich
sry das ist das erste mal mit buttons...damit habe ich null erfahrung
der shutdown befehl is dafür da dass sich der computer auschlatet, weil ich den bot nur geschrieben habe, damit ich lvl wenn ich in der schule bin und mir ab ca 11 uhr zu viele spieler on sind
----->gefahr gebannt zu werden
außerdem kann ich den bot laufen lassen wenn ich irgentwo hin gehe und ich muss mir keine sorgen machen dass der computer läuft und meine mudda ihn auschaltet da sie meint er verbraucht zu viel strom xD(750 watt nezteil ^^)
Func Button1Click()
global $Read = guictrlread ($Input1)
While (1)
$dif = TimerDiff($begin)
If Int ($dif) > $Read Then
ProcessClose ("metin2.bin")
Shutdown (5)
endif
if int ($dif) < $Read Then
Send(" 1 y 2 y 3 y 4 y" , 1)
EndIf
Sleep(100)
WEnd
EndFunc
Func Button2Click()
$Paused = Not $Paused
While $Paused
Sleep(100)
WEnd
EndFunc
Ich weiss das dein Problem schon gelöst ist, aber um es noch genauer zu bestimmen würde ich dir multi threading ans Herz legen. Den eigentlichen Bot öffnets du im ersten Thread und im Main Script läuft ne While mit Sleep 1.
Dann teils du den Mainscript über ne statische Variable mit welche Zeit gesetzt wurde und das Mainscript schließt dann den ersten Thread(also der in dem sich der Bot befindet) sobald die Zeit abgelaufen ist.
Klingt jetz zwar kompliziert ist aber die einzige auf Dauer wirklich funktionierende Lösung, wenn das Script nacher komplizierter wird.
danke das du ihn gemacht hast
obwohl ich leider dabei nix gelernt habe(aber durch studieren des scribtes werd ich es hoffentlich auch bald können ^^)
dafür gibt es ein thx von mir
und ein DANKE ^^
@Xereon ich schau gleich mal nach was des alles bedeutet und hoffe ich versteh es xD
aber trotzdem danke für deine hilfe ^^
ich habe jetzt noch ein problem:
wenn der bot läuft und ich off drücke pausiert der bot nicht...was soll ich machen???
(ich hab auch den befehl so verändert dass der bot sich schließen soll auber funzt auch ned)
[Sammelthread]Brauche hilfe/Biete hilfe beim p-server erstellen 07/07/2011 - Metin2 Private Server - 14 Replies Jeder einzelne um hilfe bittet bzw bietet.
Dafür muss nicht immer ein extra Thread eröffnet werden ;)
-Posted eure fragen
-Eure probleme
-Oder wenn ihr Hilfe anbietet
doch einfach hier hinein
[HILFE]Brauche hilfe beim FreeBSD Rootserver umbekannte Fehlermeldung. 09/09/2010 - Metin2 Private Server - 8 Replies Hallo comunity.
So, ich habe ja letztens schonmal was gefragt wegen dem kernel. Dem den rootserver gehört hat den den hoster eingeschreiben, die haben nun einen reinstall gemacht. So bis jetzt klappt alles, so wie es soll außer....das starten
Wenn wir den den server starten möchten, kommt das:
http://www.fotos-hochladen.net/uploads/unbenann11 tuptn6kfg.png
[Hilfe] Brauche Hilfe bei meinem Hamachi Server alles Fertig ausser Navicat und co. 08/07/2010 - Metin2 Private Server - 2 Replies Guten Tag,
Also ich habe heute mein Hamachi P-Server erstellt doch habe Paar Fragen.
Kann ich nachdem ich Server erstellt habe VPC schließen also da wo Operation timed out steht.
Wie kann ich das mit Navicat machen (wäre schön wenn einer alles einzeln beschreiben könnte).
Wie funktionert das mit der Datenbank?
Und wie erstelle ich Accounts?
Brauche Dringend Hilfe! Bin Metin spieler aber Brauche Hilfe 12/30/2009 - Metin2 Private Server - 0 Replies Es gehört hier zwar nicht rein , aber ich weiß keine andere Lösung
Ich habe seit einigen Tagen ein Problem...
Microsoft Windows Search Protocol Host funktioniert nicht mehr
Die Anwendung wird Aufgrund eines Problems nicht mehr richtig Ausgeführt.
Ich weiß nicht was das ist und wie ich es loswerde.