Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Thu Nov 21, 2024 7:20 pm

Board index » Macros » Gaming » Ragnarok Online » Macros / Bots / Tools

All times are UTC




Post new topic Reply to topic  Page 1 of 1
  [ 9 posts ] 
  Print view | E-mail friend Previous topic | First unread post | Next topic 
Author Message
kampanat01
 Post subject: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Tue Sep 18, 2018 7:35 pm 
New User
New User



Joined: Tue Sep 18, 2018 7:28 pm
Posts: 2
Been thanked: 0 time(s)
Has thanked: 0 time(s)
Contribution Points: 10
I need Script .BEM
AutoAtack
and teleport when bot dont see color 255 0 0
or
Who has a pagelink for me to learn?
Thank you sir.
Top
 Profile  
Reply with quote  
Roan1234321
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Wed Sep 19, 2018 3:35 am 
VIP Contributor
VIP Contributor



Joined: Thu Nov 24, 2016 12:55 am
Posts: 549
Been thanked: 192 time(s)
Has thanked: 18 time(s)
Contribution Points: 185
kampanat01 wrote:
I need Script .BEM
AutoAtack
and teleport when bot dont see color 255 0 0
or
Who has a pagelink for me to learn?
Thank you sir.


back read some post there are some basic auto attack script

_________________
Ragnarok Online

Bot4You ROPH
http://www.blueeye-macro.com/viewtopic.php?f=437&t=30450

Creating .spr file or sprite for Pixel bot
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30445

Changing monster sprite and items sprite
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30516
Donate
https://www.paypal.com/donate/?business=KZWJ5C7XC6WF6&no_recurring=1&currency_code=PHP
QR
Image

Top
 Profile  
Reply with quote  
Guest
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Wed Sep 19, 2018 4:55 am 


My Script
Code:
 begin
     Window.Set location("BATTLE-RO | Gepard Shield 3.0 (^-_-^)", "yes", "0", "0")
     Function.Execute("AutoAttack")
     Function.Execute("Wing")
 end

function("Wing")
     begin
          if  Color.Can not be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Keyboard.Press key("{<F1>}")
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Mouse.Click at color (RGB)("255", "0", "0", "0", "Left")
               end
     end
function
 



AutoAttack is Work
Wing not work
Can you help me? Ty
Top
  
Reply with quote  
Roan1234321
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Sat Sep 22, 2018 12:52 am 
VIP Contributor
VIP Contributor



Joined: Thu Nov 24, 2016 12:55 am
Posts: 549
Been thanked: 192 time(s)
Has thanked: 18 time(s)
Contribution Points: 185
Guest wrote:
My Script
Code:
 begin
     Window.Set location("BATTLE-RO | Gepard Shield 3.0 (^-_-^)", "yes", "0", "0")
     Function.Execute("AutoAttack")
     Function.Execute("Wing")
 end

function("Wing")
     begin
          if  Color.Can not be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Keyboard.Press key("{<F1>}")
               end
     end
function

function("AutoAttack")
     begin
          if  Color.Can be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Mouse.Click at color (RGB)("255", "0", "0", "0", "Left")
               end
     end
function
 



AutoAttack is Work
Wing not work
Can you help me? Ty



wing does not work because color 255 0 0 can be detected on your screen..

_________________
Ragnarok Online

Bot4You ROPH
http://www.blueeye-macro.com/viewtopic.php?f=437&t=30450

Creating .spr file or sprite for Pixel bot
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30445

Changing monster sprite and items sprite
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30516
Donate
https://www.paypal.com/donate/?business=KZWJ5C7XC6WF6&no_recurring=1&currency_code=PHP
QR
Image

Top
 Profile  
Reply with quote  
okergame01
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Sat Sep 22, 2018 11:38 am 
New User
New User



Joined: Tue Sep 18, 2018 11:33 am
Posts: 6
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 13
my code
Code:
 begin
     Window.Set location("The New Chapter | Gepard Shield 3.0 (^-_-^)", "yes", "0", "0")
     Function.Execute("Attack")
     Function.Execute("Tele")
     Function.Execute("Loot4")
 end

function("Attack")
     if  Color.Can be located on screen (RGB)("255", "255", "0", "0")
          begin
               Mouse.Click at color closest to coordinate (RGB)("255", "255", "0", "0", "150", "100", "left")
               Mouse.Move to coordinate("231", "320")
               //  Function.Execute("H")
               //   Function.Execute("W")
               // if  Color.Pixel pattern can be located on screen("255,198,198,0,-1,255,198,198,0,2,255,198,198", "4")
               Macro.Pause("1000")
               if  Color.Pixel pattern can be located on screen("255,255,0,13,-2,255,255,0,15,-1,255,255,0", "0")
                    begin loop()
                         Macro.Pause("200")
                         Function.Execute("H")
                         Function.Execute("Whisper")
                         Mouse.Move to coordinate("231", "320")
                         if  Color.Pixel pattern can not be located on screen("255,198,198,0,-1,255,198,198,0,2,255,198,198", "4")
                              begin
                                   Macro.Pause("300")
                                   Function.Execute("B")
                                   Function.Execute("A")
                                   Function.Execute("Loot4")
                                   Function.Execute("Tele")
                                   Function.Execute("Profile")
                                   Macro.Break from loop("yes")
                              end
                    end
          end
