Originally Posted by Ol4fff
GERMAN:
Meine bisher letzte funktionierende Version, 1366x768, Demon Slayer Client, Vollbild, Taskleiste sichtbar.
Sie enthält:
1. Prüfung ob man tot ist: Wenn Du getötet wurdest, stehst Du in Himmelsburg. Das Skript sucht nach dem oberen rechten Button, und sucht nach der Farbe, die dort ist, wenn man in Himmelsburg ist. Danach läuft der Charakter zur Insel und in das jeweilige Level (Iris oder eben Faun) und dort zu einer vordefinierten Position.
2. Suche nach einer einzigartigen Farbe von Iris/Faun, so dass das Positionieren des Cursors nicht nötig ist. Der Cursor ist dann schon auf dem heldengeist.
3. Nach 100 erfolglosen Suchvorgängen Karte öffnen und an vordefinierte Position klicken (wird demnächst durch Zufallsklick ersetzt)
4. Vegetas Skript mit geblockten Heldengeistern, so dass diese nicht weiter angeklickt werden, sowie Portal-Routine, nur weiß ich nicht, ob die 100%ig funktioniert, hatte bisher keine Situation, wo mein Charakter auch nur annähernd am Portal gewesen ist, nach mehr als 10 Stunden am Stück.
ENGLISH:
My last version working in 1366x768 full screen Demon Slayer client, taskbar NOT hidden.
It includes:
1. death-routine: if you are killed by someone, you start outside of the isle, script searching for for the color of the upper right symbol of the city (in German Himmelsburg) and if you are outside, it lets the character go to isle and to a position at isle (iris script to iris level, faun (pan) script to 2nd level)
2. searching for COLOR of Iris in iris script, and for color of faun(pan) in faun-script, so there is no mousemoving after finding iris or faun(pan)
3. after 100 counts without findings, opens the map and lets you go back to a defined position
4. vegetas scriptings with blocked monsters and portal-searching (dont know if it works, never went to portal with my chars within the script for more than 10 hours)
IRIS:
Code:
#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
$cccount = 0
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
Func search_Mob()
$tot = PixelSearch( 1245, 45, 1250, 50, 0x603C29 ) ;death-routine
If IsArray($tot) Then
Sleep(1500)
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 973, 297 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel") ; going to isle
Sleep(30000)
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 477, 233 ) ; defined position at iris level-map, you can change to other coordinates, if you like
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(30000)
Endif
$varc = 0
$search = PixelSearch( 295, 110, 1115, 600, 0xd5f5cf ) ;searching for color of iris
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 519, 536, 836, 581, 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') ; blocking rectangle so that another iris will be found
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount >100) Then
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(500)
MouseMove(555, 300, 1); and again defined position on map, you can change this again if you want
sleep(500)
MouseClick("left")
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(10000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampf()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 288, 600, 710, 735, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}") ; first skill could be shield or heal over time
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 80, 300, 100, 0x800303 )
;(353,180,512,192)
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(280, 120, 1165, 661, 0x070906 )
; (565,195,1500,933)
If IsArray($search) Then
$movey=390
$movex=660
if($search[0] < 500) Then
$movex = 800
Else
$movex = 300
EndIf
if($search[1] < 350) Then
$movey = 650
Else
$movex = 200
EndIf
MouseMove($movex, $movey, 1)
MouseClick("left")
Else
MouseClick("left",Random(200,1100,1),Random(180,630,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
FAUN/PAN:
Code:
#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
$cccount = 0
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
Func search_Mob()
$varc = 0
$search = PixelSearch( 295, 110, 1115, 600, 0xbf6705 ) ;color of faun(pan)
$cccount = $cccount + 1
$tot = PixelSearch( 1245, 45, 1250, 50, 0x603C29 ); death routine
If IsArray($tot) Then
Sleep(1500)
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970, 297 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(25000)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 925, 185 )
Sleep(5000)
MouseClick( "left" )
ConsoleWrite("2. Level")
Sleep(25000)
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 439, 342 ) ;defined position at faun(pan)-level, you can change this
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
Send("{m}")
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 519, 536, 836, 581, 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
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(500)
MouseMove(455, 390, 1); defined position on map, you can change this
sleep(500)
MouseClick("left")
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(10000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampf()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 288, 600, 710, 735, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 80, 300, 100, 0x800303 )
;(353,180,512,192)
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(280, 120, 1165, 661, 0x070906 )
; (565,195,1500,933)
If IsArray($search) Then
$movey=390
$movex=660
if($search[0] < 500) Then
$movex = 800
Else
$movex = 300
EndIf
if($search[1] < 350) Then
$movey = 650
Else
$movex = 200
EndIf
MouseMove($movex, $movey, 1)
MouseClick("left")
Else
MouseClick("left",Random(200,1100,1),Random(180,630,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
Und nochmal, das ist die veränderte Datei von Vegeta17, daher vielen Dank an ihn und seine Fähigkeiten.
Und nochmal:
DIESES Skript ist für 1366x768, Vollbild, Demon Slayer Client, Taskleiste sichtbar.
Ich garantiere für nichts, aber bei mir läuft das Ganze seit 5 Tagen ohne Probleme, ich botte keine 24/7 aber meist 2-3 Stunden täglich manchmal auch mehr (nachts, morgens, falls ich mal Lappi anlasse). Bisher keine Fehler, keine falschen Wege, keine Portalsprünge in falsche Level.
And again, it's changed from vegetas script, so thanks to him and his scripting abilities.
And again, too:
THIS script is for 1366x768, fullscreen clientside, taskbar NOT hidden, I cannot guarantee anything. At my laptop it works perfectly since 5 days, but I dont bot 24/7, maybe 2-3 hours a day, sometimes more. Till now no errors, no wrong ways, no portal-runs outside from the chosen level. |