quest cal_militar begin
state start begin
when 20349.chat."Cal militar" with horse.get_grade()==1 and horse.get_level()==10 begin
if horse.is_dead() then
say("Calul tau e mort!")
say("Readul la viata intai.")
say("")
elseif pc.level<=54 then
say("Nivelul tau este prea mic.")
say("")
elseif horse.get_level()<=9 then
say("Calul tau este prea mic!")
say("Antreneaza-ti calul mai intai.")
say("")
elseif pc.countitem("50050")<1 then
say("Nu ai nici o medalie!")
say("Fa rost de una intai.")
say("")
setstate(need_item50050)
elseif pc.countitem("50051")<1 then
say("Nu ai niic o imagine de cal !")
say("")
elseif horse.get_level()==10 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=55 then
say("Trebuie sa omori 200 de Arcas Demon")
say("in 30 de Minute.")
say("Doar asa pot fi sigur ca esti calificat")
say("pentru a primi un cal militar!")
say("")
say("Vrei sa incepi testul?")
say("")
local b=select("Da", "Ehm, nu.")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
setstate(test)
end
elseif 2==b then
say("Revino cand esti pregatit.")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("")
say("Mult noroc.")
say("")
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Medalie de Calarit")
q.set_title("Medalie de Calarit")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Medalie de Calarit"..locale.NORMAL_COLOR)
say("Fa rost de o Medalie de Calarit!")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Medalie de Calarit"..locale.NORMAL_COLOR)
say("Fa rost de o Medalie de Calarit!")
setstate(start)
q.done()
end
end
state test begin
when letter begin
q.set_counter("1002 ", 200-pc.getqf("kill_count"))
end
when 2105.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("1002 ", 200-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
end
end
when 2107.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("1002 ", 200-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
q.done()
end
end
when letter begin
q.set_clock("Timp ramas:", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Omoara Demoni Arcas")
q.set_title("Omoara Demoni Arcas")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Omoara Demoni Arcas"..locale.NORMAL_COLOR)
say("Trebuie sa omori 200 de Arcas Demon")
say("in 30 de Minute.")
say("Membrii grupei te pot ajuta.")
end
when info begin
say(locale.NOTICE_COLOR.."Omoara Demoni Arcas"..locale.NORMAL_COLOR)
say("Trebuie sa omori 200 de Arcas Demon")
say("in 30 de Minute.")
say("Membrii grupei te pot ajuta.")
end
when 2105.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 2107.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 20349.chat."Cal Militar" begin
say("Trebuie sa omori 200 de Arcas Demon")
say("in 30 de Minute.")
say("Membrii grupei te pot ajuta.")
end
end
state report begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Ai reusit")
q.set_title("Ai reusit")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Ai reusit"..locale.NORMAL_COLOR)
say("Intoarcete la grajdar.")
end
when info begin
say(locale.NOTICE_COLOR.."Ai reusit"..locale.NORMAL_COLOR)
say("Intoarcete la grajdar.")
end
when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Am reusit!" with horse.get_grade()==1 begin
say("Felicitari!")
say("Acum am nevoie de timp pentru a face contractul!")
say("Revino in 10 minute.")
say("Si adu 500.000 Yang.")
if is_test_server() then
pc.setqf("make_time", get_time()+10)
else
pc.setqf("duration",get_time()+60*10*)
end
setstate(wait)
end
end

when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Contractul?" with horse.get_grade()==1 begin
say("Inca nu am terminat contractul")
say("Revino mai tarziu.")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Contractul este gata!")
q.set_title("Contractul este gata!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Contractul este gata!"..locale.NORMAL_COLOR)
say("Dute la grajdar si ia-l!")
say("Si nu uita cei 500.000 Yang.")
end
when info begin
say(locale.NOTICE_COLOR.."Contractul este gata!"..locale.NORMAL_COLOR)
say("Dute la grajdar si ia-l!")
say("Si nu uita cei 500.000 Yang.")
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
setstate(start)
q.done()
end
when 20349.chat."Contractul meu?" with horse.get_grade()==1 and horse.get_level()==10 begin
say("COntractul tau este pregatit.")
say("Te costa 500.000 Yang.")
local b=select("Cumpara", "Mai tarziu", "Anuleaza")
if 1==b then
if pc.money>=500000 then
if pc.countitem("50051")>=1 then
char_log(0, "HORSE_UPGRADE", "BEGIN")
pc.changemoney(-500000)
char_log(0, "HORSE_UPGRADE", "DEC money 500000")
pc.removeitem("50051", 1)
char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
pc.give_item2("50052", 1)
char_log(0, "HORSE_UPGRADE", "INC 50052 1")
char_log(0, "HORSE_UPGRADE", "END")
say("Felicitari!")
say("Acum ai un cal militar.")
say("Hranestel mereu.")
say("")
setstate(start)
q.done()
else
say("")
end
else
say("")
end
elseif 2==b then
say("Ouk pe mai incolo.")
elseif 3==b then
say("Esti sigur ca vrei sa anulezi Questul?")
local b=select("Da", "Nu")
if 1==b then
setstate(start)
q.done()
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Misiune esuata")
q.set_title("Misiune esuata")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Misiune esuata"..locale.NORMAL_COLOR)
say("Nu ai reusit sa treci testul")
say("")
say("Dute la grajdar, pentru a repeta misiunea!")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Misiune esuata"..locale.NORMAL_COLOR)
say("Nu ai reusit sa treci testul")
say("")
say("Dute la grajdar, pentru a repeta misiunea!")
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end