Here's a script to get you started while you study some of the tutorials or other scripts written by some of the more advanced programmers here (Like Critical or Gigus).
Just remember these tips:
1.) the stopwatch function is based on miliseconds so a timer of "60000" is 60 seconds
2.)Crystal saga uses the keyboard buttons:
` which is named
{<oemtilde>} in the create macro area, the
Space bar which is named
{<space>}, and the attack slot which is usually "1" in the game.
3.) the BE platform will actually show "Tip balloons" whenever you're writing a script
4.) there are plenty of people here on the forums willing to revise and test your scripts, leading to helpful feedback and constructive advice.
Copy paste this script into the "Create/Edit macro" tab and place your "Attacks" and MP/HP potions where prompted
Code:
// VeavonK's PwrLVLer
begin
Macro.Start stopwatch("Buff")
Macro.Start stopwatch("Heal")
begin loop()
Function.Execute("Target")
Function.Execute("Attack")
Function.Execute("Loot")
Function.Execute("Healing")
Function.Execute("BuffTime")
end
end
// This function will target the nearest monster or mob
function("Target")
begin
Keyboard.Press key("{<oemtilde>}")
Macro.Pause("50")
Keyboard.Press key("1")
Macro.Pause("3000")
end
function
// This will spam attack with Attacks in Slots 1-6 ingame
function("Attack")
begin
Keyboard.Press key("6")
Macro.Pause("50")
Keyboard.Press key("1")
Macro.Pause("503")
Keyboard.Press key("2")
Macro.Pause("553")
end
function
// This will loot up to 7 items from a monster in-case you kill an Elite mob
function("Loot")
begin
Keyboard.Press key("{<space>}")
Macro.Pause("50")
Keyboard.Press key("{<space>}")
Macro.Pause("50")
Keyboard.Press key("{<space>}")
Macro.Pause("50")
Keyboard.Press key("{<space>}")
Macro.Pause("50")
Keyboard.Press key("{<space>}")
Macro.Pause("50")
Keyboard.Press key("{<space>}")
Macro.Pause("50")
Keyboard.Press key("{<space>}")
Macro.Pause("500")
end
function
// Put your Healing Potion and your Pets Healing Potion into slots 7 and 8 Ingame. MP and pet MP in E and R. Heals every 10 mins
function("Healing")
begin
Macro.Read stopwatch("Heal","Healing")
if Variable.Is greater than (Math)("Healing", "100000")
begin
Keyboard.Hold keys("8")
Macro.Pause("50")
Keyboard.Release keys("8")
Macro.Pause("50")
Macro.Reset stopwatch("Heal")
Keyboard.Hold keys("7")
Macro.Pause("50")
Keyboard.Release keys("7")
Macro.Pause("50")
Macro.Reset stopwatch("Heal")
Keyboard.Hold keys("E")
Macro.Pause("50")
Keyboard.Release keys("E")
Macro.Pause("50")
Macro.Reset stopwatch("Heal")
Keyboard.Hold keys("R")
Macro.Pause("50")
Keyboard.Release keys("R")
Macro.Pause("50")
Macro.Reset stopwatch("Heal")
end
end
function
// This will cast your current buffs every 20 mins in slots Q and W ingame
function("BuffTime")
begin
Macro.Read stopwatch("Buff", "BuffTime")
if Variable.Is greater than (Math)("BuffTime", "1200000")
begin
Keyboard.Hold keys("Q")
Macro.Pause("50")
Keyboard.Release keys("Q")
Macro.Pause("50")
Macro.Reset stopwatch("Buff")
end
end
function
Goodluck and let me know if I can help with some simple scripts =)
_________________
Code:
Just waiting for the sun to rise...
Achieved
In game level:44
In game currency:15d 2g 13s 41c
Forum Posts: 1-29, 30-
Future Goals
In game level:Level cap
In game currency:Im rich biotch!
Forum posts:49, 50-99, 100-149, 150+
Contributor status
Login
Register
FAQ
