[FREE] PokeMMO bot [Ghost Tower]

Page 5 of 8

10/04/2012 06:53 LoganTheKiing#61

Anybody get banned for using any of these so far??

10/04/2012 23:50 Shazoopie#62

Quote:

Originally Posted by Jemoeder2

script for 1440 x 900
with healing but it might gets stuck at 0pp
what it does:
- heals if your not in a fight and your first poke is dead
- if your in a fight and your first poke dies, it selects the second pokemon
- click on your screen once in a while so you wont be kicked for afk

the only problem is 0pp if anyone could think off something to fix it tell me:)

edit: used this for 4 houres now, still working:)

begin
if Color.At coordinate is not (RGB)("224", "232", "232", "989", "500")
begin
Keyboard.Hold keys("{<down>}")
Macro.Pause("1000")
Keyboard.Release keys("{<down>}")
Keyboard.Hold keys("{<up>}")
Macro.Pause("750")
Keyboard.Release keys("{<up>}")
end
if Color.At coordinate is (RGB)("224", "232", "232", "989", "500")
and
Color.At coordinate is not (RGB)("171", "160", "203", "1408", "361")
begin
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("1000")
Keyboard.Press key("Z")
Macro.Pause("500")
Keyboard.Release keys("Z")
end
if Color.At coordinate is (RGB)("171", "160", "203", "1404", "351")
and
Color.At coordinate is not (RGB)("224", "232", "232", "989", "500")
begin
Keyboard.Hold keys("{<down>}")
Macro.Pause("500")
Keyboard.Hold keys("{<down>}")
Macro.Pause("5000")
Keyboard.Hold keys("{<down>}")
Macro.Pause("750")
Keyboard.Release keys("{<down>}")
Macro.Pause("500")
Keyboard.Hold keys("{<left>}")
Macro.Pause("1500")
Keyboard.Release keys("{<left>}")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Hold keys("{<right>}")
Macro.Pause("1250")
Keyboard.Release keys("{<right>}")
end
if Color.At coordinate is (RGB)("171", "160", "203", "1404", "351")
and
Color.At coordinate is (RGB)("224", "232", "232", "1045", "507")
and
Color.At coordinate is (RGB)("192", "92", "77", "917", "523")
begin
Mouse.Click at coordinate("685", "463", "Left")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
end
if Color.At coordinate is (RGB)("224", "232", "232", "1045", "507")
and
Color.At coordinate is (RGB)("179", "76", "191", "716", "529")
and
Color.At coordinate is (RGB)("255", "255", "255", "388", "476")
and
Color.At coordinate is not (RGB)("207", "109", "218", "388", "476")
begin
Mouse.Click at coordinate("688", "466", "Left")
end
end

Nice :D Thank you for posting this.
Is this supposed to be used in Ghost Tower or anywhere ?
I mean how exactly does it heal your pokemanz :D

10/05/2012 07:54 Pedakin#63

@Shazoopie, The guy "Dear" said he was NOT you but that's not important. What I would like to know is how would you go about making the Shiny Finder? Because I need it. Also what is your ign? (in game name)

10/05/2012 12:04 rastaman600#64

Could any of you guys do a 1280x800 60hz laptop display as the one Ive been using is ok but sometimes gets stuck. Thanks

10/05/2012 20:35 Shazoopie#65

Quote:

Originally Posted by Pedakin

@Shazoopie, The guy "Dear" said he was NOT you but that's not important. What I would like to know is how would you go about making the Shiny Finder? Because I need it. Also what is your ign? (in game name)

Dear is a funny funny guy. My ingame name is kissthegrama and I would either scan for infront of the name of the pokemon it says "Shiny" I would scan for those pixels so if both "Shiny and Battle screen pixels" appear then it would use a ability does no dmg like baton pass reflect or just throw pokeballs at it (stall bassicaly) a good option would be to swap pokemon.
Also my ingame name is not kissthegrama its AlexDigBick. :P that is all gl (btw my blue eye macro trial expires soon so this project might be put on hold)

10/06/2012 00:26 cjweb#66

Up and down on the battle menu is all it does...

10/06/2012 19:21 Teteczek#67

Quote:

