Critical's Training Bot

Critical · **Thanked:** 20 time(s) **Posted:** Wed Oct 05, 2011 6:50 am

A Critical Macro Exclusive

Comment: I told you it ain't bad to make a macro for this game, bro. You know who you are.

Current Flaw(s)

May not attack as fast as desired.
Digimon Masters is known for compatibility issues with Blue Eye Macro. This macro may not work as intended.

Note: In the event that the main macro does not work for you, I have created an alternative macro for you. It relies on how fast you kill the monster, and it will switch to a different monster in the increment of whatever you set it to. This does not require any attachments or images. (The default is 6 seconds, so it will switch monsters with tab every 6 seconds): viewtopic.php?p=10972#p10972

Information

Training has never been this easy with this bot. A nice starter's kit to creating more complex macros if the user desires it.

The keys used is the controls that are assumed that you left it at the default settings. "1" is to attack, "4" is to switch target and "tab" is to loot. If you changed that setting, either revert to the default position or change the key in the macro code to your liking (provided that you know what you're doing).

Requirements

DOWNLOAD THE VIRTUAL DRIVERS FROM Blue Eye Macro.
For the Image feature to work, YOU MUST download the .png below.
This is made using the Gaomon monster. If you chose a different starting monster, simply rename the stopwatches and change the desired cooldown times for your convenience.
While this should work without resolution dependency, if you come across a problem with detection, run it in 1366x768, Windowed Mode.

FAQ

>How do I download the virtual drivers?
A picture will suffice. When you download the drivers. Save, restart, and make sure they're chosen by default when you re-open Blue Eye Macro.

>I'm getting an error that digimonenemyHP does not exist.
1) Did you download the attachment?
2) Did you put it in the proper path?

For Windows Users: (C:\Digimon\digimonenemyHP.png) [You need to create a new folder under your C-drive and name the folder 'Digimon')
All other OSes: You need to make a new path and edit the path under the Image command.

If you know what you're doing and realize that you just need a correct path, you may edit this line of code under a completely different path name.

>My character doesn't even do anything after running this program and I focused it on the Digimon Monsters Online game!.
Make sure you download the virtual drivers first through Blue Eye Macro's Setting Feature. Restart the computer when prompt to do so in order for it to take effect the next time you run it.

>My character doesn't attack fast enough.
You see this part?

Code:

          Keyboard.Press key("{<tab>}")
          Keyboard.Press key("{<tab>}")
          Keyboard.Press key("1")
          Keyboard.Press key("1")

Add some more tabs and 1's. Though do that one at a time. Otherwise it's overkill.

>What can I edit?
The cooldown timers. You may add more special skills under function("Cooldown Checker"), but make sure to add a timer and follow the format for the given

>But we only have 3 hours to play this game and-
Relax. There's an Offline Checker and the macro will automatically stop itself.

>I have a question that's not listed up here, or I want to bow down to you how awesome you are.
Leave a post on here (PM works as well if you are a shy guy).

Code:

 begin
     Macro.Start stopwatch("Gao Rush")
     Macro.Start stopwatch("Double Back Hand")
     Macro.Start stopwatch("Rolling Upper")
     Window.Bring to front("DMO", "no")
     Window.Set always on top("DMO", "no", "yes")
     Function.Execute("Attack")
 end

function("Attack")
     begin loop()
          Keyboard.Press key("{<tab>}")
          Keyboard.Press key("{<tab>}")
          Keyboard.Press key("1")
          Keyboard.Press key("1")
          begin loop()
               if  Image.Can not be located on screen("C:\Digimon\digimonenemyHP.png", "10")
                    begin
                         Keyboard.Press key("{<tab>}")
                         Keyboard.Press key("{<tab>}")
                         Keyboard.Press key("1")
                         Keyboard.Press key("1")
                         Macro.Break from loop("no")
                    end
               Function.Execute("Cooldown Checker")
               Function.Execute("Loot")
               Function.Execute("Heal")
               Function.Execute("Check for Offline")
          end
     end
function

function("Heal")
     begin
          // Heal Digimon HP at 30% / Place HP item on 7
          if  Color.Pixel pattern can not be located on screen("184,47,36,0,1,198,60,49,0,1,216,65,54,0,1,243,57,40,0,-4,148,44,31", "0")
               begin
                    Keyboard.Press key("7")
               end
          // Heal Digimon MP at 30% / Place MP item on 8
          if  Color.Pixel pattern can not be located on screen("0,162,179,0,1,0,206,220,0,1,4,228,243,0,1,15,241,255,0,1,28,239,255", "0")
               begin
                    Keyboard.Press key("8")
               end
     end
