quest horse_menu begin
state start begin
function horse_menu()
if horse.is_mine() then
say_title("Manualul Armãsarului")
say("De aici puteþi monitoriza starea Armãsarului dvs.")
say("")
local s = 6
if horse.is_dead() then
s = select( "Învie Armãsarul", "Starea Armãsarului ", "Închide ")
if s == 1 then s = 0
elseif s == 2 then s = 3
elseif s == 3 then return
end
else
s = select(
"Hrãneºte Armãsarul", "Cãlãreºte Armãsarul ", "Alungã Armãsarul", "Starea Armãsarului",
"Dã un nume armãsarului ", "Închide")
end
if s == 0 then
horse.revive()
elseif s == 1 then
local food = horse.get_grade() + 50054 - 1
if pc.countitem(food) > 0 then
pc.removeitem(food, 1)
horse.feed()
else
say("Ai nevoie de "..item_name(food)..".")
say("")
end
elseif s == 2 then
horse.ride()
elseif s == 3 then
horse.unsummon()
elseif s == 4 then
say_title("Starea Armãsarului:")
say("Sãnãtatea curentã a armãsarului: "..horse.get_health_pct().."%")
say("Rezistenþa momentanã a armãsarului: "..horse.get_stamina_pct().."%")
say("")
elseif s == 5 then
if pc.countitem("71110") <= 0 then
say("Ai nevoie de "..item_name("71110")..".")
say("")
return
end
local old_horse_name = horse.get_name() ;
say_title("Zaharul Armasarului:")
say("Introdu mai jos numele armasarului tau")
say("Poti schimba o singura data")
say("Alege cu grija.")
say("")
if string.len(old_horse_name) == 0 then
say_reward("Calul tau nu are inca un nume.")
else
say_reward("Numele curent al calului este "..old_horse_name..".")
end
say("")
say("Selecteaza un nou nume pentru calul tau:")
say("")
local horse_name = input()
if string.len(horse_name) < 2 then
say_title("Zaharul Armasarului:")
say("Numele este prea scurt")
say("")
return
elseif string.len(horse_name) > 12 then
say_title("Zaharul Armasarului:")
say("Numele este prea lung")
say("")
return
end
local ret = horse.set_name(horse_name)
say_title("Zaharul Armasarului:")
if ret == 0 then
say_reward("Nu posezi un cal")
say("")
elseif ret == 1 then
say_reward("Nu poti folosi acest nume")
say("")
elseif ret == 2 then
pc.remove_item("71110")
say("Ai dat un nou nume calului tau")
say("")
end
end
end
end
when 20030.click begin horse_menu.horse_menu() end
when 20101.click begin horse_menu.horse_menu() end
when 20102.click begin horse_menu.horse_menu() end
when 20103.click begin horse_menu.horse_menu() end
when 20104.click begin horse_menu.horse_menu() end
when 20105.click begin horse_menu.horse_menu() end
when 20106.click begin horse_menu.horse_menu() end
when 20107.click begin horse_menu.horse_menu() end
when 20108.click begin horse_menu.horse_menu() end
when 20109.click begin horse_menu.horse_menu() end
end
end