+- BorderGame (https://www.bordergame.it)
+-- Forum: NosTale (/Forum-NosTale)
+--- Forum: Domande e Risposte (/Forum-Domande-e-Risposte)
+--- Discussione: ExP/JoB Bot :() (/Thread-ExP-JoB-Bot)
ExP/JoB Bot :() - SCL - 18-08-2011 08:16 PM
raga, chi mi rimette insensto stò exp/job bot? xDD non me va..
lol..
io lo fatto in background.. se riuscite va bene anche no bg xD
Il bot e questo:
#RequireAdmin
HotKeySet("{F1}", "Avvia")
HotKeySet("{ESC}","ESCI")
HotKeySet("{F2}","Pausa")
$Title = "NosTale"
HotKeySet("{F}", "Avvia")
HotKeySet("{ESC}","ESCI")
HotKeySet("{F2}","Pausa")
$Title = "NosTale"
While 1
ToolTip("NosBot by SCL - F1 starta bot- F2 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
Sleep(30)
WEnd
Func Avvia()
ToolTip("NosBot by SCL - F2 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
While 1
ControlSend($Title, "", "", "{1}")
sleep(350)
ControlSend($Title, "", "", "{1}")
Sleep(350)
ControlSend($Title, "", "", "{2}")
sleep(350)
ControlSend($Title, "", "", "{2}")
Sleep(350)
ControlSend($Title, "", "", "{3}")
sleep(350)
ControlSend($Title, "", "", "{3}")
Sleep(350)
WEnd
EndFunc
Func Pausa()
sleep (30000)
EndFunc
Func ESCI()
Exit 0
Func Bot_Job()
While 1
ToolTip("NosBot by SCL - F1 starta bot- F2 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
Sleep(30)
WEnd
Func Avvia()
ToolTip("NosBot by SCL - F2 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
ControlSend($WinTitle, "", "", "z")
Sleep(500)
ControlSend($WinTitle, "", "", "z")
Sleep(500)
ControlSend($WinTitle, "", "", "z")
Sleep(500)
ControlSend($WinTitle, "", "", "z")
Sleep(500)
WEnd
EndFunc
Func Ferma_Bot()
While 1
Sleep(100)
WEnd
EndFunc
RE: ExP/JoB Bot :() - Narutomega96 - 18-08-2011 08:55 PM
Codice PHP:
#RequireAdmin
HotKeySet("{F1}", "Avvia")
HotKeySet("{ESC}","ESCI")
HotKeySet("{F3}","Pausa")
HotKeySet("{F2}","Avvia1")
$Title = "NosTale"
While 1
ToolTip("NosBot by SCL - F1 starta bot[EXP], F2 starta bot[JOB]- F3 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
Sleep(100)
WEnd
Func Avvia()
ToolTip("NosBot by SCL - F3 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
While 1
ControlSend($Title, "", "", "{SPACE}")
sleep(350)
ControlSend($Title, "", "", "1")
Sleep(350)
ControlSend($Title, "", "", "2")
sleep(350)
ControlSend($Title, "", "", "2")
Sleep(350)
ControlSend($Title, "", "", "{SPACE}")
sleep(350)
ControlSend($Title, "", "", "3")
Sleep(350)
WEnd
EndFunc
Func Pausa()
sleep (30000)
EndFunc
Func ESCI()
Exit 0
EndFunc
Func Avvia1()
While 1
ToolTip("NosBot by SCL - F3 stoppa solo per 30 secondi ed ESC per farlo fermare.Enjoy!",0,0)
ControlSend($Title, "", "", "z")
Sleep(500)
ControlSend($Title, "", "", "z")
Sleep(500)
ControlSend($Title, "", "", "z")
Sleep(500)
ControlSend($Title, "", "", "z")
Sleep(500)
WEnd
EndFunc
Ecco ora funziona
P.s : Se hai altri problemi mandami pm
RE: ExP/JoB Bot :() - SCL - 18-08-2011 09:28 PM
Naruto, credo di aver riscontrato un errore xD
Nel senso provandolo preme tasti "1", "2", "3".. però quando finisce di killare si blocca xD per questo bisogna dare una piccola modifica
RE: ExP/JoB Bot :() - andreaparavani - 10-02-2012 04:25 PM
ormai questo programma con nostale nn va piu
RE: ExP/JoB Bot :() - doddo978 - 10-02-2012 04:56 PM
andrea cavolata funziona benissimo solo che deve inserire questo codice alla fine
Spoiler:
RE: ExP/JoB Bot :() - Narutomega96 - 10-02-2012 05:05 PM
@[doddo978] Questo non è AcTool...
@[andreaparavani] devi cambiare il nome della finestra a cui manda i comandi($Title) da "NosTale" a "Nostale"
RE: ExP/JoB Bot :() - doddo978 - 10-02-2012 05:19 PM
@[Narutomega96] non so tè ma io mettendo $restart mi funziona e non cn actool ma cn visualstudio 2010!
...
RE: ExP/JoB Bot :() - Narutomega96 - 10-02-2012 05:36 PM
:|
Il linguaggio scritto sopra è AutoIt..
RE: ExP/JoB Bot :() - Clover - 11-02-2012 04:00 PM
(10-02-2012 04:25 PM)andreaparavani Ha scritto: ormai questo programma con nostale nn va piu
Non spammiamo su discussioni vecchie di 5 mesi e oltre :l
Ti meriteresti un avvertimento per necropost, ma per questa volta sono buona dato che sei un nuovo utente.
Narutomega e Doddo per discutere esistono i pm o contattarsi in privato.
