Informatii: La nivelul 55 va puteti face calul militar. Dar trebuie sa omorati 200 de Arcasi Demon intai in 30 de Minute

 

Quest:

 

 

 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 

 

 

  •  

  •  

  •  

  •  

  •  

  •  

  •  

  •  

  •  

  •  

  •  

  •