NO ONE is allowed to copy this code into another thread or even upload it or whatever, I don't tolerate theft , those who do copy it into their threads or use any part of it without permission WILL be reportedFor the sake of everyone using this program , DO NOT ABUSE THE BOT , else you might get banned and this has a bigger chance to be patched by the companyRegarding the macro program detected , just edit the human pause function and increase it from 100 - 300 to whatever that works for you , just keep increasing the numbers there bit by bit until it doesn't DC you .
Code:
This video tutorial is for the old code , this won't help you except at installing the virtual drivers and learning how to RGB , ignore unless you don't know what i'm talking about.
http://www.youtube.com/watch?v=TX0ANSJCG1o
NEW VIDEOCode:
http://youtu.be/4F6FjCqlAk0
Keep your question about this code in this thread , don't just create a whole new thread to ask about anything in it. The new code is formed up of 3 parts , here is the first :
You have to set this one to run only once , so don't check the "infinite" box.
Code:
begin
Window.Bring to front("DMO", "yes")
Macro.Pause("100")
//Here , you first open the import window , then take a picture while targetting any digimon in the game , you then click on the digimon picture in the target window
//then write down x coordinate and y coordinate in those 2 spaces .
Function.Execute("Human Pause")
Color.Get color at coordinate (RGB)("", "", "Target1", "Target2", "Target3")
Function.Execute("Human Pause")
//Here , you write down the category and then the name of the second part of the code that is posted after this first part.
Macro.Execute new passing 3 arguments("", "", "yes", "Target1", "{Target1}", "Target2", "{Target2}", "Target3", "{Target3}")
end
function("Human Pause")
begin
Variable.Set random number("HumanTime", "100", "300")
Macro.Pause("{HumanTime}")
end
function
and here is the second part:
For this one , check the "infinite" box.
Code:
begin
Keyboard.Hold keys("{<tab>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<tab>}")
Macro.Pause("100")
Function.Execute("Heal")
//Here , you write down same x co ordinate and y co ordinate from part 1
if Color.At coordinate is (RGB)("{Target1}", "{Target2}", "{Target3}", "", "")
begin loop()
Keyboard.Hold keys("{<f2>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f2>}")
Function.Execute("Human Pause")
Keyboard.Hold keys("1")
Function.Execute("Human Pause")
Keyboard.Release keys("1")
Function.Execute("Human Pause")
Keyboard.Hold keys("{<f1>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f1>}")
Function.Execute("Heal")
//Here , set RGB for last bits of HP bar of target digimon so that it switches faster.
if Color.At coordinate is not (RGB)("", "", "", "", "")
begin
Macro.Restart("no")
end
end
end
//Here , you write down same x co ordinate and y co ordinate from part 1
if Color.At coordinate is (RGB)("", "", "", "", "")
begin loop()
Keyboard.Hold keys("1")
Function.Execute("Human Pause")
Keyboard.Release keys("1")
Function.Execute("Human Pause")
Keyboard.Hold keys("{<f2>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f2>}")
Function.Execute("Human Pause")
Keyboard.Hold keys("{<f1>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f1>}")
Function.Execute("Heal")
//Here , set RGB for last bits of HP bar of target digimon so that it switches faster.
if Color.At coordinate is not (RGB)("", "", "", "", "")
begin
Macro.Restart("no")
end
end
function("Human Pause")
begin
Variable.Set random number("HumanTime", "100", "300")
Macro.Pause("{HumanTime}")
end
function
function("Heal")
//RGB for using item at F7 slot , i use this for hp disks
if Color.At coordinate is not (RGB)("", "", "", "", "")
begin
Keyboard.Hold keys("{<f7>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f7>}")
end
//RGB for using item at 7 slot , i use this for hp food
if Color.At coordinate is not (RGB)("", "", "", "", "")
begin
Keyboard.Hold keys("7")
Function.Execute("Human Pause")
Keyboard.Release keys("7")
end
//RGB for using item at f8 slot , i use this for ds disk
if Color.At coordinate is not (RGB)("", "", "", "", "")
begin
Keyboard.Hold keys("{<f8>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f8>}")
end
//RGB for using item at 8 slot , i use this for tamer ds vitamin
if Color.At coordinate is not (RGB)("", "", "", "", "")
begin
Keyboard.Hold keys("8")
Function.Execute("Human Pause")
Keyboard.Release keys("8")
end
function
third part is for looting:
Code:
begin
Keyboard.Hold keys("4")
Function.Execute("Human Pause")
Keyboard.Release keys("4")
end
function("Human Pause")
begin
Variable.Set random number("HumanTime", "100", "300")
Macro.Pause("{HumanTime}")
end
function
HOW TO USE AFTER FILLING THE DATA:
1-Set hotkeys using trigger tab when editing a macro to run the first part with any combination , set the same hot key for starting the third code I posted.
2- Set a stop hotkey on 2nd part and 3rd part of the code that I posted , they should be the same as well.
3- Go to game , target a digimon you want to bot , use start hot key combination that you specified , profit.
4- If you want to stop the bot , use ctrl+alt+esc or the stop hot key combination that you specified.
5-Enjoy.
Credits to : Critical , Gigus , Xadal , Moderators in this place and Me 
Enjoy