Help on AutoPot + AutoClick

abcdRO · **Thanked:** 0 time(s) **Posted:** Thu Nov 15, 2018 5:38 pm

hi all, any idea how to combine this 2 script?
i had to run it separately at the moment because if i join them, when pressing F3 (for autoclick) the other 2 automation (F1 and F2) wont work.
thanks!

Another thing my crappy computer keep restarting every 30-40min using BEM
- win10
- 8gb RAM
- Intel G260 2.6GHz
- BEM 2.61

would a script command "Color.Limit area of interest to coordinates("", "", "", "")" reduce BEM cpu/ram usage?
and how to use this command, couldnt find whats the x/y for... thanks!

Code:

 begin
     Function.Execute("HP_F1")
     Function.Execute("SP_F2")
 end

function("HP_F1")
     begin
          if  Color.At coordinate is (RGB)("255", "255", "255", "141", "57")
               begin loop()
                    Macro.Pause("40")
                    Keyboard.Press key("{<f1>}")
                    if  Color.At coordinate is not (RGB)("255", "255", "255", "140", "57")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("SP_F2")
     begin
          if  Color.At coordinate is (RGB)("255", "255", "255", "72", "72")
               begin loop()
                    Macro.Pause("40")
                    Keyboard.Press key("{<f2>}")
                    if  Color.At coordinate is not (RGB)("255", "255", "255", "71", "72")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

Code:

 begin
     Function.Execute("F3_AutoClick")
 end

function("F3_AutoClick")
     begin
          if  Keyboard.Keys are held down("{<f3>}")
               begin loop()
                    Keyboard.Hold keys("{<f3>}")
                    Macro.Pause("1")
                    Keyboard.Release keys("{<f3>}")
                    Macro.Pause("1")
                    Mouse.Click ("left")
                    if  Keyboard.Key is not held down("{<f3>}")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

galli14 · **Thanked:** 1 time(s) **Posted:** Fri Nov 16, 2018 5:22 am

You are expecting F3 to be held which may cause the issue, try changing it to key pressed .Limiting the range to check the pixel’s will increase mostly the program’s recognition speed.Also try increasing the pause , + I sugges you use humanly pause with about ~250

abcdRO · **Thanked:** 0 time(s) **Posted:** Mon Nov 19, 2018 3:34 am

will try thanks!

Roan1234321 · **Thanked:** 0 time(s) **Posted:** Tue Nov 27, 2018 12:21 am

You can just add the 2 functions HP and SP on the loop of your Second code or at the F3..

Code:

begin
     Function.Execute("HP_F1")
     Function.Execute("SP_F2")
     Function.Execute("F3_AutoClick")
 end

function("HP_F1")
     begin
          if  Color.At coordinate is (RGB)("255", "255", "255", "141", "57")
               begin loop()
                    Macro.Pause("40")
                    Keyboard.Press key("{<f1>}")
                    if  Color.At coordinate is not (RGB)("255", "255", "255", "140", "57")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("SP_F2")
     begin
          if  Color.At coordinate is (RGB)("255", "255", "255", "72", "72")
               begin loop()
                    Macro.Pause("40")
                    Keyboard.Press key("{<f2>}")
                    if  Color.At coordinate is not (RGB)("255", "255", "255", "71", "72")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("F3_AutoClick")
     begin
          if  Keyboard.Keys are held down("{<f3>}")
               begin loop()
                    Keyboard.Hold keys("{<f3>}")
                    Macro.Pause("1")
                    Keyboard.Release keys("{<f3>}")
                    Macro.Pause("1")
                    Mouse.Click ("left")
                    Function.Execute("HP_F1")
                    Function.Execute("SP_F2")
                    if  Keyboard.Key is not held down("{<f3>}")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

the color.limit area x and y is the coordinate of the reference point where it will start. then you can use the height going down then the width going right direction.

abcdRO · **Thanked:** 0 time(s) **Posted:** Thu Feb 07, 2019 8:12 am

nice, i wish i could try this

but already reach expiration/trial date lol

Blue Eye Macro

Help on AutoPot + AutoClick