NosTale LeveL-Bot

[Furkiii]

WIiizocker Kannst Du mIr ein bot erstellen
der soll dAs machen

- leertAste (soll im hinteRgrund auch laufen Können also das man nostalE minimiern kann)
- Ersoll aufHeben können jede 3sek
-er soll sich nach 3min hinsetzten
-Nach 1min aufstehen
-er soll jede 3,5min 1 drücken


kannst du mir den scrip dawon geben

Lg furkiIi

[WiiZocker]

ja ok, ich fange morgen an, hab im mom viel um die ohren...

[Furkiii]

Oke danke

kannst sagen wan du circa fertiqQ BiiisT

[WiiZocker]

Naja^^ habe ein problem, da ich das ganze skript neu schreiben muss,hab ich das getan nur funktionier es nicht.
Kann mir wer helfen den fehler zu finden?

$windowname = "NosTale"
$zeit1 = TimerInit()

HotKeySet("{ESC}", "Terminate")
If @error  Then
    MsgBox(4096, "Error", "Fenster konnte nicht gefunden  werden")
	
Else

$DL = 0 ;durchlauf

While 1
	If(ZeitZumSitzen()) Then
              Sitzen()
		  EndIf
		  
		  If(ZeitZumSammeln()) Then
               Sammeln()
			   
		   EndIf
		   
		   If(Angriff()) Then
              Angreifen()
		  EndIf
           
			
			If(Extra1Benutzen()) Then
               Extra1()
		  EndIf
			
			

$DL = $DL + 1

WEnd
EndIf



;---------Sitzen:

Func ZeitZumSitzen()
 If(TimerDiff($zeit1) > 180000) Then
         return True
    Else
        return False
    EndIf
EndFunc

Func Sitzen()
	 ControlSend($windowname, '', '', "C")
	 Sleep(60000)
	 ControlSend($windowname, '', '', "C")
	 $zeit1 = TimerInit()
EndFunc


;--------Sammeln:

Func ZeitZumSammeln()
 If(TimerDiff($zeit1) < 175000) Then
         return True
    Else
        return False
    EndIf
EndFunc


Func Sammeln()
	ControlSend($windowname, '', '', "X")
	 Sleep(3000)
	 ControlSend($windowname, '', '', "X")
	
	 EndFunc


;--------Angriff:

Func Angriff()
 If(TimerDiff($zeit1) < 175000) Then
         return True
    Else
        return False
    EndIf
EndFunc

Func Angreifen()
	ControlSend($windowname, '', '', " ")
	 Sleep(150)
	 ControlSend($windowname, '', '', " ")
	
	EndFunc

;------Extra1:

Func Extra1Benutzen()
 If(TimerDiff($zeit1) < 175000) Then
         return True
    Else
        return False
    EndIf
EndFunc


Func Extra1()
	 ControlSend($windowname, '', '', "1")
	 Sleep(3500)
	 ControlSend($windowname, '', '', "1")
	
	 EndFunc

;--------Beenden:

Func Terminate()
	Exit 0
	EndFunc

[¿Freaky¿]

Bei mir kommt kein Error, wo ist den dein Fehler

[WiiZocker]

Er lvlt einfach ned

[¿Freaky¿]

Das kommt, weil du nur 1 Timer für alles hast
Und bis 17 Minuten rum sind, dann kann es auch schon etwas dauern

[WiiZocker]

achso
Mal ändern

[WiiZocker]

So, der bot ist fertig und wie dus wolltest, schick ich dir den code.
Ich habe ihn ned getestet müsste aber funktionieren.Er sammelt aber die ganze zeit da sich sonst alles verzögert.

Den code schick ich per PM

[Furkiii]

das geht nicht da steht
Die Version der datei ist nicht mit der ausgeführten WIndows-Version kompatibel. Öffnen sie die systeminformationen des computers um zu überprüüfen ob eine x86-(32bit)-oder eine x64-(64Bit)- Version des programms erforderlich ist und wenden sie sich anschliseßen an den herausgeber der software.

[WiiZocker]

Hmmm welches betriebssystem hast du,32 oder 64 bit?
Sonst starte das im Kompatiblitäts modus^^

[Furkiii]

ich habe 32 bit *_*

[¿Freaky¿]

Wir wär es die datei vll erstmal zu entpacken ?

[WiiZocker]

lol xD ahm welches betriebssysten Furkiii?

Hab den fehler gefunden^^ mach bei diesen Variabeln Zeit1-4 noch

$Zeit5 = Timerinit()

[¿Freaky¿]

Unterlass bitte das andauernde Doppelpost.
#reported