quest gatekeeper begin
    state start begin
        when 9997.chat."Chce sie przeniesc" begin
            local s=select("Darmowe","Platne","Premium","Mapa handlowa","Wyjscie")
            if s==5 then
                say("Zegnaj")
                return
            end
            if s==4 then
                pc.warp(999900+13000,999900+3500)
            end
            if s==1 then
                say("Dokonaj wyboru:")
                local a=select("Miasta","Wyjscie")
                if a==1 then
                    local aa=select("Jinno M1","Jinno M2","Shinsoo M1","Shinsoo M2","Chunjo M1","Chunjo M2","Wyjscie")
                    if aa==7 then
                        say("Zegnaj")
                        return
                    end
                    if aa==1 then
                        pc.warp(969600, 278400)
                    end
                    if aa==2 then
                        pc.warp(873100, 242600)
                    end
                    if aa==3 then
                        pc.warp(469300, 964200)
                    end
                    if aa==4 then
                        pc.warp(360800, 877600)
                    end
                    if aa==5 then
                        pc.warp(55700, 157900)
                    end
                    if aa==6 then
                        pc.warp(138500, 234900)
                    end
                end
                if a==2 then
                    say("Zegnaj")
                    return
                end
            end
            if s==2 then
                say("Musisz posiadac przepustke!")
                say("Dokonaj wyboru:")
                local b=select("Expowiska","Wyjscie")
                    if b==2 then
                        say("Zegnaj")
                        return
                    end
                    if b==1 then
                        say("Strona 1/2")
                        say("Dokonaj wyboru:")
                        local bb=select("Dolina Orkow","Pustynia","Gora Sohan","Ogniste Ziemie","Wieza Demonow","Las Duchow",">> Strona 2 <<","Wyjscie")
                        if bb==8 then
                            say("Zagnaj")
                        end
                        if bb==7 then
                            say("Strona 2/2")
                            say("Dokonaj wyboru:")
                            local bbb=select("Loch Pajakow","Wezowe Pole","Atlantyda","Czerwony Las","Kraina Olbrzymow","Wyjscie")
                            if bbb==6 then
                                say("Zegnaj")
                                return
                            end
                            if bbb==1 and pc.count_item(71122)>=1 then
                                pc.warp(60000 , 496000)
                                pc.remove_item(71122)
                            end
                            if bbb==2 and pc.count_item(71122)>=1 then
                                pc.warp(1049600+9400, 716800+9400)
                                pc.remove_item(71122)
                            end
                            if bbb==3 and pc.count_item(71122)>=1 then
                                pc.warp(284200, 810500)
                                pc.remove_item(71122)
                            end
                            if bbb==4 and pc.count_item(71122)>=1 then
                                pc.warp(1119900, 70800)
                                pc.remove_item(71122)
                            end
                            if bbb==5 and pc.count_item(71122)>=1 then
                                pc.warp(819200, 716800)
                                pc.remove_item(71122)
                                else
                                say("Nie posiadasz przepustki!")
                                return
                            end
                        end
                        if bb==1 and pc.count_item(71122)>=1 then
                                pc.remove_item(71122)
                            local empire = pc . get_empire ( )
                            if empire==1 then
                            pc.warp(402100, 673900)
                            end
                            if empire==2 then
                            pc.warp(270400, 739900)
                            end
                            if empire==3 then
                            pc.warp(321300, 808000)
                            end
                        end
                        if bb==2 and pc.count_item(71122)>=1 then
                            pc.remove_item(71122)
                            local empire = pc . get_empire ( )
                            if empire==1 then
                            pc.warp(217800, 627200)
                            end
                            if empire==2 then
                            pc.warp(221900, 502700)
                            end
                            if empire==3 then
                            pc.warp(344000, 502500)
                            end
                        end
                        if bb==3 and pc.count_item(71122)>=1 then
                                pc.remove_item(71122)
                            local empire = pc . get_empire ( )
                            if empire==1 then
                            pc.warp(434200, 290600)
                            end
                            if empire==2 then
                            pc.warp(375200, 174900)
                            end
                            if empire==3 then
                            pc.warp(491800, 173600)
                            end
                        end
                        if bb==4 and pc.count_item(71122)>=1 then
                                pc.remove_item(71122)
                            local empire = pc . get_empire ( )
                            if empire==1 then
                            pc.warp(599400, 756300)
                            end
                            if empire==2 then
                            pc.warp(597800, 622200)
                            end
                            if empire==3 then
                            pc.warp(730700, 689800)
                            end
                        end
                        if bb==5 and pc.count_item(71122)>=1 then
                                pc.remove_item(71122)
                            pc.warp(590500, 110800)
                        end
                        if bb==6 and pc.count_item(71122)>=1 then
                                pc.remove_item(71122)
                            pc.warp(288700, 5700)
                                                    else
                        say("Nie posiadasz przepustki!")
                        end

                    end
            end
            if s==3 then
                local c=select("Pustynia Demonow","Wyjscie")
                if c==2 then
                    say("Zegnaj")
                    return
                end
                if c==1 then
                    if pc.get_level()>=100 and pc.count_item(90034)>=1 and pc.count_item(30054)<1and pc.count_item(22010)<1 and pc.count_item(22000)<1 and pc.count_item(72001)<1 and pc.count_item(72002)<1 and pc.count_item(72003)<1 and pc.count_item(71015)<1 and pc.count_item(70005)<1 then
                    pc.warp(777700+5400,777700+7100)
                    pc.remove_item(90034,1)

                    else
                        say("Nie posiadasz Przepustki+!")
                        say("Lub")
                        say("Nie mozesz sie teleportowac z Obrączka Ślubna")
                        say("Lub")
                        say("Nie mozesz sie teleportowac z zwojem powrotu")
                        say("Lub")
                        say("Nie mozesz sie teleportowac z pierscieniem expa.")
                        say("Wejscie od 100lvl")
                    end
                end
            end
        end
    end
end