function

function("Loot4")
     begin
          if  Color.Can be located on screen (RGB)("0", "0", "255", "0")
               begin loop()
                    Function.Execute("Profile")
                    Mouse.Click at color closest to coordinate (RGB)("0", "0", "255", "0", "381", "307", "left")
                    Macro.Pause("400")
                    Mouse.Move to coordinate("402", "382")
                    if  Color.Can not be located on screen (RGB)("0", "0", "255", "0")
                         begin
                              Macro.Pause("700")
                              if  Color.Can not be located on screen (RGB)("0", "0", "255", "0")
                                   begin
                                        Macro.Break from loop("yes")
                                   end
                         end
               end
     end
function

function("Tele")
     begin
          if  Color.Can not be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Keyboard.Press key("{<F5>}")
                    Macro.Pause("1000")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("1000")
               end
     end
function

function("A")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "591", "68")
               begin
                    Keyboard.Press key("{<F3>}")
                    Macro.Pause("1200")
                    Mouse.Move to coordinate("405", "303")
                    Mouse.Click("left")
                    Macro.Pause("1000")
               end
     end
function

function("B")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "591", "121")
               begin
                    Keyboard.Press key("{<F1>}")
                    Macro.Pause("1000")
                    Mouse.Move to coordinate("405", "303")
                    Mouse.Click("left")
                    Macro.Pause("1000")
               end
     end
function

function("H")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "108", "84")
               begin
                    Keyboard.Press key("{<F5>}")
                    Macro.Pause("500")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("1000")
                    Keyboard.Press key("{<F4>}")
                    Mouse.Move to coordinate("405", "303")
                    Macro.Pause("500")
                    Mouse.Click("left")
                    Macro.Pause("500")
               end
     end
function

function("Whisper")
     begin
          if  Color.At coordinate is (RGB)("255", "255", "255", "18", "511")
               begin
                    Keyboard.Press key(".")
                    Macro.Pause("300")
                    Keyboard.Press key(".")
                    Macro.Pause("300")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("500")
                    Mouse.Move to coordinate("274", "513")
                    Macro.Pause("300")
                    Mouse.Click("left")
                    Keyboard.Press key("{<F5>}")
                    Macro.Pause("300")
                    Keyboard.Press key("{<Down>}")
                    Macro.Pause("300")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("60000")
                    Keyboard.Press key("{<F6>}")
                    Macro.Pause("200")
                    Mouse.Move to coordinate("421", "224")
                    Macro.Pause("300")
                    Mouse.Click("left")
                    Macro.Pause("7000")
                    Keyboard.Press key("{<Down>}")
                    Macro.Pause("200")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("6000")
                    Mouse.Move to coordinate("421", "224")
                    Macro.Pause("200")
                    Mouse.Click("left")
                    Macro.Pause("5000")
               end
     end
function
 
Top
 Profile  
Reply with quote  
Roan1234321
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Sun Sep 23, 2018 12:12 pm 
VIP Contributor
VIP Contributor



Joined: Thu Nov 24, 2016 12:55 am
Posts: 549
Been thanked: 192 time(s)
Has thanked: 18 time(s)
Contribution Points: 185
okergame01 wrote:
my code
Code:
 begin
     Window.Set location("The New Chapter | Gepard Shield 3.0 (^-_-^)", "yes", "0", "0")
     Function.Execute("Attack")
     Function.Execute("Tele")
     Function.Execute("Loot4")
 end

function("Attack")
     if  Color.Can be located on screen (RGB)("255", "255", "0", "0")
          begin
               Mouse.Click at color closest to coordinate (RGB)("255", "255", "0", "0", "150", "100", "left")
               Mouse.Move to coordinate("231", "320")
               //  Function.Execute("H")
               //   Function.Execute("W")
               // if  Color.Pixel pattern can be located on screen("255,198,198,0,-1,255,198,198,0,2,255,198,198", "4")
               Macro.Pause("1000")
               if  Color.Pixel pattern can be located on screen("255,255,0,13,-2,255,255,0,15,-1,255,255,0", "0")
                    begin loop()
                         Macro.Pause("200")
                         Function.Execute("H")
                         Function.Execute("Whisper")
                         Mouse.Move to coordinate("231", "320")
                         if  Color.Pixel pattern can not be located on screen("255,198,198,0,-1,255,198,198,0,2,255,198,198", "4")
                              begin
                                   Macro.Pause("300")
                                   Function.Execute("B")
                                   Function.Execute("A")
                                   Function.Execute("Loot4")
                                   Function.Execute("Tele")
                                   Function.Execute("Profile")
                                   Macro.Break from loop("yes")
                              end
                    end
          end
function

