[Wartune] E's AutoIt Scripts Daru Farmbot

12/25/2013 22:13 garryd2012#286
can anyone help me copt the files to the system32 i dont understand how?
12/25/2013 23:05 Headkill#287
for those not able to decompile the faun bot or any other auto-it executables here is the faun bot
01/02/2014 13:57 bedvira#288
Hello, i have problem.
1) Bot doesnt move in map. If i do it my hands and find mob then bot attacking(apeare knight) and run to mob. Idk what function there responsible for running around map.
2) After char come to mob and plate with the attack appears - nothing.
Im using Demon Slayer Russian version, and 1280х1024
Can u help me?
Maybe i can get answer:
1) $search_loot ...I see screen but i dont have this blue stripes in my game
2) Func portal ... Idk maybe in german version some portals...In russian version Erandel looking different (
Quote:
[Only registered and activated users can see links. Click Here To Register...]
)
And i trying Ewvyx bot, always got changing image Seaching for Wilds view/afk mode in left up corner and nothing happend no matter how I tried to change the coordinates
And can some1 tell me what coordinates i need put in bot window (City) what this mean?

Sry my english badly
01/02/2014 23:57 bushybush#289
it all works except it doesn't press the attack button. I read through all the postings and no one commented on that. I run it on 1366/768. can someone please help me?
01/03/2014 13:12 OptimusZero#290
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compile_Both=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; Drücke Esc um das Script zu beenden, Pause um es zu pausieren

Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d

;;;; Hier ist der Hauptteil des Programms ;;;;
;$Variabel = InputBox("Login", "Username:")
;$Variabe2 = InputBox("Login", "Passwort:")
;MsgBox(0, "Login", "Hallo " & $Variabel & " Sie haben sich erfolgreich eingeloggt!")
$size_y= 900
$size_x= 1500

$abstandx = @DesktopWidth-$size_x
$abstandy = @DesktopHeight-$size_y
;~ 75 x 90

$mob_x = (65 + ($abstandx/2))
$mob_y = (84 + ($abstandy/2))

$mob_x2 = (1323 + ($abstandx/2))

$mob_y2 = (776 + ($abstandy/2))

$cccount = 0

Func search_Mob()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0xFF0004 )
$cccount = $cccount + 1

If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0]+5, $search[1]+60, 1)
$search2 = PixelSearch( $search[0], $search[1], $search[0]+100, $search[1]+100, 0xD8D0C8 )
If IsArray($search2) Then
MouseClick("left")
sleep(2000)
$varc=1
EndIf
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird

$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampf"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)

EndIf
if($cccount > 100) Then
MouseMove(1498-90+($abstandx/2), 190-75+($abstandy/2), 1)
MouseClick("left")
sleep(500)
MouseMove(529-90+($abstandx/2), 700-75+($abstandy/2), 1)
MouseClick("left")
sleep(500)
MouseMove(488-90+($abstandx/2), 159-75+($abstandy/2), 1)
MouseClick("left")
$cccount=0
Endif

Return $vab;

EndFunc


Func kampf()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 515+($abstandx/2), 785+($abstandy/2), 980+($abstandx/2), 845+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{1}")
Send("{2}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif


Elseif $countdown > 5 Then
;~ nicht kampf
$vab = false;
$countdown = 0

ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func Portal()
;~ Wenn ein ausgang gesehen wird in gegengestzter richtung drücken
$search = PixelSearch( 415-90+($abstandx/2), 180-75+($abstandy/2), 1350-90+($abstandx/2), 918-75+($abstandy/2), 0x070906 )
If IsArray($search) Then
$movey=460
$movex=860
if($search[0] < 700) Then
$movex = 1000
Else
$movex = 600
EndIf

if($search[1] < 300) Then
$movey = 650
Else
$movex = 350
EndIf


MouseMove($movex, $movey, 1)
MouseClick("left")
Else
MouseClick("left",Random(439,1309,1),Random(273,76 0,1))
Sleep(1000)
EndIf
EndFunc
Sleep(5000)
While 1
Sleep(300)
If $vab == "kampf" Then
$vab = kampf();
Else
$vab = search_Mob()
EndIf
WEnd
;;;;;;;;

Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)

WEnd
ToolTip("")
EndFunc

Func Terminate()
Exit 0
EndFunc

Func ShowMessage()
MsgBox(4096,"","Das ist eine Nachricht.")
EndFunc