function

function("Loot")
     begin loop("10")
          Keyboard.Press key("4")
          Keyboard.Press key("4")
     end
function

function("Check for Offline")
     begin
          if  Window.Is not running("DMO", "no")
               begin
                    Window.Display message box("Either you disconnected or your 3 hour limit is up. Aborting Macro.", "no")
                    Macro.Abort()
               end
     end
function

function("Cooldown Checker")
     begin
          Macro.Read stopwatch("Gao Rush", "GRtime")
          Macro.Read stopwatch("Double Back Hand", "DBHtime")
          Macro.Read stopwatch("Rolling Upper", "RUtime")
          if  Variable.Is greater than (Math)("GRtime", "999")
               begin
                    Keyboard.Press key("{<f1>}")
                    Keyboard.Press key("{<f1>}")
                    Macro.Reset stopwatch("Gao Rush")
               end
          if  Variable.Is greater than (Math)("DBHtime", "1999")
               begin
                    Keyboard.Press key("{<f2>}")
                    Keyboard.Press key("{<f2>}")
                    Macro.Reset stopwatch("Double Back Hand")
               end
          if  Variable.Is greater than (Math)("RUtime", "5999")
               begin
                    Keyboard.Press key("{<f3>}")
                    Keyboard.Press key("{<f3>}")
                    Macro.Reset stopwatch("Rolling Upper")
               end
     end
function

Alternative Code Partially Working

Code:

begin
     Macro.Start stopwatch("Gao Rush")
     Macro.Start stopwatch("Double Back Hand")
     Macro.Start stopwatch("Rolling Upper")
     Macro.Start stopwatch("Enemy Timer")
     Window.Bring to front("DMO", "no")
     Window.Set always on top("DMO", "no", "yes")
     Function.Execute("Attack")
end

function("Attack")
     begin loop()
          Keyboard.Hold keys("{<tab>}")
          Keyboard.Release keys("{<tab>}")
          Keyboard.Hold keys("{<tab>}")
          Keyboard.Release keys("{<tab>}")
          Keyboard.Hold keys("1")
          Keyboard.Release keys("1")
          Keyboard.Hold keys("1")
          Keyboard.Release keys("1")
          begin loop()
               Function.Execute("Cooldown Checker")
               Function.Execute("Loot")
               Function.Execute("Heal")
               Function.Execute("Check for Offline")
               // If you kill the monsters too fast or too slow, you can adjust the timer here below
               // The number represents in miliseconds (ms)
               // 1000 ms = 1 second
               Macro.Read stopwatch("Enemy Timer", "ETimer")
               if  Variable.Is greater than (Math)("ETimer", "6000")
                    begin
                         Macro.Break from loop("no")
                    end
          end
     end
function

function("Heal")
     begin
          // Heal Digimon HP at 30% / Place HP item on 7
          if  Color.Pixel pattern can not be located on screen("184,47,36,0,1,198,60,49,0,1,216,65,54,0,1,243,57,40,0,-4,148,44,31", "0")
               begin
                    Keyboard.Press key("7")
                    Macro.Pause("500")
                    Keyboard.Release keys("7")
               end
          // Heal Digimon MP at 30% / Place MP item on 8
          if  Color.Pixel pattern can not be located on screen("0,162,179,0,1,0,206,220,0,1,4,228,243,0,1,15,241,255,0,1,28,239,255", "0")
               begin
                    Keyboard.Press key("8")
                    Macro.Pause("500")
                    Keyboard.Release keys("8")
               end
     end
function

function("Loot")
     begin loop("5")
          Keyboard.Press key("4")
          Macro.Pause("500")
          Keyboard.Release keys("4")
     end
function

function("Check for Offline")
     begin
          if  Window.Is not running("DMO", "no")
               begin
                    Window.Display message box("Either you disconnected or your 3 hour limit is up. Aborting Macro.", "no")
                    Macro.Abort()
               end
     end
function

