Quote:
Originally Posted by *HaCkErBuNnY*
Na schafft ihr es nie ne lvl 5er Belohnung zu bekommen?
Die Zeiten sind alt denn es gibt
Jezz fragt ihr euch nur wie es geht mit den lvl 5er?
Erstmal öffnet ihr Nostale wählt euer gewünschtes minigame z.B. Sägewerk.
Jezz geht ihr in cheatengine klickt oben links auf den PC und wählt "NostaleX.dat"
Jezz geht ihr auf Enable Speedhack und wählt bei Speed z.B. 0,5 und bei Sleeptime nehmt ihr 3.
Achtung nicht zu langsam oder zu schnell, denn sonst gibts kicks!
Diese Idee stammt nicht von mir.
|
was macht ihr da für sachen das ist doch alles erkennbar für gms da ihr dadurch auch die spieldauer erheblich verlängert.
ich poste mal holzhacken auf
(windows 1440x900) im fenstermodus 1024x768 nos starten fenster stehen lassen
poste euch erst den bot der das fenster schiebt wird benötigt da ich das fenster verschoben habe
Nur fürs Schieben des Bildes einfach in au.3 einfügen
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 0)
WinWait("NosTale", "")
If Not WinActive("NosTale", "") Then WinActivate("NosTale", "")
WinWaitActive("NosTale", "")
Sleep(2000)
MouseMove(628, 8) ; Bildschieben
MouseDown("left")
Sleep(3000)
MouseMove(422, -43)
MouseUp("left")
so jetzt der holzi aber ohne Belohnungsentnahme Sry wieder nur in au.3 einfügen
Tip bei vista macht die Benutzersteuerung aus dann braucht ihr es nicht immer als admin ausführen und könntes auch so starten.
HotKeySet("{ESC}", "Stop") ;Schliesst mit ESC
HotKeySet("{F1}", "Start") ;Startet mit F1
HotKeySet("{F2}", "Pause") ;Pause 5 SEC.
HotKeySet("{F4}", "Pause2") ;Pause für neustart 4MIN.
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 0)
WinWait("NosTale", "")
If Not WinActive("NosTale", "") Then WinActivate("NosTale", "")
WinWaitActive("NosTale", "")
Func Start() ;Hier Start
While 1
$FS = PixelSearch(315, 174, 317, 176, 0x36363D, 2) ; Links Scannen
If Not @error Then
$FS = PixelSearch(450, 419, 465, 426, 0xBB7A2A, 9) ; Links Scannen
If Not @error Then
Send("{left}")
EndIf
EndIf
$GS = PixelSearch(315, 174, 317, 176, 0x36363D, 2) ; Links Scannen
If Not @error Then
$GS = PixelSearch(450, 520, 460, 529, 0xBB7A2A, 9) ; Rechts scannen
If Not @error Then
Send("{right}")
EndIf
EndIf
WEnd
EndFunc ;==>Start ende
Func Pause()
Sleep(5000) ;Pause 5 SEC.belohnung
EndFunc ;==>Pause
Func Pause2()
Sleep(240000) ;Pause 4 MIN.Für Neuerkennung und neustart
EndFunc ;==>Pause2
While 1
Sleep(1)
WEnd
Func Stop() ;Ausschalter
Exit
EndFunc ;==>Stop
ich habe alle 4 Bots fertig mit Belohnungsentnahme aber nicht für alle alle anderen wisst ja nichs ist auf der welt umsonst.
ach vergessen in der zeit kann man nichts am rechner machen man muss nur 20-25 min warten dann ist er fertig 20-25 mal spielen