Copy this script...... and compile through AutoIT...... this will Sylph farm perfectly.....


It should help.
01/04/2014 17:44 refused20#291
Quote:
Originally Posted by OptimusZero View Post
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compile_Both=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; Drücke Esc um das Script zu beenden, Pause um es zu pausieren

Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d

;;;; Hier ist der Hauptteil des Programms ;;;;
;$Variabel = InputBox("Login", "Username:")
;$Variabe2 = InputBox("Login", "Passwort:")
;MsgBox(0, "Login", "Hallo " & $Variabel & " Sie haben sich erfolgreich eingeloggt!")
$size_y= 900
$size_x= 1500

$abstandx = @DesktopWidth-$size_x
$abstandy = @DesktopHeight-$size_y
;~ 75 x 90

$mob_x = (65 + ($abstandx/2))
$mob_y = (84 + ($abstandy/2))

$mob_x2 = (1323 + ($abstandx/2))

$mob_y2 = (776 + ($abstandy/2))

$cccount = 0

Func search_Mob()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0xFF0004 )
$cccount = $cccount + 1

If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0]+5, $search[1]+60, 1)
$search2 = PixelSearch( $search[0], $search[1], $search[0]+100, $search[1]+100, 0xD8D0C8 )
If IsArray($search2) Then
MouseClick("left")
sleep(2000)
$varc=1
EndIf
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird

$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampf"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)

EndIf
if($cccount > 100) Then
MouseMove(1498-90+($abstandx/2), 190-75+($abstandy/2), 1)
MouseClick("left")
sleep(500)
MouseMove(529-90+($abstandx/2), 700-75+($abstandy/2), 1)
MouseClick("left")
sleep(500)
MouseMove(488-90+($abstandx/2), 159-75+($abstandy/2), 1)
MouseClick("left")
$cccount=0
Endif

Return $vab;

EndFunc


Func kampf()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 515+($abstandx/2), 785+($abstandy/2), 980+($abstandx/2), 845+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{1}")
Send("{2}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif


Elseif $countdown > 5 Then
;~ nicht kampf
$vab = false;
$countdown = 0

ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func Portal()
;~ Wenn ein ausgang gesehen wird in gegengestzter richtung drücken
$search = PixelSearch( 415-90+($abstandx/2), 180-75+($abstandy/2), 1350-90+($abstandx/2), 918-75+($abstandy/2), 0x070906 )
If IsArray($search) Then
$movey=460
$movex=860
if($search[0] < 700) Then
$movex = 1000
Else
$movex = 600
EndIf

if($search[1] < 300) Then
$movey = 650
Else
$movex = 350
EndIf


MouseMove($movex, $movey, 1)
MouseClick("left")
Else
MouseClick("left",Random(439,1309,1),Random(273,76 0,1))
Sleep(1000)
EndIf
EndFunc
Sleep(5000)
While 1
Sleep(300)
If $vab == "kampf" Then
$vab = kampf();
Else
$vab = search_Mob()
EndIf
WEnd
;;;;;;;;

Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)

WEnd
ToolTip("")
EndFunc

Func Terminate()
Exit 0
EndFunc

Func ShowMessage()
MsgBox(4096,"","Das ist eine Nachricht.")
EndFunc








Copy this script...... and compile through AutoIT...... this will Sylph farm perfectly.....


It should help.
Thanks for sharing sir, it's working great..
01/04/2014 22:56 OptimusZero#292
Quote:
Originally Posted by refused20 View Post
Thanks for sharing sir, it's working great..
Np, your welcome :mofo:
01/04/2014 23:10 Movida123#293
Quote:
Originally Posted by OptimusZero View Post
Np, your welcome :mofo:
Its working good, just a question, we cant go afk with it right? I tried but after It kills 1 monster, appears the 'click to continue playing' message and it doesnt automatically click, Is it me or does it require us to be there to click it after each kill?

Thanks for the script
01/05/2014 19:53 OptimusZero#294
GO Afk what i do is pin the exe to my taskbar.

1 - minimize quest side on right
2 - click exe script
3 - hit fullscreen and allow before it starts up and go have a shower
4 - the browser window must be left open though on screen
01/05/2014 21:44 Movida123#295
Quote:
Originally Posted by OptimusZero View Post
GO Afk what i do is pin the exe to my taskbar.

