AutoAttack is working, but AutoPots (potion) is not

lawscher · **Thanked:** 1 time(s) **Posted:** Mon Jul 03, 2017 4:41 pm

Hi everyone, I have created a simple code to attack zombies in Payon cave. It is very much effective in finding zombies and attacking them, but the Auto pots (potion) was not working anymore. Is there something wrong with my code? Please see below

ALso, I would like to add more color pixels for the other monsters that I would like to attack. Can I just add another If within the AutoAttack function? or is it another function? If so how would it look like?

I got the codes from dupikien and the contributors in his thread. Kudos to you guys! :ugeek:

Thanks in advance guys.

Code:

 begin
     Function.Execute("AutoPots")
     Function.Execute("AutoAttack")
 end

function("AutoPots")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "146", "81")
               begin loop()
                    Keyboard.Press key("{<f3>}")
                    if  Color.At coordinate is not (RGB)("247", "247", "247", "146", "81")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin loop()
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function
 

Roan1234321 · **Thanked:** 1 time(s) **Posted:** Wed Jul 05, 2017 3:05 am

lawscher wrote:

Hi everyone, I have created a simple code to attack zombies in Payon cave. It is very much effective in finding zombies and attacking them, but the Auto pots (potion) was not working anymore. Is there something wrong with my code? Please see below

ALso, I would like to add more color pixels for the other monsters that I would like to attack. Can I just add another If within the AutoAttack function? or is it another function? If so how would it look like?

Thanks in advance guys.

Code:

 begin
     Function.Execute("AutoPots")
     Function.Execute("AutoAttack")
 end

function("AutoPots")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "146", "81")
               begin loop()
                    Keyboard.Press key("{<f3>}")
                    if  Color.At coordinate is not (RGB)("247", "247", "247", "146", "81")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin loop()
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function
 

when your attacking it does not pots right?

dupikien · **Thanked:** 1 time(s) **Posted:** Wed Jul 05, 2017 3:15 am

lawscher wrote:

Hi everyone, I have created a simple code to attack zombies in Payon cave. It is very much effective in finding zombies and attacking them, but the Auto pots (potion) was not working anymore. Is there something wrong with my code? Please see below

ALso, I would like to add more color pixels for the other monsters that I would like to attack. Can I just add another If within the AutoAttack function? or is it another function? If so how would it look like?

Thanks in advance guys.

Code:

 begin
     Function.Execute("AutoPots")
     Function.Execute("AutoAttack")
 end

function("AutoPots")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "146", "81")
               begin loop()
                    Keyboard.Press key("{<f3>}")
                    if  Color.At coordinate is not (RGB)("247", "247", "247", "146", "81")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin loop()
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function
 

Dont forget to give credits to the one who created those codes

Guest · **Thanked:** 0 time(s) **Posted:** Wed Jul 05, 2017 7:23 am

Roan1234321 wrote:

when your attacking it does not pots right?

Hi Roan - yes your right, it can auto attack but it would not press f3 for pots.

Sorry I forgot to credit - I got the codes from dupikien and the contributors in his thread. Kudos to you guys! :ugeek:

Guest · **Thanked:** 0 time(s) **Posted:** Wed Jul 05, 2017 7:26 am

dupikien wrote:

lawscher wrote:

Hi everyone, I have created a simple code to attack zombies in Payon cave. It is very much effective in finding zombies and attacking them, but the Auto pots (potion) was not working anymore. Is there something wrong with my code? Please see below

ALso, I would like to add more color pixels for the other monsters that I would like to attack. Can I just add another If within the AutoAttack function? or is it another function? If so how would it look like?

Thanks in advance guys.

Code:

 begin
     Function.Execute("AutoPots")
     Function.Execute("AutoAttack")
 end

function("AutoPots")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "146", "81")
               begin loop()
                    Keyboard.Press key("{<f3>}")
                    if  Color.At coordinate is not (RGB)("247", "247", "247", "146", "81")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin loop()
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function
 

Dont forget to give credits to the one who created those codes

Sorry mate - didn't mean to copy without crediting - Thank you for the codes!

Roan1234321 · **Thanked:** 1 time(s) **Posted:** Wed Jul 05, 2017 9:23 am

Guest wrote:

dupikien wrote:

lawscher wrote:

Hi everyone, I have created a simple code to attack zombies in Payon cave. It is very much effective in finding zombies and attacking them, but the Auto pots (potion) was not working anymore. Is there something wrong with my code? Please see below

ALso, I would like to add more color pixels for the other monsters that I would like to attack. Can I just add another If within the AutoAttack function? or is it another function? If so how would it look like?

Thanks in advance guys.

Code:

 begin
     Function.Execute("AutoPots")
     Function.Execute("AutoAttack")
 end

function("AutoPots")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "146", "81")
               begin loop()
                    Keyboard.Press key("{<f3>}")
                    if  Color.At coordinate is not (RGB)("247", "247", "247", "146", "81")
                         begin
                              Macro.Break from loop("yes")
                         end
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin loop()
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function
 

Dont forget to give credits to the one who created those codes

Sorry mate - didn't mean to copy without crediting - Thank you for the codes!

At

Code:

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin loop()
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function

Instead of begin loop() just use begin..

so

Code:

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("130", "112", "162", "0")
               begin
                    // Color of High Orc
                    Mouse.Click at color (RGB)("130", "112", "162", "0", "Left")
               end
     end
function

hit thank you if this helps you!

lawscher · **Thanked:** 0 time(s) **Posted:** Wed Jul 05, 2017 10:08 am

@roan dude thanks. How about If I wanted to add more mosters/RGB targets, do i just add more lines of ifs in the autoattck function or do I create a new function?

lawscher · **Thanked:** 0 time(s) **Posted:** Wed Jul 05, 2017 10:44 am

lawscher wrote:

@roan dude thanks. How about If I wanted to add more mosters/RGB targets, do i just add more lines of ifs in the autoattck function or do I create a new function?

NVM i just got it by putting more ifs inside the auto attack. Next will be trying to roam around if there are no monsters.

felix2821 · **Thanked:** 0 time(s) **Posted:** Fri Jul 14, 2017 9:16 pm

Dear Guys,

I'm new to BEM. the RGB works for me but the clicks and button presses doesn't work on my Ragnarok PH Client. Can you please help me?

felix218 · **Thanked:** 0 time(s) **Posted:** Fri Jul 14, 2017 10:28 pm

felix2821 wrote:

Dear Guys,

I'm new to BEM. the RGB works for me but the clicks and button presses doesn't work on my Ragnarok PH Client. Can you please help me?

Hi, I am using Windows 10 and after i installed the virtual drivers, ragnarok client keeps disconnecting me. If i uninstall the virtual drivers, i can play ragnarok
normally. I really want to use BEM. Please help me. Any help will be greatly appreciated.

Blue Eye Macro

AutoAttack is working, but AutoPots (potion) is not