begin Window.Set location("Ragnarok", "yes", "0", "0") Variable.Set("Loot2", "2") Variable.Set("Loot1", "10") Function.Execute("Loot1") Function.Execute("Profile") Function.Execute("Loot2") Function.Execute("Fly") Function.Execute("mons") Function.Execute("mons2") Function.Execute("mons3") Function.Execute("Skill") Function.Execute("Skill1") Function.Execute("Skill2") Function.Execute("Rwalk") end
function("Profile") begin if Color.At coordinate is within (RGB range)("49", "74", "123", "0", "113", "84") begin Macro.Wait for current global loop execution time to exceed("1617") Keyboard.Hold keys("{<lmenu>}") Macro.Wait for current global loop execution time to exceed("2062") Keyboard.Hold keys("v") Macro.Wait for current global loop execution time to exceed("2355") Keyboard.Release keys("v") Keyboard.Release keys("{<lmenu>}") end end function
function("Heal") begin if Color.At coordinate is not within (RGB range)("156", "181", "239", "10", "144", "83") begin Function.Execute("Profile") Keyboard.Press key("{<f2>}") Humanly.Pause("334", "334") end end function
function("mons") if Color.Can be located on screen (RGB)("103", "63", "73", "0") begin Mouse.Click at color closest to coordinate (RGB)("103", "63", "73", "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() Humanly.Pause("250", "500") Function.Execute("Skill") if Color.Can be located on screen (RGB)("103", "63", "73", "0") begin if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "250") Function.Execute("Fly") if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "500") Function.Execute("Heal") 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("Loot") Macro.Break from loop("yes") end end end end end end function
function("mons2") if Color.Can be located on screen (RGB)("82", "49", "66", "0") begin Mouse.Click at color closest to coordinate (RGB)("82", "49", "66", "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() Humanly.Pause("250", "500") Function.Execute("Skill1") if Color.Can be located on screen (RGB)("82", "49", "66", "0") begin Humanly.Pause("250", "250") Function.Execute("Fly") if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "500") Function.Execute("Heal") 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("Loot") Macro.Break from loop("yes") end end end end end function
function("mons3") if Color.Can be located on screen (RGB)("198", "214", "148", "0") begin Mouse.Click at color closest to coordinate (RGB)("198", "214", "148", "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() Humanly.Pause("250", "500") Function.Execute("Skill2") if Color.Can be located on screen (RGB)("198", "214", "148", "0") begin Humanly.Pause("250", "250") Function.Execute("Fly") if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "500") Function.Execute("Heal") 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("Loot") Macro.Break from loop("yes") end end end end end function
function("Loot") begin Keyboard.Hold keys("{<ctrl>}") Mouse.Move to coordinate("673", "375") Mouse.Click("left") Mouse.Move to coordinate("673", "407") Mouse.Click("left") Mouse.Move to coordinate("605", "405") Mouse.Click("left") Mouse.Move to coordinate("605", "334") Mouse.Click("left") Mouse.Move to coordinate("674", "334") Mouse.Click("left") Keyboard.Release keys("{<ctrl>}") end function
function("Rwalk") begin if Color.Can not be located on screen (RGB)("103", "63", "73", "0") begin // set variables from random X coordinates on your screen example 100 to 500 Variable.Set random number("X", "100", "1100") // set variables from random Y coordinates on your screen example 100 to 620 Variable.Set random number("Y", "100", "620") Mouse.Click at coordinate("{X}", "{Y}", "left") Humanly.Pause("1500", "2000") end end function
function("Skill") if Color.Can be located on screen (RGB)("103", "63", "73", "0") begin Mouse.Click at color closest to coordinate (RGB)("103", "63", "73", "0", "640", "375", "left") Mouse.Move to coordinate("997", "43") Keyboard.Press key("{<f4>}") // your skill button Humanly.Pause("500", "800") end function
function("Skill1") if Color.Can be located on screen (RGB)("82", "49", "66", "0") begin Mouse.Click at color closest to coordinate (RGB)("82", "49", "66", "0", "640", "375", "left") Mouse.Move to coordinate("997", "43") Keyboard.Press key("{<f4>}") // your skill button Humanly.Pause("500", "800") end function
function("Skill2") if Color.Can be located on screen (RGB)("198", "214", "148", "0") begin Mouse.Click at color closest to coordinate (RGB)("198", "214", "148", "0", "640", "375", "left") Mouse.Move to coordinate("997", "43") Keyboard.Press key("{<f4>}") // your skill button Humanly.Pause("500", "800") end function
function("Fly") begin if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Keyboard.Press key("<f3>") Humanly.Pause("250", "250") Mouse.Click at coordinate("728", "563", "left") Humanly.Pause("3000", "4000") end end function
Hi sir roan im trying to attack 3 monster in one map, while trying to teleport if my hp is in red bar and using skill while attack the targeted monster. but in my script its not working what i want to happen. Please help. Ty
begin Window.Set location("Ragnarok", "yes", "0", "0") Variable.Set("Loot2", "2") Variable.Set("Loot1", "10") Function.Execute("Loot1") Function.Execute("Profile") Function.Execute("Loot2") Function.Execute("Fly") Function.Execute("mons") Function.Execute("mons2") Function.Execute("mons3") Function.Execute("Skill") Function.Execute("Skill1") Function.Execute("Skill2") Function.Execute("Rwalk") end
function("Profile") begin if Color.At coordinate is within (RGB range)("49", "74", "123", "0", "113", "84") begin Macro.Wait for current global loop execution time to exceed("1617") Keyboard.Hold keys("{<lmenu>}") Macro.Wait for current global loop execution time to exceed("2062") Keyboard.Hold keys("v") Macro.Wait for current global loop execution time to exceed("2355") Keyboard.Release keys("v") Keyboard.Release keys("{<lmenu>}") end end function
function("Heal") begin if Color.At coordinate is not within (RGB range)("156", "181", "239", "10", "144", "83") begin Function.Execute("Profile") Keyboard.Press key("{<f2>}") Humanly.Pause("334", "334") end end function
function("mons") if Color.Can be located on screen (RGB)("103", "63", "73", "0") begin Mouse.Click at color closest to coordinate (RGB)("103", "63", "73", "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() Humanly.Pause("250", "500") Function.Execute("Skill") if Color.Can be located on screen (RGB)("103", "63", "73", "0") begin if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "250") Function.Execute("Fly") if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "500") Function.Execute("Heal") 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("Loot") Macro.Break from loop("yes") end end end end end end function
function("mons2") if Color.Can be located on screen (RGB)("82", "49", "66", "0") begin Mouse.Click at color closest to coordinate (RGB)("82", "49", "66", "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() Humanly.Pause("250", "500") Function.Execute("Skill1") if Color.Can be located on screen (RGB)("82", "49", "66", "0") begin Humanly.Pause("250", "250") Function.Execute("Fly") if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "500") Function.Execute("Heal") 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("Loot") Macro.Break from loop("yes") end end end end end function
function("mons3") if Color.Can be located on screen (RGB)("198", "214", "148", "0") begin Mouse.Click at color closest to coordinate (RGB)("198", "214", "148", "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() Humanly.Pause("250", "500") Function.Execute("Skill2") if Color.Can be located on screen (RGB)("198", "214", "148", "0") begin Humanly.Pause("250", "250") Function.Execute("Fly") if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Humanly.Pause("250", "500") Function.Execute("Heal") 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("Loot") Macro.Break from loop("yes") end end end end end function
function("Loot") begin Keyboard.Hold keys("{<ctrl>}") Mouse.Move to coordinate("673", "375") Mouse.Click("left") Mouse.Move to coordinate("673", "407") Mouse.Click("left") Mouse.Move to coordinate("605", "405") Mouse.Click("left") Mouse.Move to coordinate("605", "334") Mouse.Click("left") Mouse.Move to coordinate("674", "334") Mouse.Click("left") Keyboard.Release keys("{<ctrl>}") end function
function("Rwalk") begin if Color.Can not be located on screen (RGB)("103", "63", "73", "0") begin // set variables from random X coordinates on your screen example 100 to 500 Variable.Set random number("X", "100", "1100") // set variables from random Y coordinates on your screen example 100 to 620 Variable.Set random number("Y", "100", "620") Mouse.Click at coordinate("{X}", "{Y}", "left") Humanly.Pause("1500", "2000") end end function
function("Skill") if Color.Can be located on screen (RGB)("103", "63", "73", "0") begin Mouse.Click at color closest to coordinate (RGB)("103", "63", "73", "0", "640", "375", "left") Mouse.Move to coordinate("997", "43") Keyboard.Press key("{<f4>}") // your skill button Humanly.Pause("500", "800") end function
function("Skill1") if Color.Can be located on screen (RGB)("82", "49", "66", "0") begin Mouse.Click at color closest to coordinate (RGB)("82", "49", "66", "0", "640", "375", "left") Mouse.Move to coordinate("997", "43") Keyboard.Press key("{<f4>}") // your skill button Humanly.Pause("500", "800") end function
function("Skill2") if Color.Can be located on screen (RGB)("198", "214", "148", "0") begin Mouse.Click at color closest to coordinate (RGB)("198", "214", "148", "0", "640", "375", "left") Mouse.Move to coordinate("997", "43") Keyboard.Press key("{<f4>}") // your skill button Humanly.Pause("500", "800") end function
function("Fly") begin if Color.Can be located on screen (RGB)("239", "16", "16", "0") begin Keyboard.Press key("<f3>") Humanly.Pause("250", "250") Mouse.Click at coordinate("728", "563", "left") Humanly.Pause("3000", "4000") end end function
Hi sir roan im trying to attack 3 monster in one map, while trying to teleport if my hp is in red bar and using skill while attack the targeted monster. but in my script its not working what i want to happen. Please help. Ty
|