Minigame Bot

04/17/2009 14:58 Clown00009#106
pffft, i have tried everything to make this bot work.
i edited the x and y without any success,
i changed it into window mode and full screen mode,
.. nothing happens ... what am i doing wrong?
AND is the bott still working?? because im not even getting past lvl 2 or 3.

im from nostale global. please help me in english cause my german isnt so good.
04/25/2009 21:33 *HaCkErBuNnY*#107
Quote:
Originally Posted by 13Trojan13 View Post
Ich frag nochma^^:

lso ich wollte einen Angelbot schreiben.
Ich schaffe es aber nicht das der Bot die
notwendigen Tasten lang genug drückt
um ein "Perfekt" zu schaffen.
Bei mir sieht das so aus:

Code:

[...]
Send("{Down down}") ;die nach unten Taste runterdrücken
sleep(400) ;ungf. die Zeit zum "Perfekt"
Send"{Down up}") ;die nach unten Taste wiederlos lassen
[...]


Bitte um schnelle Hilfe

mfg 13Trojan13

~Push~
Ich glaube das ging iwi so:

Hold ("300",{Down}) Ka bin mir kein stück sicher^^
04/25/2009 22:43 NetMax#108
Liebe Bunny. Ich glaube du irrst dich =)

So sollte es gehen:

Send("{W down}")
Sleep(35000)
Send("{W up}")

"W" 35 sekunden gedrückt halten // sollt gehen

Ums allgemein für alle Tasten festzulegen:
Opt("SendKeyDownDelay", 1) ;1 millisecond
04/26/2009 08:36 *HaCkErBuNnY*#109
Func MiningWithTori ()
While (1)
Send("{UP}")
Sleep("1")
WEnd

Ist das einzige am Bot, dass Funktioniert wirklich schlecht!
EndFunc
04/26/2009 18:08 Trøjan#110
Erst ma danke füs antworten =)

@NetMax
simmt schon aber wenn man nun:

Send("{up down}")
Sleep(35000)
Send("{up up}")

geht es nicht.
04/26/2009 20:55 *HaCkErBuNnY*#111
Quote:
Originally Posted by 13Trojan13 View Post
Erst ma danke füs antworten =)

@NetMax
simmt schon aber wenn man nun:

Send("{up down}")
Sleep(35000)
Send("{up up}")

geht es nicht.
While (1); Endlosschleife an.
Send ("{up down}", 0); Halte die Up-Taste gedrückt
Sleep (35000); Er hält die Taste 35000 Millisekunden gedrückt
Send ("{up up}", 0); Lässt die Taste wieder los
WEnd; Ende der Schleife

Wenn du willst, dass z.B. nachdem F5 gedrückt wurden ist alles macht, dann mussu machen.

HotKeySet ( "{F5}", "Start"); Jezz is F5 zum Starten da
Nun mussu über While machen:
Func Start ()
und unter WEnd kommt:
EndFunc
05/09/2009 12:05 Blubber123321#112
@@@@@@
Die Lösung ist die, einfach die Koordinaten anzupassen.
Ich habe zum Beispiel die Koords auf 1280x800 angepasst.
Nun schafft er es schon automatisch bis zu 3000 Punkte.
Noch etwas feilen mit kleinen Schritten und es wird mehr.
Bei mir wars erster Versuch 100 Punkte -.-
Beim zweiten warns 500.
Und jetz beim dritten sinds 1000.
Nun eben 3000 ^^

Also ich stell den auch noch online, sobald ich ihn fertig habe.
Dann mach ichs aber richtig und mach auch für 800x600 und auch ohne NosTale ^^
Also das man nebenbei was anderes machen kann!
05/12/2009 22:15 smoothie#113
ähm...klingt vllt doof aber wo muss man den php code der oben aufgeführt ist denn einfügen?^^ xD
05/13/2009 14:43 Trøjan#114
smmmmmmmmmmooooooohieeeeeee ^-^

