Jump to content
  • 0
online22

[AYUDA QUEST DRAGONLAIR.LUA ]

Question

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.

 

 

Share this post


Link to post
Share on other sites

3 answers to this question

Recommended Posts

  • 0

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

Share this post


Link to post
Share on other sites
  • 0
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 ?

image.png

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...