Mage Hunting Bot

BabyJam · **Thanked:** 0 time(s) **Posted:** Sat May 10, 2014 5:36 am

Hi All,

Started making my first macro, thanks to Gipsy for the template. Using a stupid laptop so have to press <ctrl> before hitting a function key.

Code:

 begin
     Keyboard.Wait for keys to be held down("{<alt>}")
     if  Keyboard.Key is held down("1")
          begin
               Keyboard.Hold keys("{<ctrl>}")
               Keyboard.Press key("{<f6>}") //Slow
               Keyboard.Release keys("{<ctrl>}")
               Macro.Pause("100")
               Mouse.Click("Right")
               Macro.Pause("2500")
               Keyboard.Hold keys("{<ctrl>}")
               Keyboard.Press key("{<f7>}") //Weaken
               Keyboard.Release keys("{<ctrl>}")
               Macro.Pause("100")
               Mouse.Click("Right")
               Macro.Pause("2500")
               Keyboard.Hold keys("{<ctrl>}")
               Keyboard.Press key("{<f8>}") //Main Spell
               Keyboard.Release keys("{<ctrl>}")
               Macro.Pause("100")
               Mouse.Hold button("Right")
          end
     if  Keyboard.Key is held down("2")
          begin
               Mouse.Release button("left")
               Mouse.Release button("right")
          end
 end

Next stage

Automate release mouse click after mob killed

Automate pick up of drop if any

Automate search for mob based on RGB colour if possible
Any guidance on these appreciated

Thanks

BabyJam · **Thanked:** 0 time(s) **Posted:** Sat May 10, 2014 7:37 am

Ok based on the auto pot macro I have added the following and have tried adjusting the range but it does not seem to be helping. I am trying to cast even though there are no mobs around me, probably due to the clothes my char is wearing.

Code:

 begin
     begin loop()
          if  Color.At the current mouse position is within (RGB range)("82", "85", "90", "50")
               begin
                    Keyboard.Hold keys("{<ctrl>}")
                    Keyboard.Press key("{<f6>}")
                    Keyboard.Release keys("{<ctrl>}")
                    Macro.Pause("100")
                    Mouse.Click("Right")
                    Macro.Pause("2500")
                    Keyboard.Hold keys("{<ctrl>}")
                    Keyboard.Press key("{<f7>}")
                    Keyboard.Release keys("{<ctrl>}")
                    Macro.Pause("100")
                    Mouse.Click("Right")
                    Macro.Pause("2500")
                    Keyboard.Hold keys("{<ctrl>}")
                    Keyboard.Press key("{<f8>}")
                    Keyboard.Release keys("{<ctrl>}")
                    Macro.Pause("100")
                    begin loop()
                         if  Color.At the current mouse position is within (RGB range)("82", "85", "90", "50")
                              begin
                                   Mouse.Hold button("Right")
                              end
                         if  Color.At the current mouse position is not within (RGB range)("82", "85", "90", "50")
                              begin
                                   Mouse.Release button("Right")
                              end
                    end
               end
     end
 end

BabyJam · **Thanked:** 0 time(s) **Posted:** Sat May 10, 2014 4:27 pm

How do I do a pixel pattern for a wraith as an example?

Blue Eye Macro

Mage Hunting Bot