1 - minimize quest side on right
2 - click exe script
3 - hit fullscreen and allow before it starts up and go have a shower
4 - the browser window must be left open though on screen
Everything works for me excet the auto attack, it seems to not be working here :/ Or I dont know how to make that work, the rest is going fine.
01/05/2014 23:51 OptimusZero#296
You mean the skills??

yeah sometimes they work other times they dont.. its no real big loss ... 90% does what it should without you needing to be there.
01/06/2014 08:19 Koba163#297
The Iris script works mostly, some misclicks here and there, but I don't have to monitor it if I want to do other things. The daru script keeps giving me an error message at line 8 for some reason.
01/06/2014 18:33 OptimusZero#298
I passed on daru... sylph battles drain troops i believe so the farming with bot slowly gives you daru ... not the fastest but constant
01/12/2014 02:41 cariocas#299
Quote:
Originally Posted by OptimusZero View Post
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compile_Both=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; Drücke Esc um das Script zu beenden, Pause um es zu pausieren

Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d

;;;; Hier ist der Hauptteil des Programms ;;;;
;$Variabel = InputBox("Login", "Username:")
;$Variabe2 = InputBox("Login", "Passwort:")
;MsgBox(0, "Login", "Hallo " & $Variabel & " Sie haben sich erfolgreich eingeloggt!")
$size_y= 900
$size_x= 1500

$abstandx = @DesktopWidth-$size_x
$abstandy = @DesktopHeight-$size_y
;~ 75 x 90

$mob_x = (65 + ($abstandx/2))
$mob_y = (84 + ($abstandy/2))

$mob_x2 = (1323 + ($abstandx/2))

$mob_y2 = (776 + ($abstandy/2))

$cccount = 0

Func search_Mob()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0xFF0004 )
$cccount = $cccount + 1

If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0]+5, $search[1]+60, 1)
$search2 = PixelSearch( $search[0], $search[1], $search[0]+100, $search[1]+100, 0xD8D0C8 )
If IsArray($search2) Then
MouseClick("left")
sleep(2000)
$varc=1
EndIf
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird

$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampf"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)

EndIf
if($cccount > 100) Then
MouseMove(1498-90+($abstandx/2), 190-75+($abstandy/2), 1)
MouseClick("left")
sleep(500)
MouseMove(529-90+($abstandx/2), 700-75+($abstandy/2), 1)
MouseClick("left")
sleep(500)
MouseMove(488-90+($abstandx/2), 159-75+($abstandy/2), 1)
MouseClick("left")
$cccount=0
Endif

Return $vab;

EndFunc


Func kampf()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 515+($abstandx/2), 785+($abstandy/2), 980+($abstandx/2), 845+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{1}")
Send("{2}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif


Elseif $countdown > 5 Then
;~ nicht kampf
$vab = false;
$countdown = 0

ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func Portal()
;~ Wenn ein ausgang gesehen wird in gegengestzter richtung drücken
$search = PixelSearch( 415-90+($abstandx/2), 180-75+($abstandy/2), 1350-90+($abstandx/2), 918-75+($abstandy/2), 0x070906 )
If IsArray($search) Then
$movey=460
$movex=860
if($search[0] < 700) Then
$movex = 1000
Else
$movex = 600
EndIf

if($search[1] < 300) Then
$movey = 650
Else
$movex = 350
EndIf


MouseMove($movex, $movey, 1)
MouseClick("left")
Else
MouseClick("left",Random(439,1309,1),Random(273,76 0,1))
Sleep(1000)
EndIf
EndFunc
Sleep(5000)
While 1
Sleep(300)
If $vab == "kampf" Then
$vab = kampf();
Else
$vab = search_Mob()
EndIf
WEnd
;;;;;;;;

Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)

WEnd
ToolTip("")
EndFunc

Func Terminate()
Exit 0
EndFunc

Func ShowMessage()
MsgBox(4096,"","Das ist eine Nachricht.")
EndFunc








Copy this script...... and compile through AutoIT...... this will Sylph farm perfectly.....


It should help.
idk why not work >.> all time click little left side and not appear dam hand ... btw i use it for pan works there too no and got 1024/768.
01/12/2014 13:08 boching#300
Quote:
Originally Posted by Headkill View Post
for those not able to decompile the faun bot or any other auto-it executables here is the faun bot
how to input keypress ? for skill purposes