this is what I use
function waitForUnbalance()
while character.unbalanced == true do
PauseMS(300)
end
end
weapon = "sharpened sword"
shield = "simple shield"
if character.hp == 0 then
PauseMS(3000)
Put("Die")
PauseMS(20000)
Put("pack left;;unpack ^RRed potion^N;;drink ^RRed potion^N")
PauseMS(3500)
Put("pack potion;;unpack shield")
PauseMS(3000)
Put("pack left;;unpack ^CBlue potion^N;;drink ^CBlue potion^N")
PauseMS(3000)
Put("pack potion;;unpack shield")
PauseMS(300)
exit()
return end
if character.hp < 400 then
Put("pack left;;unpack ^RRed potion^N;;drink ^RRed potion^N")
PauseMS(3000)
Put("pack potion;;unpack shield")
return end
if character.hp < 900 then
Put("t;;cast 32")
PauseMS(400)
return end
if character.sp < 200 then
Put("pack left;;unpack ^CBlue potion^N;;drink ^CBlue potion^N")
PauseMS(3000)
Put("pack potion;;unpack shield")
--elseif character.sp < 200 then
--Put("rest")
--Pause(10)
elseif effects["Protected"] == 0 then
Put("g gold;;t;;cast 47")
PauseMS(400)
elseif effects["Strong"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 44")
PauseMS(400)
elseif effects["Accurate"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 50")
PauseMS(400)
elseif effects["Fire Resistant"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 54")
PauseMS(400)
elseif effects["Cold Resistant"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 55")
PauseMS(400)
elseif effects["Electrical Resistant"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 56")
PauseMS(400)
elseif effects["Poison Resistant"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 57")
PauseMS(400)
elseif effects["Entangle Resistant"] == 0 then
waitForUnbalance()
Put("g gold;;t;;cast 58")
PauseMS(400)
elseif effects["Poisoned"] > 10 then
waitForUnbalance()
Put("g gold;;t;;cast 36")
PauseMS(400)
elseif effects["Bleeding"] > 10 then
waitForUnbalance()
Put("g gold;;t;;cast 34")
PauseMS(400)
elseif character.lefthand == "^CRed potion^N" then
waitForUnbalance()
Put("pack left;;wield shield")
elseif character.lefthand == "^CBlue potion^N" then
waitForUnbalance()
Put("pack ^CBlue potion^N;;unpack shield")
elseif character.righthand == "sharpened sword" then
waitForUnbalance()
Put("g gold;;t;;cast 89")
PauseMS(400)
elseif character.unbalanced == false then
Put("g gold;;cast 2;;t;;n;;t;;s")
end
--Put("pack potion;;unpack shield")
--PauseMS(300)
--Put("g gold;;t;;cast 2;;n;;s")
--Put("g gold;;t;;cast 5;;e;;t;;w")
--Put("g gold;;t;;cast 8;;n;;t;;s")
--Put("g gold;;t;;e;;t;;w;;wave wand")
--Put("g gold;;t;;cast 2;;t;;cast 2")
--Put("g gold;;t;;cast 5;;t;;cast 5")
--Put("t Blue mosquito;;t Strangle vine")
--waitForUnbalance()
--Put("g gold;;t;;cast 8;;w;;t;;e")