Originally Posted by cjweb

Up and down on the battle menu is all it does...

Yeah I can't make it work either. I guess I just give up.

10/06/2012 23:33 Flatex#68

Quote:

Originally Posted by Jemoeder2

script for 1440 x 900
with healing but it might gets stuck at 0pp
what it does:
- heals if your not in a fight and your first poke is dead
- if your in a fight and your first poke dies, it selects the second pokemon
- click on your screen once in a while so you wont be kicked for afk

the only problem is 0pp if anyone could think off something to fix it tell me:)

edit: used this for 4 houres now, still working:)

begin
if Color.At coordinate is not (RGB)("224", "232", "232", "989", "500")
begin
Keyboard.Hold keys("{<down>}")
Macro.Pause("1000")
Keyboard.Release keys("{<down>}")
Keyboard.Hold keys("{<up>}")
Macro.Pause("750")
Keyboard.Release keys("{<up>}")
end
if Color.At coordinate is (RGB)("224", "232", "232", "989", "500")
and
Color.At coordinate is not (RGB)("171", "160", "203", "1408", "361")
begin
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("1000")
Keyboard.Press key("Z")
Macro.Pause("500")
Keyboard.Release keys("Z")
end
if Color.At coordinate is (RGB)("171", "160", "203", "1404", "351")
and
Color.At coordinate is not (RGB)("224", "232", "232", "989", "500")
begin
Keyboard.Hold keys("{<down>}")
Macro.Pause("500")
Keyboard.Hold keys("{<down>}")
Macro.Pause("5000")
Keyboard.Hold keys("{<down>}")
Macro.Pause("750")
Keyboard.Release keys("{<down>}")
Macro.Pause("500")
Keyboard.Hold keys("{<left>}")
Macro.Pause("1500")
Keyboard.Release keys("{<left>}")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Hold keys("{<right>}")
Macro.Pause("1250")
Keyboard.Release keys("{<right>}")
end
if Color.At coordinate is (RGB)("171", "160", "203", "1404", "351")
and
Color.At coordinate is (RGB)("224", "232", "232", "1045", "507")
and
Color.At coordinate is (RGB)("192", "92", "77", "917", "523")
begin
Mouse.Click at coordinate("685", "463", "Left")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
Keyboard.Press keys("Z")
Macro.Pause("500")
end
if Color.At coordinate is (RGB)("224", "232", "232", "1045", "507")
and
Color.At coordinate is (RGB)("179", "76", "191", "716", "529")
and
Color.At coordinate is (RGB)("255", "255", "255", "388", "476")
and
Color.At coordinate is not (RGB)("207", "109", "218", "388", "476")
begin
Mouse.Click at coordinate("688", "466", "Left")
end
end

nice, i just changed some the coordinates and works fine in 1600 x 900, but heal still dont working

i tried to make my own that heals but i fail

10/07/2012 09:35 Flash1997#69

what i ve to do step by step that it works ?

10/07/2012 14:44 Jemoeder2#70

Quote:

Originally Posted by Flatex

nice, i just changed some the coordinates and works fine in 1600 x 900, but heal still dont working

i tried to make my own that heals but i fail

try this for healing

if Color.At coordinate is (RGB)("171", "160", "203", "1404", "351")
##color and coords for a dead pokemon so get the coords from your first pokemon in your list on your right side##

and

Color.At coordinate is not (RGB)("224", "232", "232", "989", "500")
## this is that if you aren't in a battle##

10/07/2012 20:58 pokemmo#71

10/08/2012 02:56 Jakedagreat#72

Can you guys update the script for 1366 x 768? I think thats the only thing wrong with it for me

10/08/2012 05:48 h33t#73

I enabled it, but it dosen't seem to move.. but when i move myself and get into a battle, it does the battle for me fine.... How do i fix this?
-------------
EDIT:

Nvm, fixed. I forgot I changed my move hotkeys to WASD.

(also, would it be possible to make one for 1600x900)?)

10/09/2012 01:49 dawnz#74

Uh, it does everything but battle? it just keeps going up and down, any help?

10/09/2012 03:14 Splaterchef#75

Need a script for 1680x1050 :S

Page 5 of 8

« First

Last »