[AYUDA QUEST DRAGONLAIR.LUA ]

[online22]

Hola chicos como estan he estado implementando quest en mi el servidor pero la del Beran me esta mandando un errror y no entra completa, ubique el error pero no se que debo hacer .

i"f pc.is_busy0() then"

 

Quote

quest dragonlair begin
    state start begin
        when logout begin
            if pc.get_map_index() == 208 then
            pc.delqf("icerdesin1")
            pc.delqf("icerdesin2")
            pc.delqf("icerdesin3")
            pc.delqf("icerdesin4")
                
            pc.warp(180100, 1220400)
            end
        end
        function yaziarkaplan(tip)
            if tip == 1 then
                addimage(70, 40, "arkaplan.tga")
            end
        end
        function harf(tip)
            if tip == 1 then
                addimage(80, 50, "a.tga")
            elseif tip == 2 then
                addimage(80, 50, "b.tga")
            elseif tip == 3 then
                addimage(80, 50, "c.tga")
            elseif tip == 4 then
                addimage(80, 50, "d.tga")
            elseif tip == 5 then
                addimage(80, 50, "e.tga")
            elseif tip == 6 then
                addimage(80, 50, "f.tga")
            elseif tip == 7 then
                addimage(80, 50, "g.tga")
            elseif tip == 8 then
                addimage(80, 50, "h.tga")
            elseif tip == 9 then
                addimage(80, 50, "j.tga")
            elseif tip == 10 then
                addimage(80, 50, "k.tga")
            elseif tip == 11 then
                addimage(80, 50, "l.tga")
            elseif tip == 12 then
                addimage(80, 50, "m.tga")
            elseif tip == 13 then
                addimage(80, 50, "n.tga")
            elseif tip == 14 then
                addimage(80, 50, "p.tga")
            elseif tip == 14 then
                addimage(80, 50, "i.tga")
            end
        end
        function resim(tip)
            if tip == 1 then
                addimage(80, 50, "1.tga")
            elseif tip == 2 then
                addimage(80, 50, "2.tga")
            elseif tip == 3 then
                addimage(80, 50, "3.tga")
            elseif tip == 4 then
                addimage(80, 50, "4.tga")
            elseif tip == 5 then
                addimage(80, 50, "5.tga")
            elseif tip == 6 then
                addimage(80, 50, "6.tga")
            elseif tip == 7 then
                addimage(80, 50, "7.tga")
            elseif tip == 8 then
                addimage(80, 50, "8.tga")
            elseif tip == 9 then
                addimage(80, 50, "9.tga")
            end
        end
        function resim2(tip)
            if tip == 1 then
                addimage(110, 50, "1.tga")
            elseif tip == 2 then
                addimage(110, 50, "2.tga")
            elseif tip == 3 then
                addimage(110, 50, "3.tga")
            elseif tip == 4 then
                addimage(110, 50, "4.tga")
            elseif tip == 5 then
                addimage(110, 50, "5.tga")
            elseif tip == 6 then
                addimage(110, 50, "6.tga")
            elseif tip == 7 then
                addimage(110, 50, "7.tga")
            elseif tip == 8 then
                addimage(110, 50, "8.tga")
            elseif tip == 9 then
                addimage(110, 50, "9.tga")
            end
        end
        function resim3(tip)
            if tip == 1 then
                addimage(140, 50, "1.tga")
            elseif tip == 2 then
                addimage(140, 50, "2.tga")
            elseif tip == 3 then
                addimage(140, 50, "3.tga")
            elseif tip == 4 then
                addimage(140, 50, "4.tga")
            elseif tip == 5 then
                addimage(140, 50, "5.tga")
            elseif tip == 6 then
                addimage(140, 50, "6.tga")
            elseif tip == 7 then
                addimage(140, 50, "7.tga")
            elseif tip == 8 then
                addimage(140, 50, "8.tga")
            elseif tip == 9 then
                addimage(140, 50, "9.tga")
            end
        end
        function resim4(tip)
            if tip == 1 then
                addimage(170, 50, "1.tga")
            elseif tip == 2 then
                addimage(170, 50, "2.tga")
            elseif tip == 3 then
                addimage(170, 50, "3.tga")
            elseif tip == 4 then
                addimage(170, 50, "4.tga")
            elseif tip == 5 then
                addimage(170, 50, "5.tga")
            elseif tip == 6 then
                addimage(170, 50, "6.tga")
            elseif tip == 7 then
                addimage(170, 50, "7.tga")
            elseif tip == 8 then
                addimage(170, 50, "8.tga")
            elseif tip == 9 then
                addimage(170, 50, "9.tga")
            end
        end
        function resim5(tip)
            if tip == 1 then
                addimage(200, 50, "1.tga")
            elseif tip == 2 then
                addimage(200, 50, "2.tga")
            elseif tip == 3 then
                addimage(200, 50, "3.tga")
            elseif tip == 4 then
                addimage(200, 50, "4.tga")
            elseif tip == 5 then
                addimage(200, 50, "5.tga")
            elseif tip == 6 then
                addimage(200, 50, "6.tga")
            elseif tip == 7 then
                addimage(200, 50, "7.tga")
            elseif tip == 8 then
                addimage(200, 50, "8.tga")
            elseif tip == 9 then
                addimage(200, 50, "9.tga")
            end
        end
        function resim6(tip)
            if tip == 1 then
                addimage(230, 50, "1.tga")
            elseif tip == 2 then
                addimage(230, 50, "2.tga")
            elseif tip == 3 then
                addimage(230, 50, "3.tga")
            elseif tip == 4 then
                addimage(230, 50, "4.tga")
            elseif tip == 5 then
                addimage(230, 50, "5.tga")
            elseif tip == 6 then
                addimage(230, 50, "6.tga")
            elseif tip == 7 then
                addimage(230, 50, "7.tga")
            elseif tip == 8 then
                addimage(230, 50, "8.tga")
            elseif tip == 9 then
                addimage(230, 50, "9.tga")
            end
        end
        when 30121.chat."{867}" with pc.get_map_index() == 73 begin
            if pc.get_channel_id() == 1  then 
                ----------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 2 and game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time() > 0 then
                    say_title("{1477}")
                    say("")
                    say(882)
                    say("Kalan süre: "..game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time().." saniye")
                    say("")
                    return
                end
                ---------
                if game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time() < 0 and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") >= 1 then
                    game.set_event_flag("ejder_kullanimda"..pc.get_channel_id().."",0)
                    game.set_event_flag("ejderlideribenim"..pc.get_channel_id().."",0)
                    purge_area(829200,1059600,844200,1074600)
                    warp_all_to_village(208)
                    setskin(NOWINDOW)
                    return
                end
                -----------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 and pc.count_item(30179) < 3 then
                    say_title("{1477}")
                    say("Gerekli eþya 3x: "..item_name(30179)..":")
                    say_item_vnum(30179)
                    say(876)
                    return
                end
                ------------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 1 then
                    say_title("{1477}")
                    say("")
                    say(868)
                    say("")
                    local sifre = tonumber(input(""))
                    if string.len(sifre) < 4 then
                        say_title("{1477}")
                        say("")
                        say(874)
                        return
                    end
                    if game.get_event_flag("ejder_sifresi"..pc.get_channel_id().."") == sifre then
                        say_title("{1477}")
                        say("")
                        if pc.count_item(30179) < 3 then
                            say("Girmene izin veremem.")
                            say("Gerekli eþya 3x: "..item_name(30179)..":")
                            say_item_vnum(30179)
                            say("3 tane anahtara sahip olduðunda tekrar gel.")
                            return
                        end
                        if pc.is_busy0() then
                            return
                        else
                            pc.remove_item("30179",3)
                            pc.setqf("icerdesin"..pc.get_channel_id().."",1)
                            pc.warp(843600,1066900)
                        end
                    elseif sifre != game.get_event_flag("ejder_sifresi"..pc.get_channel_id().."") then
                        say_title("{1477}")
                        say(869)
                        return
                    end
                end
                -------------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 and pc.count_item(30179) >= 3 then
                    say_title("{1477}")
                    say(871)
                    say("")
                    say_size(350,400)
                    pc.setqf("ejder_bug_engel3",get_time()+10)
                    local hikmet = dragonlair.hazirim()
                    if get_time() > pc.getqf("ejder_bug_engel3") then
                        say_title("{1477}")
                        say("10 saniye doldu þansýný tekrar dene.")
                        pc.setqf("ejder_bug_engel3",get_time()+0)
                        return
                    end                    
                    if hikmet == true and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 then
                        pc.setqf("ejder_bug_engel2",get_time()+10)
                        dragonlair.yaziarkaplan(1) 
                        local r1 = math.random(1,9)
                        if r1 == 1 then
                            dragonlair.resim(1) 
                        elseif r1 == 2 then
                            dragonlair.resim(2)
                        elseif r1 == 3 then
                            dragonlair.resim(3)
                        elseif r1 == 4 then
                            dragonlair.resim(4)
                        elseif r1 == 5 then
                            dragonlair.resim(5)
                        elseif r1 == 6 then
                            dragonlair.resim(6)
                        elseif r1 == 7 then
                            dragonlair.resim(7)
                        elseif r1 == 8 then
                            dragonlair.resim(8)
                        elseif r1 == 9 then
                            dragonlair.resim(9)
                        end
                        local r2 = math.random(1,9)
                        if r2 == 1 then
                            dragonlair.resim2(1) 
                        elseif r2 == 2 then
                            dragonlair.resim2(2)
                        elseif r2 == 3 then
                            dragonlair.resim2(3)
                        elseif r2 == 4 then
                            dragonlair.resim2(4)
                        elseif r2 == 5 then
                            dragonlair.resim2(5)
                        elseif r2 == 6 then
                            dragonlair.resim2(6)
                        elseif r2 == 7 then
                            dragonlair.resim2(7)
                        elseif r2 == 8 then
                            dragonlair.resim2(8)
                        elseif r2 == 9 then
                            dragonlair.resim2(9)
                        end
                        local r3 = math.random(1,6)
                        if r3 == 1 then
                            dragonlair.resim3(1) 
                        elseif r3 == 2 then
                            dragonlair.resim3(2)
                        elseif r3 == 3 then
                            dragonlair.resim3(3)
                        elseif r3 == 4 then
                            dragonlair.resim3(4)
                        elseif r3 == 5 then
                            dragonlair.resim3(5)
                        elseif r3 == 6 then
                            dragonlair.resim3(6)
                        elseif r3 == 7 then
                            dragonlair.resim3(7)
                        elseif r3 == 8 then
                            dragonlair.resim3(8)
                        elseif r3 == 9 then
                            dragonlair.resim3(9)
                        end
                        local r4 = math.random(1,9)
                        if r4 == 1 then
                            dragonlair.resim4(1) 
                        elseif r4 == 2 then
                            dragonlair.resim4(2)
                        elseif r4 == 3 then
                            dragonlair.resim4(3)
                        elseif r4 == 4 then
                            dragonlair.resim4(4)
                        elseif r4 == 5 then
                            dragonlair.resim4(5)
                        elseif r4 == 6 then
                            dragonlair.resim4(6)
                        elseif r4 == 7 then
                            dragonlair.resim4(7)
                        elseif r4 == 8 then
                            dragonlair.resim4(8)
                        elseif r4 == 9 then
                            dragonlair.resim4(9)
                        end
                        local r5 = math.random(1,9)
                        if r5 == 1 then
                            dragonlair.resim5(1) 
                        elseif r5 == 2 then
                            dragonlair.resim5(2)
                        elseif r5 == 3 then
                            dragonlair.resim5(3)
                        elseif r5 == 4 then
                            dragonlair.resim5(4)
                        elseif r5 == 5 then
                            dragonlair.resim5(5)
                        elseif r5 == 6 then
                            dragonlair.resim5(6)
                        elseif r5 == 7 then
                            dragonlair.resim5(7)
                        elseif r5 == 8 then
                            dragonlair.resim5(8)
                        elseif r5 == 9 then
                            dragonlair.resim5(9)
                        end
                        local r6 = math.random(1,9)
                        if r6 == 1 then
                            dragonlair.resim6(1) 
                        elseif r6 == 2 then
                            dragonlair.resim6(2)
                        elseif r6 == 3 then
                            dragonlair.resim6(3)
                        elseif r6 == 4 then
                            dragonlair.resim6(4)
                        elseif r6 == 5 then
                            dragonlair.resim6(5)
                        elseif r6 == 6 then
                            dragonlair.resim6(6)
                        elseif r6 == 7 then
                            dragonlair.resim6(7)
                        elseif r6 == 8 then
                            dragonlair.resim6(8)
                        elseif r6 == 9 then
                            dragonlair.resim6(9)
                        end
                        local olusansifre = ""..r1..""..r2..""..r3..""..r4..""..r5..""..r6..""
                        pc.setqf("sifreyiyazdir",olusansifre)
                        say("")
                        say("")
                        say("")
                        say("")
                        say("")
                        say("")
                        say("")
                        say("")
                        say("")
                        say_reward("Resim'de gördüðünü yaz: ")
                        say_reward("10 saniye süren var!")
                        local sifre = tonumber(input())
                        if get_time() > pc.getqf("ejder_bug_engel2") then
                            say_title("{1477}")
                            say("10 saniye doldu þansýný tekrar dene.")
                            pc.setqf("ejder_bug_engel2",get_time()+0)
                            return
                        end
                        if string.len(sifre) != 6 then
                            say_title("{1477}")
                            say("")
                            say("Þifre 6 karakterden oluþmalý.")
                            return
                        end
                        if sifre == pc.getqf("sifreyiyazdir") and pc.count_item(30179)>=3 then
                            say_title("{1477}")
                            say("")
                            say(883)
                            say("3x:")
                            say_item_vnum(30179)
                            say_reward("10 saniye süren var!")
                            pc.setqf("ejder_bug_engel3",get_time()+10)
                            say_size(350,400)
                            local zaxd = dragonlair.alvebirak()
                            if get_time() > pc.getqf("ejder_bug_engel3") then
                                say_title("{1477}")
                                say("10 saniye doldu þansýný tekrar dene.")
                                pc.setqf("ejder_bug_engel3",get_time()+0)
                                return
                            end
                            if zaxd == false then
                                return
                            elseif zaxd == true and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 then
                                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") != 0 then
                                    syschat("Ejderha odasýna baþka bir grup girdi.")
                                    return
                                end
                                if pc.is_busy0() then
                                    return
                                else
                                    pc.remove_item("30179",3)
                                    pc.setqf("icerdesin"..pc.get_channel_id().."",1)
                                    pc.setqf("lider",1)
                                    pc.setqf("ejder_sifre",olusansifre)
                                    clear_server_timer("ejderi_kescen"..pc.get_channel_id().."",get_server_timer_arg())
                                    clear_server_timer("disari_yolluyoz"..pc.get_channel_id().."",get_server_timer_arg())
                                    game.set_event_flag("ejder_kullanimda"..pc.get_channel_id().."",1)
                                    game.set_event_flag("ejder_sifresi"..pc.get_channel_id().."",olusansifre)
                                    game.set_event_flag("time_1"..pc.get_channel_id().."", get_time()+45*60*1)
                                    pc.warp(843600, 1066900)
                                end
                            elseif zaxd == true and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") != 0 then
                                say_title("{1477}")
                                say("")
                                say(868)
                            end
                        elseif sifre != olusansifre then
                            say_title("{1477}")
                            say("")
                            say("Hatalý giriþ.")
                        else
                            say_title("{1477}")
                            say("")
                            say("Bir hata oluþtu.")
                            say("")
                        end
                    end
                end
            elseif pc.get_channel_id() == 2 then
                ----------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 2 and game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time() > 0 then
                    say_title("{1477}")
                    say("")
                    say(882)
                    say("Kalan süre: "..game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time().." saniye")
                    say("")
                    return
                end
                ---------
                if game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time() < 0 and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") >= 1 then
                    game.set_event_flag("ejder_kullanimda"..pc.get_channel_id().."",0)
                    game.set_event_flag("ejderlideribenim"..pc.get_channel_id().."",0)
                    purge_area(829200,1059600,844200,1074600)
                    warp_all_to_village(208)
                    setskin(NOWINDOW)
                    return
                end
                -----------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 and pc.count_item(30179) < 3 then
                    say_title("{1477}")
                    say("Gerekli eþya 3x: "..item_name(30179)..":")
                    say_item_vnum(30179)
                    say("3 adet anahtara ihtiyacýn var.")
                    return
                end
                ------------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 1 then
                    say_title("{1477}")
                    say("")
                    say(868)
                    say("")
                    local sifre = tonumber(input(""))
                    if string.len(sifre) < 4 then
                        say_title("{1477}")
                        say("")
                        say("Þifre en az 4 karakterden oluþmalý.")
                        return
                    end
                    if game.get_event_flag("ejder_sifresi"..pc.get_channel_id().."") == sifre then
                        say_title("{1477}")
                        say("")
                        if pc.count_item(30179) < 3 then
                            say("Girmene izin veremem.")
                            say("Gerekli eþya 3x: "..item_name(30179)..":")
                            say_item_vnum(30179)
                            say("3 tane anahtara sahip olduðunda tekrar gel.")
                            return
                        end
                        if pc.is_busy0() then
                            return
                        else
                            pc.remove_item("30179",3)
                            pc.setqf("icerdesin"..pc.get_channel_id().."",1)
                            pc.warp(843600,1066900)
                        end
                    elseif sifre != game.get_event_flag("ejder_sifresi"..pc.get_channel_id().."") then
                        say_title("{1477}")
                        say(869)
                        return
                    end
                end
                -------------
                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 and pc.count_item(30179) >= 3 then
                    say_title("{1477}")
                    say(871)
                    say("")
                    say_size(350,420)
                    pc.setqf("ejder_bug_engel3",get_time()+10)
                    local hikmet = dragonlair.hazirim()
                    if get_time() > pc.getqf("ejder_bug_engel3") then
                        say_title("{1477}")
                        say("10 saniye doldu þansýný tekrar dene.")
                        pc.setqf("ejder_bug_engel3",get_time()+0)
                        return
                    end                    
                    if hikmet == true and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 then
                        pc.setqf("ejder_bug_engel2",get_time()+10)
                        say_size(350,410)
                        say("")
                        say("")
                        dragonlair.yaziarkaplan(1)
                        say("")
                        say("")
                        say("")
                        say("")
                        local pin1 = math.random(1,9)
                        if pin1 == 1 then
                            dragonlair.resim(1) 
                        elseif pin1 == 2 then
                            dragonlair.resim(2)
                        elseif pin1 == 3 then
                            dragonlair.resim(3)
                        elseif pin1 == 4 then
                            dragonlair.resim(4)
                        elseif pin1 == 5 then
                            dragonlair.resim(5)
                        elseif pin1 == 6 then
                            dragonlair.resim(6)
                        elseif pin1 == 7 then
                            dragonlair.resim(7)
                        elseif pin1 == 8 then
                            dragonlair.resim(8)
                        elseif pin1 == 9 then
                            dragonlair.resim(9)
                        end
                        local pin2 = math.random(1,9)
                        if pin2 == 1 then
                            dragonlair.resim2(1) 
                        elseif pin2 == 2 then
                            dragonlair.resim2(2)
                        elseif pin2 == 3 then
                            dragonlair.resim2(3)
                        elseif pin2 == 4 then
                            dragonlair.resim2(4)
                        elseif pin2 == 5 then
                            dragonlair.resim2(5)
                        elseif pin2 == 6 then
                            dragonlair.resim2(6)
                        elseif pin2 == 7 then
                            dragonlair.resim2(7)
                        elseif pin2 == 8 then
                            dragonlair.resim2(8)
                        elseif pin2 == 9 then
                            dragonlair.resim2(9)
                        end
                        local pin3 = math.random(1,6)
                        if pin3 == 1 then
                            dragonlair.resim3(1) 
                        elseif pin3 == 2 then
                            dragonlair.resim3(2)
                        elseif pin3 == 3 then
                            dragonlair.resim3(3)
                        elseif pin3 == 4 then
                            dragonlair.resim3(4)
                        elseif pin3 == 5 then
                            dragonlair.resim3(5)
                        elseif pin3 == 6 then
                            dragonlair.resim3(6)
                        elseif pin3 == 7 then
                            dragonlair.resim3(7)
                        elseif pin3 == 8 then
                            dragonlair.resim3(8)
                        elseif pin3 == 9 then
                            dragonlair.resim3(9)
                        end
                        local pin4 = math.random(1,9)
                        if pin4 == 1 then
                            dragonlair.resim4(1) 
                        elseif pin4 == 2 then
                            dragonlair.resim4(2)
                        elseif pin4 == 3 then
                            dragonlair.resim4(3)
                        elseif pin4 == 4 then
                            dragonlair.resim4(4)
                        elseif pin4 == 5 then
                            dragonlair.resim4(5)
                        elseif pin4 == 6 then
                            dragonlair.resim4(6)
                        elseif pin4 == 7 then
                            dragonlair.resim4(7)
                        elseif pin4 == 8 then
                            dragonlair.resim4(8)
                        elseif pin4 == 9 then
                            dragonlair.resim4(9)
                        end
                        local pin5 = math.random(1,9)
                        if pin5 == 1 then
                            dragonlair.resim5(1) 
                        elseif pin5 == 2 then
                            dragonlair.resim5(2)
                        elseif pin5 == 3 then
                            dragonlair.resim5(3)
                        elseif pin5 == 4 then
                            dragonlair.resim5(4)
                        elseif pin5 == 5 then
                            dragonlair.resim5(5)
                        elseif pin5 == 6 then
                            dragonlair.resim5(6)
                        elseif pin5 == 7 then
                            dragonlair.resim5(7)
                        elseif pin5 == 8 then
                            dragonlair.resim5(8)
                        elseif pin5 == 9 then
                            dragonlair.resim5(9)
                        end
                        local pin6 = math.random(1,9)
                        if pin6 == 1 then
                            dragonlair.resim6(1) 
                        elseif pin6 == 2 then
                            dragonlair.resim6(2)
                        elseif pin6 == 3 then
                            dragonlair.resim6(3)
                        elseif pin6 == 4 then
                            dragonlair.resim6(4)
                        elseif pin6 == 5 then
                            dragonlair.resim6(5)
                        elseif pin6 == 6 then
                            dragonlair.resim6(6)
                        elseif pin6 == 7 then
                            dragonlair.resim6(7)
                        elseif pin6 == 8 then
                            dragonlair.resim6(8)
                        elseif pin6 == 9 then
                            dragonlair.resim6(9)
                        end
                        say_title("{1477}")
                        say_reward("10 saniye süren var!")
                        local gercek = number(2,6)
                        local pin
                        local sifre
                        local fake1 = number(100000,999999)
                        local fake2 = number(100000,999999)
                        local fake3 = number(100000,999999)
                        local fake4 = number(100000,999999)
                        local olusansifre = ""..pin1..""..pin2..""..pin3..""..pin4..""..pin5..""..pin6..""
                        if gercek == 2 then
                            pin = olusansifre
                            sifre = select(1216,pin,fake1,fake2,fake3,fake4)
                        elseif gercek == 3 then
                            pin = olusansifre
                            sifre = select(1216,fake1,pin,fake2,fake3,fake3)
                        elseif gercek == 4 then
                            pin = olusansifre
                            sifre = select(1216,fake1,fake2,pin,fake3,fake4)
                        elseif gercek == 5 then
                            pin = olusansifre
                            sifre = select(1216,fake1,fake2,fake3,pin,fake4)
                        elseif gercek == 6 then
                            pin = olusansifre
                            sifre = select(1216,fake1,fake2,fake3,fake4,pin)
                        end
                        if sifre == gercek and pc.count_item(30179)>=3 then
                            say_title("{1477}")
                            say("")
                            say(883)
                            say("3x:")
                            say_item_vnum(30179)
                            say_reward("10 saniye süren var!")
                            pc.setqf("ejder_bug_engel3",get_time()+10)
                            say_size(350,420)
                            local zaxd = dragonlair.alvebirak()
                            if get_time() > pc.getqf("ejder_bug_engel3") then
                                say_title("{1477}")
                                say("10 saniye doldu þansýný tekrar dene.")
                                pc.setqf("ejder_bug_engel3",get_time()+0)
                                return
                            end
                            if zaxd == false then
                                return
                            elseif zaxd == true and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") == 0 then
                                if game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") != 0 then
                                    syschat("Ejderha odasýna baþka bir grup girdi.")
                                    return
                                end
                                if pc.is_busy0() then
                                    return
                                else
                                    pc.remove_item("30179",3)
                                    pc.setqf("icerdesin"..pc.get_channel_id().."",1)
                                    pc.setqf("lider",1)
                                    pc.setqf("ejder_sifre",pin)
                                    clear_server_timer("ejderi_kescen"..pc.get_channel_id().."",get_server_timer_arg())
                                    clear_server_timer("disari_yolluyoz"..pc.get_channel_id().."",get_server_timer_arg())
                                    game.set_event_flag("ejder_kullanimda"..pc.get_channel_id().."",1)
                                    game.set_event_flag("ejder_sifresi"..pc.get_channel_id().."",pin)
                                    game.set_event_flag("time_1"..pc.get_channel_id().."", get_time()+45*60*1)
                                    pc.warp(843600, 1066900)
                                end
                            elseif zaxd == true and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") != 0 then
                                say_title("{1477}")
                                say("")
                                say(868)
                            end
                        elseif sifre != pin then
                            say_title("{1477}")
                            say("")
                            say("Hatalý giriþ.")
                        else
                            say_title("{1477}")
                            say("")
                            say("Bir hata oluþtu.")
                            say("")
                        end
                    end
                end            
            else
                say("")
                say("")
                say("Ejderhaya sadece CH 1'den girebilirsin. ")
            end
        end
        --when iceri_gir.timer begin
        --notice_all(""..pc.get_name().." grubu, Mavi Ejderha'yý öldürmeye çalýþýyor!")
        --pc.warp(843600, 1066900)
        --cleartimer("iceri_gir")
        --end
        
        function hazirim()
            local numara = number(1,3)
            if numara == 1 then
                local s = select(873,1216,1216)
                if s == 1 then
                    return true
                else
                    return false
                end
            elseif numara == 2 then
                local s = select(1216,873,1216)
                if s == 2 then
                    return true
                else
                    return false
                end
            elseif numara == 3 then
                local s = select(1216,1216,873)
                if s == 3 then
                    return true
                else
                    return false
                end
            end
        end

        function alvebirak()
            local numara = number(1,3)
            if numara == 1 then
                local s = select(884,1216,1216)
                if s == 1 then
                    return true
                else
                    return false
                end
            elseif numara == 2 then
                local s = select(1216,884,1216)
                if s == 2 then
                    return true
                else
                    return false
                end
            elseif numara == 3 then
                local s = select(1216,1216,884)
                if s == 3 then
                    return true
                else
                    return false
                end
            end
        end    
        when login begin
            if pc.getqf("icerdesin"..pc.get_channel_id().."") == 1 then
                send_letter("{888}")
            end
        end
    
        when button or info begin
        q.set_clock("Kalan süre:", game.get_event_flag("time_1"..pc.get_channel_id().."")-get_time())
        dragonlair.ejder_odasi_kalansure()
        end

        when login with pc.get_map_index() == 208 and pc.getqf("icerdesin"..pc.get_channel_id().."") != 1 begin
        pc.warp(180100,1220400)
        end
        
        when login with pc.get_map_index() == 208 and pc.getqf("lider") == 1 begin
            if game.get_event_flag("ejderlideribenim"..pc.get_channel_id().."") ==  0 then
                game.set_event_flag("kesilen_metin"..pc.get_channel_id().."",0)
                notice_all("|cff00ff00CH "..pc.get_channel_id()..": "..pc.get_name().." grubu, Mavi Ejderha'yý öldürmeye çalýþýyor!")
                notice(""..pc.getqf("ejder_sifre").." numaralý þifreyi daðýtmaya 5 dakika zamanýn")
                notice("var!")
                kill_all_in_map(208)
                purge_area(829200,1059600,844200,1074600)
                regen_in_map(208,"data/dungeon/dragon_lair/skia_deliboss.txt")
                server_timer("sifre_kapat"..pc.get_channel_id().."", 300,pc.get_map_index())
                server_timer("ejderi_kescen"..pc.get_channel_id().."", 4050,pc.get_map_index())
                dragonlair.ejder_odasi_kalansure()
                pc.setqf("lider",2)
                pc.set_warp_location(73 , 1801, 12204)    
            else
                pc.give_item2(30179,3)
                pc.warp(180100,1220400)
            end
        end
        
        when login with pc.get_map_index() == 208 and pc.getqf("icerdesin"..pc.get_channel_id().."") == 1 and pc.getqf("lider") != 1 begin
        dragonlair.ejder_odasi_kalansure()
        pc.set_warp_location(73 , 1801, 12204)
        end
        when kill with npc.get_race() == 8031 or npc.get_race() == 8032 or npc.get_race() == 8033 or npc.get_race() == 8034 and pc.get_map_index() == 208 begin
        local n =game.get_event_flag("kesilen_metin"..pc.get_channel_id().."") + 1
        game.set_event_flag("kesilen_metin"..pc.get_channel_id().."", n)
            if n > 3 then
            local t = number(1,4)
                if 1 == t then
                regen_in_map(208,"data/dungeon/dragon_lair/skia_boss1.txt")
                elseif 2 == t then
                regen_in_map(208,"data/dungeon/dragon_lair/skia_boss2.txt")
                elseif 3 == t then
                regen_in_map(208,"data/dungeon/dragon_lair/skia_boss3.txt")
                else
                regen_in_map(208,"data/dungeon/dragon_lair/skia_boss4.txt")
                end
            end
        end
        when kill with npc.get_race() == 2493 and pc.get_map_index() == 208 and game.get_event_flag("ejder_kullanimda"..pc.get_channel_id().."") >= 1 begin
            kill_all_in_map(208)
        game.drop_item_with_ownership("71123",1)
        game.drop_item_with_ownership("71129",1)
        local drop_chance = number(1,10)
            if drop_chance == 5 then
            game.drop_item_with_ownership("71129",1)
            end
        notice_all("|cff00ff00CH "..pc.get_channel_id()..": "..pc.get_name().." grubu, Mavi Ejderha'yý öldürdü!")
        game.set_event_flag("time_1"..pc.get_channel_id().."",get_time() + 5*60)
        clear_server_timer("ejderi_kescen"..pc.get_channel_id().."",get_server_timer_arg())
        server_timer("disari_yolluyoz"..pc.get_channel_id().."",60*5, pc.get_map_index()) ---300 olcak
        forked.warp_all_in_map("208","73","241300","1275400",295)
        end
        
        when sifre_kapat1.server_timer begin
        game.set_event_flag("ejder_kullanimda1",2)
        end
        
        when disari_yolluyoz1.server_timer begin
        notice_all("{887}")
        game.set_event_flag("kesilen_metin1",0)
        game.set_event_flag("ejderlideribenim1",0)
        purge_area(829200,1059600,844200,1074600)
        clear_server_timer("ejderi_kescen1",get_server_timer_arg())
        game.set_event_flag("ejder_kullanimda1",0)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        end
        
        
        when ejderi_kescen1.server_timer with game.get_event_flag("time_11") - get_time() <= 0 begin
        ---warp_all_in_map(208,180100,1220400)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        notice_all("{886}")
        purge_area(829200,1059600,844200,1074600)
        game.set_event_flag("kesilen_metin1",0)
        game.set_event_flag("ejder_kullanimda1",0)
        game.set_event_flag("ejderlideribenim1",0)
        end
        
        when sifre_kapat2.server_timer begin
        game.set_event_flag("ejder_kullanimda2",2)
        end
        
        when disari_yolluyoz2.server_timer begin
        notice_all("{887}")
        game.set_event_flag("kesilen_metin2",0)
        game.set_event_flag("ejderlideribenim2",0)
        purge_area(829200,1059600,844200,1074600)
        clear_server_timer("ejderi_kescen2",get_server_timer_arg())
        game.set_event_flag("ejder_kullanimda2",0)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        end
        
        
        when ejderi_kescen2.server_timer with game.get_event_flag("time_12") - get_time() <= 0 begin
        ---warp_all_in_map(208,180100,1220400)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        notice_all("{886}")
        purge_area(829200,1059600,844200,1074600)
        game.set_event_flag("kesilen_metin2",0)
        game.set_event_flag("ejderlideribenim2",0)
        game.set_event_flag("ejder_kullanimda2",0)
        end
        
        when sifre_kapat3.server_timer begin
        game.set_event_flag("ejder_kullanimda3",2)
        end
        
        when disari_yolluyoz3.server_timer begin
        notice_all("{887}")
        game.set_event_flag("kesilen_metin3",0)
        purge_area(829200,1059600,844200,1074600)
        clear_server_timer("ejderi_kescen3",get_server_timer_arg())
        game.set_event_flag("ejder_kullanimda3",0)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        end
        
        
        when ejderi_kescen3.server_timer with game.get_event_flag("time_13") - get_time() <= 0 begin
        ---warp_all_in_map(208,180100,1220400)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        notice_all("{886}")
        purge_area(829200,1059600,844200,1074600)
        game.set_event_flag("kesilen_metin3",0)
        game.set_event_flag("ejder_kullanimda3",0)
        end
        
        when sifre_kapat4.server_timer begin
        game.set_event_flag("ejder_kullanimda4",2)
        end
        
        when disari_yolluyoz4.server_timer begin
        notice_all("{887}")
        game.set_event_flag("kesilen_metin4",0)
        purge_area(829200,1059600,844200,1074600)
        clear_server_timer("ejderi_kescen4",get_server_timer_arg())
        game.set_event_flag("ejder_kullanimda4",0)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        end
        
        
        when ejderi_kescen4.server_timer with game.get_event_flag("time_14") - get_time() <= 0 begin
        ---warp_all_in_map(208,180100,1220400)
        forked.warp_all_in_map("208","73","180100","1220400",1)
        notice_all("{886}")
        purge_area(829200,1059600,844200,1074600)
        game.set_event_flag("kesilen_metin4",0)
        game.set_event_flag("ejder_kullanimda4",0)
        end
        
        when login with pc.get_map_index() != 208 begin
            if pc.getqf("icerdesin1") == 1 or pc.getqf("icerdesin2") == 1 or pc.getqf("icerdesin3") == 1 or pc.getqf("icerdesin4") == 1 then
            pc.delqf("icerdesin1")
            pc.delqf("icerdesin2")
            pc.delqf("icerdesin3")
            pc.delqf("icerdesin4")
            pc.delqf("ejder_sifre")
            pc.delqf("lider")
            end
        end
        
        function ejder_odasi_kalansure()
        if pc.get_map_index() == 208 then
            local saniyekalan = (game.get_event_flag("time_1"..pc.get_channel_id().."") - get_time())
            local dakikakalan = math.ceil(saniyekalan / 60)    
            notice("Mavi Ejderha'yý öldürmeye "..dakikakalan.." dakikalýk bir zaman")
            notice("kaldý!")     
        else
        end
        end    
    end
end

 

 

Quote

Debes iniciar sesión para ver el contenido del archivo adjunto en esta publicación.

 

 

[caanmasu]

Esa pc.función is_busy0() me suena a que si el pj tiene ventanas de comercio abierto se dice que está ocupado. Seguramente esa función no la tienes implementada en los files, solamente quita esa parte y ya

Lo de FUNCTION ... eso no es un error, ahí te dice el compilador que el bloque function ejder_odasi_kalansure() se compiló correctamente

[online22]

hace 32 minutos, caanmasu dijo:

Esa pc.función is_busy0() me suena a que si el pj tiene ventanas de comercio abierto se dice que está ocupado. Seguramente esa función no la tienes implementada en los files, solamente quita esa parte y ya

Lo de FUNCTION ... eso no es un error, ahí te dice el compilador que el bloque function ejder_odasi_kalansure() se compiló correctamente

Ahora da un error inmenso, de casualidad tu no tienes una quest para el dragon Beran funcional ?

[caanmasu]

en cada bloque if de pc.is_busy0 haz esto:

if pc.is_busy0() then --quita esto
   return --quita esto
else --quita esto
  instrucciones...
end --quita esto