das is AutoIt man muss sich AutoIt erst da [Only registered and activated users can see links. Click Here To Register...] runterladen!
Dann Autoit instalieren und den Code in Scite.exe also den Autoit Editor reinkopieren. Dann das script speichern und Starten ^-^
05/23/2009 14:29 OMGG1#115
Habt ihr jetz ne Lösung gefunden ?
06/09/2009 13:12 DeenWinchester#116
was soll ich mit den PHP Code machen wie aktivir ich ihn oder iwe mach ich den pls antworten thx
06/09/2009 13:32 poetaoe#117
~.~a
06/09/2009 15:28 Elham#118
könnte mir mal wer sagen wie ich den Bot benutzen kann?

und wenns möglisch wäre für das Minigame schissen aber wenns nur Stein oder Holzhacken ist gehts auch.

Aber ich weiß nicht wie ich das benutzen soll.

Hoffe jemand kann mir helfen Danke

Hier der alle erste Post was soll ich mit den ganzen daten machen??




Minigame Bot
-ist für den steinbruch-BOT 1
PHP-Code:
#include <file.au3>
#include <array.au3>
#include <String.au3>
#include <GuiConstantsEX.au3>
#include <Staticconstants.au3>

;Hotkeys
#Region "HotKeys"
HotKeySet("{F1}", "SetMiningStuff")
HotKeySet("{F2}", "MiningWithTori")
HotKeySet("{ESC}","Close")
#EndRegion

;Globals
#Region "Globals"
Global $LeftCritter, $RightCritter, $LCPixel, $RCPixel, $pos, $hWnd, $LPixel, $RPixel, $miner
Global $LeftCritter_X, $LeftCritter_Y, $RightCritter_X, $RightCritter_Y
#EndRegion


$LeftCritter = StringSplit("524,693",",")
$RightCritter = StringSplit("768,693",",")

;Self Explainitory
$LeftCritter_X = $LeftCritter[1]
$LeftCritter_Y = $LeftCritter[2]

$RightCritter_X = $RightCritter[1]
$RightCritter_Y = $RightCritter[2]




while 1

sleep(100)
WEnd

Func SetMiningStuff()
$hWnd = WinGetHandle('Nostale')
;Use this as SOON as the Start button of the Minigame is clicked
;This sets the Pixel colors to watch for.

$RCPixel = PixelGetColor($RightCritter_X, $RightCritter_Y, $hWnd)
$LCPixel = PixelGetColor($LeftCritter_X, $LeftCritter_Y, $hWnd)
EndFunc

Func MiningWithTori()
$miner = NOT $miner

While $miner
$hWnd = WinGetHandle('Nostale')

;This Sets new Variables as the Constant Pixel Color within ths given coords
$RPixel = PixelGetColor($RightCritter_X, $RightCritter_Y, $hWnd)
$LPixel = PixelGetColor($LeftCritter_X, $LeftCritter_Y, $hWnd)

;If the Constant Pixel color changes
Sleep("40")
If $RPixel <> $RCPixel then
Send("{RIGHT}",0)
Sleep("40")
EndIf


If $LPixel <> $LCPixel then
Send("{LEFT}",0)
Sleep("40")
EndIf
;If no change is present Keep Hitting that Rock you crackhead i know u like it !
Send("{UP}")
Sleep("1")


WEnd

EndFunc

Func Close()
Exit 0
EndFunc
-------------BOT2--------------------
kommt noch



Geändert von Chrisiwbi (04-28-2009 um 15:16 Uhr)
06/09/2009 15:58 Trøjan#119
Quote:
das is AutoIt man muss sich AutoIt erst da [Only registered and activated users can see links. Click Here To Register...] runterladen!
Dann Autoit instalieren und den Code in Scite.exe also den Autoit Editor reinkopieren. Dann das script speichern und Starten ^-^
Das hatte ich schon mal geschrieben das ist ein Autoit code! Kein PhP etc.
Der Bot funtzt aba noch nicht!
Leider ist mein Pc schrott und dieser Pc an dem ich grad bin da geht autoit net.
Wenn ich nen neuen PC hab werd ich mich dransetzen damit der Bot einwandfrein geht.


Mfg. Tro
06/09/2009 19:36 Elham#120
ok danke kennste villeicht dann einen Bot der zuzeit geht egalk welches minigame?