function("Cooldown Checker")
     begin
          Macro.Read stopwatch("Gao Rush", "GRtime")
          Macro.Read stopwatch("Double Back Hand", "DBHtime")
          Macro.Read stopwatch("Rolling Upper", "RUtime")
          if  Variable.Is greater than (Math)("GRtime", "999")
               begin
                    Keyboard.Press key("{<f1>}")
                    Macro.Pause("500")
                    Keyboard.Release keys("{<f1>}")
                    Macro.Reset stopwatch("Gao Rush")
               end
          if  Variable.Is greater than (Math)("DBHtime", "1999")
               begin
                    Keyboard.Press key("{<f2>}")
                    Macro.Pause("500")
                    Keyboard.Release keys("{<f2>}")
                    Macro.Reset stopwatch("Double Back Hand")
               end
          if  Variable.Is greater than (Math)("RUtime", "5999")
               begin
                    Keyboard.Press key("{<f3>}")
                    Macro.Pause("500")
                    Keyboard.Release keys("{<f3>}")
                    Macro.Reset stopwatch("Rolling Upper")
               end
     end
function

Alternative Code 2: Here

Gigus · **Thanked:** 2 time(s) **Posted:** Wed Oct 05, 2011 1:53 pm

Pretty cool, and quite different from other macros around this forum

Critical · **Thanked:** 1 time(s) **Posted:** Thu Oct 06, 2011 1:54 am

Thanks Gigus~

Minor update for clarification on keyboard setting along with an explanation on that the tamer is supposed to stand still but the Digimon moves.

HyBoi · **Thanked:** 1 time(s) **Posted:** Mon Oct 10, 2011 11:03 am

somewhy it doesnt work right for me , it keeps attacking without using skills , either with the code posted with gao or with an edited code for agumon , it just runs around and attacks normally without using skills and tamer doesnt pick up and it switches targets before killing them .

Critical · **Thanked:** 1 time(s) **Posted:** Wed Oct 12, 2011 1:45 pm

Hngh of course, this macro requires the user of virtual drivers from Blue Eye Macro. Sorry for replying late as well.

Once you download the virtual drivers, make sure you restart your computer and make sure they're set to the virtual drivers. (D'oh I almost forgot to update the guide with virtual drivers).

Gigus · **Thanked:** 3 time(s) **Posted:** Wed Oct 12, 2011 4:46 pm

The drivers can also be installed from directly inside BE settings, without the need to download the custom installer. The custom installer is only for troubleshooting.

HyBoi · **Thanked:** 1 time(s) **Posted:** Thu Oct 13, 2011 8:45 am

i already had it enabled and all , gaomon just keeps running attacking digimon normally without the use of skills + switches targets like crap before killing any of them

Critical · **Thanked:** 1 time(s) **Posted:** Thu Oct 13, 2011 8:57 am

Interesting. I'm guessing this macro may need some Macro.Pause("50") in-between the keypresses (although I managed to get it working with the current macro created). Since I have the game, I'm going to run this again and see what happens. The game and Blue Eye doesn't seem to like each other at the moment which is why it didn't have so many Macro pauses as it should have. :lol:

Ah, did you try the screen resolution to 1366 x 768 if you are compatible with that screen size? I will re-create your problem on a randomly different setting and see if the problem persists. Regardless, I'll be working on this macro and seeing what the problem could be. My only lead so far is the Image command since it's reliant on it heavily.

Stay tuned.

Gigus · **Thanked:** 2 time(s) **Posted:** Thu Oct 13, 2011 9:18 am

Inside the BE Settings window, select the "Performance" tab, then try setting a higher "Key press delay" default value is 3, try setting it to something like 15 or even 25. (depending on the speed of your computer and the game itself)

HyBoi · **Thanked:** 2 time(s) **Posted:** Fri Oct 14, 2011 7:47 am

Gigus wrote:

Inside the BE Settings window, select the "Performance" tab, then try setting a higher "Key press delay" default value is 3, try setting it to something like 15 or even 25. (depending on the speed of your computer and the game itself)

Critical wrote:

Interesting. I'm guessing this macro may need some Macro.Pause("50") in-between the keypresses (although I managed to get it working with the current macro created). Since I have the game, I'm going to run this again and see what happens. The game and Blue Eye doesn't seem to like each other at the moment which is why it didn't have so many Macro pauses as it should have. :lol:

Ah, did you try the screen resolution to 1366 x 768 if you are compatible with that screen size? I will re-create your problem on a randomly different setting and see if the problem persists. Regardless, I'll be working on this macro and seeing what the problem could be. My only lead so far is the Image command since it's reliant on it heavily.

Stay tuned.

@ Gigus , I tried it but still same problem

@Critical , I'm guessing that would make it attack 1 target at a time but there's still the picking up items problem and the no skill usage :/