Poprawa questu

[LukandeR]

quest pony_buy begin
        state start begin
                when 20349.chat."Chce jezdzic" with horse.get_grade()==0 begin
                        if pc.level<=24 then
                        	----"123456789012345678901234567890123456789012345678901234567890"|
                                say_title("Stajenny:")
                                say("")
                                say_reward("Wpierw musisz osiagnac 25 poziom.")
                                say("")
                                say("Moim zdaniem musisz stac sie silniejszy.")
                                say("")
                        elseif pc.countitem("50050")<1 then
                                say_title("Stajenny:")
                                say("")
                                say("Przed rozpoczeciem egzaminu musisz")
                                say("dostarczyc mi Medal Konny.")
                                say("")
                                say("")
                                say("Mozesz go zdobyc w Latwym Lochu malp.")
                                say("")
                                say("Mysle ze Malpy nie oddadza go latwo..")
                                say("")
                                set_state(need_item50050)
                        elseif pc.countitem("50050")>=1 and pc.level>=25 then
                                say_title("Stajenny:")
                                say("")
                                say("Oh, masz Medal Konny jak dobrze!")
                                say("")
                                ----"123456789012345678901234567890123456789012345678901234567890"|
                                say("Teraz musisz dowiesc czy jestes godny")
								say("dosiasc wierzchowca.")
                                say("Zabij 20 Dzikich Lucznikow w 30min.")
                                say("")
                                say_reward("Podejmiesz sie wyzwania?")
								say("")
                                local b=select("Tak", "Nie")
                                if 1==b then
                                        if pc.countitem("50050")>=1 then
                                                pc.removeitem("50050", 1)
                                                set_state(test)
                                        end
                                elseif 2==b then
                                        say_title("Stajenny:")
                                        say("")
                                        say("Wroc do mnie kiedy bedziesz zainteresowany")
                                        say("")
                                else
                                        say("UNBEKANNTE TASTE ["..b.."]")
                                end
                        else
                                say_title("Stajenny:")
                                say("")
                                say("Obviously there is a problem with the information")
                        end
                end
        end
        state need_item50050 begin
                when letter begin
                        setskin(NOWINDOW)
                        makequestbutton("Przynies Medal Konny")
                        q.set_title("Przynies Medal Konny")
                        q.start()
                end
                when button or info begin
                        say_title("Informacje:")
                        say("")
                        ----"123456789012345678901234567890123456789012345678901234567890"|
                        say("Przynies Medal Konny Stajenemu.")
                        say("Mozesz go zdobyc w Latwym Lochu Malp.")
                        say("")
                        set_state(start)
                        q.done()
                end
        end
        state test begin
                when letter begin
                        q.set_counter("Pozostalo do zabicia", 20-pc.getqf("kill_count"))
                end
                when 503.kill begin
                        pc.setqf("kill_count", pc.getqf("kill_count")+1)
                        q.set_counter("Pozostalo do zabicia", 20-pc.getqf("kill_count"))
                        if get_time()>=pc.getqf("limit_time") then
                                set_state(failure)
                        end
                end
                when letter begin
                        q.set_clock("Pozostalo czasu", 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("Test")
                        q.set_title("Test")
                        q.start()
                end
                when button or info begin
                        say_title("Test")
                        say("")
                        say("Zabij 20 Dzikich Lucznikow w 30min.")
                        say("I wroc do Stajennego.")
                        say("")
                end
                when 503.kill with pc.getf("pony_buy","kill_count") >= 20 and pc.getf("pony_buy","limit_time")>=get_time() begin
                        set_state(report)
                end
                when 20349.chat."Status" with horse.get_grade()!=0 begin
                        set_state(start)
                        q.done()
                end
                when 20349.chat."Status Misji" begin
                        say_title("Stajenny:")
                        say("")
                        say("Zabij 20 Dzikich Lucznikow i wroc do mnie!")
                        say("")
                        local b=select("Szukam ich dalej", "Poddaje sie")
                        if 1==b then
                        elseif 2==b then
                                say_title("Stajenny:")
                                say("")
                                say("Na prawde odpuszczasz?")
                                say("")
                                local b=select("Tak", "Nie to tylko zart.")
                                if 1==b then
                                        say_title("Stajenny:")
                                        say("")
                                        say("Nastepnym razem bedzie lepiej.")
                                        say("")
                                        set_state(start)
                                        q.done()
                                elseif 2==b then
                                        say_title("Stajenny:")
                                        say("")
                                        say("Nie masz czasu na pomylki spiesz sie!")
                                        say("")
                                        say("Zabij Dzikich Lucznikow i wracaj!")
                                        say("")
                                else
                                        say("UNBEKANNTE TASTE ["..b.."]")
                                end
                        else
                                say("UNBEKANNTE TASTE ["..b.."]")
                        end
                end
        end
        state report begin
                when letter begin
                        setskin(NOWINDOW)
                        makequestbutton("Wracaj do Stajennego")
                        q.set_title("Wracaj do Stajennego")
                        q.start()
                end
                when button or info begin
                        say_title("Wracaj do Stajennego")
                        say("")
                        say("Wracaj do Stajennego powiadomic o sukcesie.")
                        say("")
                end

                when 20349.chat."Kon" with horse.get_grade()!=0 begin
                        set_state(start)
                        q.done()
                end
                when 20349.chat."Raport z misji Konnej" with horse.get_grade()==0 begin
                        say_title("Stajenny:")
                        say("")
                        ----"123456789012345678901234567890123456789012345678901234567890"|
                        say("Pozytywnie skaczyles test.")
                        say("")
                        say("Teraz Pozostalo Tylko wyprodukowanie zdjecia konia")
                        say("ktoro zajmie mi 2h.")
                        say("")
                        say_item_vnum(50051)
                        say_reward("Nie zapomnij ze kosztuje to 100.000 Yang!")
                        say("")
                        if is_test_server() then
                                pc.setqf("make_time", get_time()+10)
                        else
                                pc.setqf("make_time", get_time()+2*1*1)
                        end
                        set_state(wait)
                end
        end
        state wait begin
                when letter begin
                        setskin(NOWINDOW)
                        makequestbutton("Zdjecie Konia")
                        q.set_title("Zdjecie Konia")
                        q.start()
                end
                when button or info begin
                        say_title("Zdjecie Konia")
                        say("")
                        say("Stajenny obiecal wyprodukowac Zdjecie Konia.")
                        say("Czekaj cierpliwie on Cie zawola.")
                end
                when login with get_time()>=pc.getf("pony_buy","make_time") begin
                        set_state(buy)
                end
                when 20349.chat."Kon" with horse.get_grade()!=0 begin
                        set_state(start)
                        q.done()
                end
                when 20349.chat."Zdjecie Konia?" with horse.get_grade()==0 begin
                        say_title("Stajenny:")
                        say("")
                        ----"123456789012345678901234567890123456789012345678901234567890"|
                        say("Zajmie mi to jeszcze troche.")
                        say_reward("Pamietaj o 100.000 Yang dla mnie.")
                        say("")
                end
        end
        state buy begin
                when letter begin
                        setskin(NOWINDOW)
                        makequestbutton("Zdjecie Konia - Gotowe")
                        q.set_title("Zdjecie Konia - Gotowe")
                        q.start()
                end
                when button or info begin
                        say_title("Zdjecie Konia - Gotowe")
                        say("")
                        say("Zdjecie Konia - Gotowe!")
                        say("")
                        say("Udaj sie do Stajennego po odbior certyfikatu.")
                        say("")
                end
                when 20349.chat."Zdjecie Konia - Gotowe" with horse.get_grade()==0 and get_time()>=pc.getqf("make_time") begin
                        say_title("Stajenny:")
                        say("")
                        ----"123456789012345678901234567890123456789012345678901234567890"|
                        say("Teraz tylko wystarczy za nie zaplacic.")
                        say("Kosz to 100.000 Yang.")
                        say("")
                        say_reward("Chcesz kupic?")
                        say("")
                        local b=select("Tak", "Nie kupuj", "Odzuc")
                        if 1==b then
                                if pc.money>=100000 then
                                        char_log(0, " HORSE_BUY", "BEGIN")
                                        pc.changemoney(-100000)
                                        char_log(0, " HORSE_BUY", " DEC money 100000")
                                        horse.unride()
                                        horse.advance()
                                        horse.ride()
                                        char_log(0, " HORSE_BUY", "INC horse_advance 1")
                                        pc.give_item2("50051", 1)
                                        char_log(0, " HORSE_BUY", "INC 50051 1")
                                        char_log(0, " HORSE_BUY", "END")
                                        say_title("Stajenny:")
                                        say("")
                                        ----"123456789012345678901234567890123456789012345678901234567890"|
                                        say("Za pomoca Zdjecia Konia mozesz wolac go.")
                                        say("Pamietaj o rozwijaniu jego umiejetnosci.")
                                        say("")
                                        set_state(start)
                                        q.done()
                                else
                                        say_title("Stajenny:")
                                        say("")
                                        say_reward("Nie masz wystarczajaco Yang!")
                                        say("")
                                        say("")
                                end
                        elseif 2==b then
                                say_title("Stajenny:")
                                say("")
                                say("Wroc do mnie jeszcze.")
                                say("")

                        elseif 3==b then
                                say_title("Stajenny:")
                                say("")
                                ----"123456789012345678901234567890123456789012345678901234567890"|
                                say("Jesli odzucisz kupno bedziesz musial wykonywac")
                                say("test na nowo.")
                                say("")
                                local b=select("Tak chce tego", "Nie")
                                if 1==b then
                                        set_state(start)
                                elseif 2==b then
                                else
                                        say("UNBEKANNTE TASTE ["..b.."]")
                                end
                        else
                                say("UNBEKANNTE TASTE ["..b.."]")
                        end
                end
        end
        state failure begin
                when letter begin
                        setskin(NOWINDOW)
                        makequestbutton("Czas Mina!")
                        q.set_title("Czas Mina!")
                        q.start()
                end
                when button or info begin
                        say_title("Czas Mina!")
                        say("")
                        ----"123456789012345678901234567890123456789012345678901234567890"|
                        say("Nie zdazyles zabic 30 Dzikich Lucznikow w czasie 30min.")
                        say("")
                        say_reward("Przynies nowy Medal Konny Stajenemu.")
                        say_reward("I sprobuj ponownie.")
                        set_state(start)
                        q.done()
                end
        end
        state __COMPLETE__ begin
                when enter begin
                        q.done()
                end
        end
end

Po rozpoczeciu quest nie pojawia sie komunikaj ani nic a medal znika.