Blue Eye Macro

 Begin
     Window.Set location("Ragnarok", "yes", "0", "0")
     Function.Execute("Attack")
     Function.Execute("Loot4")
     Function.Execute("flywing")
 end

function("Attack")
     if  Color.Can be located on screen (RGB)("255", "0", "0", "0")
          begin
               Mouse.Click at color closest to coordinate (RGB)("255", "0", "0", "0", "640", "375", "left")
               Mouse.Move to coordinate("997", "43")
               if  Color.Pixel pattern can be located on screen("255,198,198,0,-1,255,198,198,0,2,255,198,198", "4")
                    begin loop()
                         Mouse.Move to coordinate("997", "43")
                         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
                                   Humanly.Pause("400", "500")
                                   Function.Execute("Loot4")
                                   Macro.Break from loop("yes")
                              end
                    end
          end
function

function("Loot4")
     begin
          Color.Limit area of interest to coordinates("463", "249", "376", "287")
          if  Color.Can be located on screen (RGB)("0", "0", "255", "0")
               begin loop()
                    Mouse.Click at color closest to coordinate (RGB)("0", "0", "255", "0", "640", "375", "left")
                    Humanly.Pause("400", "500")
                    if  Color.Can not be located on screen (RGB)("0", "0", "255", "0")
                         begin
                              Humanly.Pause("400", "500")
                              if  Color.Can not be located on screen (RGB)("0", "0", "255", "0")
                                   begin
                                        Color.Unlimit area of interest()
                                        Macro.Break from loop("yes")
                                   end
                         end
               end
          Color.Unlimit area of interest()
     end
function

function("flywing")
     begin
          if  Color.Can not be located on screen (RGB)("255", "0", "0", "0")
               begin
                    Keyboard.Press key("{<f3>}")
                    Humanly.Pause("500", "1000")
                    Macro.Pause("800")
               end
     end
function