function("Loot4")
     begin
          if  Color.Can be located on screen (RGB)("0", "0", "255", "0")
               begin loop()
                    Function.Execute("Profile")
                    Mouse.Click at color closest to coordinate (RGB)("0", "0", "255", "0", "381", "307", "left")
                    Macro.Pause("400")
                    Mouse.Move to coordinate("402", "382")
                    if  Color.Can not be located on screen (RGB)("0", "0", "255", "0")
                         begin
                              Macro.Pause("700")
                              if  Color.Can not be located on screen (RGB)("0", "0", "255", "0")
                                   begin
                                        Macro.Break from loop("yes")
                                   end
                         end
               end
     end
function

function("Tele")
     begin
          if  Color.Can not be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Keyboard.Press key("{<F5>}")
                    Macro.Pause("1000")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("1000")
               end
     end
function

function("A")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "591", "68")
               begin
                    Keyboard.Press key("{<F3>}")
                    Macro.Pause("1200")
                    Mouse.Move to coordinate("405", "303")
                    Mouse.Click("left")
                    Macro.Pause("1000")
               end
     end
function

function("B")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "591", "121")
               begin
                    Keyboard.Press key("{<F1>}")
                    Macro.Pause("1000")
                    Mouse.Move to coordinate("405", "303")
                    Mouse.Click("left")
                    Macro.Pause("1000")
               end
     end
function

function("H")
     begin
          if  Color.At coordinate is (RGB)("247", "247", "247", "108", "84")
               begin
                    Keyboard.Press key("{<F5>}")
                    Macro.Pause("500")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("1000")
                    Keyboard.Press key("{<F4>}")
                    Mouse.Move to coordinate("405", "303")
                    Macro.Pause("500")
                    Mouse.Click("left")
                    Macro.Pause("500")
               end
     end
function

function("Whisper")
     begin
          if  Color.At coordinate is (RGB)("255", "255", "255", "18", "511")
               begin
                    Keyboard.Press key(".")
                    Macro.Pause("300")
                    Keyboard.Press key(".")
                    Macro.Pause("300")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("500")
                    Mouse.Move to coordinate("274", "513")
                    Macro.Pause("300")
                    Mouse.Click("left")
                    Keyboard.Press key("{<F5>}")
                    Macro.Pause("300")
                    Keyboard.Press key("{<Down>}")
                    Macro.Pause("300")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("60000")
                    Keyboard.Press key("{<F6>}")
                    Macro.Pause("200")
                    Mouse.Move to coordinate("421", "224")
                    Macro.Pause("300")
                    Mouse.Click("left")
                    Macro.Pause("7000")
                    Keyboard.Press key("{<Down>}")
                    Macro.Pause("200")
                    Keyboard.Press key("{<enter>}")
                    Macro.Pause("6000")
                    Mouse.Move to coordinate("421", "224")
                    Macro.Pause("200")
                    Mouse.Click("left")
                    Macro.Pause("5000")
               end
     end
function
 



do you need help with your script?

_________________
Ragnarok Online

Bot4You ROPH
http://www.blueeye-macro.com/viewtopic.php?f=437&t=30450

Creating .spr file or sprite for Pixel bot
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30445

Changing monster sprite and items sprite
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30516
Donate
https://www.paypal.com/donate/?business=KZWJ5C7XC6WF6&no_recurring=1&currency_code=PHP
QR
Image

Top
 Profile  
Reply with quote  
okergame01
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Sun Sep 23, 2018 3:17 pm 
New User
New User



Joined: Tue Sep 18, 2018 11:33 am
Posts: 6
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 13
Quote:
do you need help with your script?


no. i can't use on gepard RIP /me haha
Top
 Profile  
Reply with quote  
Roan1234321
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Mon Sep 24, 2018 11:17 pm 
VIP Contributor
VIP Contributor



Joined: Thu Nov 24, 2016 12:55 am
Posts: 549
Been thanked: 192 time(s)
Has thanked: 18 time(s)
Contribution Points: 185
okergame01 wrote:
Quote:
do you need help with your script?


no. i can't use on gepard RIP /me haha


it worked on AndyRO
wedevgames RO server

_________________
Ragnarok Online

Bot4You ROPH
http://www.blueeye-macro.com/viewtopic.php?f=437&t=30450

Creating .spr file or sprite for Pixel bot
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30445

Changing monster sprite and items sprite
http://www.blueeye-macro.com/viewtopic.php?f=435&t=30516
Donate
https://www.paypal.com/donate/?business=KZWJ5C7XC6WF6&no_recurring=1&currency_code=PHP
QR
Image

Top
 Profile  
Reply with quote  
okergame01
 Post subject: Re: Help me pls..
Thanked: 0 time(s)  Unread post Posted: Wed Sep 26, 2018 12:08 pm 
New User
New User



Joined: Tue Sep 18, 2018 11:33 am
Posts: 6
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 13
Roan1234321 wrote:
okergame01 wrote:
Quote:
do you need help with your script?


no. i can't use on gepard RIP /me haha


it worked on AndyRO
wedevgames RO server


i playing reTRO only.now i can't use in server. T_T
Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  Page 1 of 1
  [ 9 posts ] 

Board index » Macros » Gaming » Ragnarok Online » Macros / Bots / Tools

All times are UTC


You cannot post new topics in this forum
You can reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Jump to:  


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group