3 Sayfadan Oluşan İtem Sorgulamalı Işınlanma Questi Basitçe Düzenlenebilir

quest premium_teleport begin
    state start begin
        when 508050.use begin
            local page, done = 1, false
            while not done do
                say_title("Teleport Ring")
                say("Select the region you want to teleport to:")

                if page == 1 then
                    local menu = select("1. Map [200x]", "2. Map [200x]", "3. Map [200x]", "Next", "Exit")
                    if menu == 1 then
                        if pc.count_item(508051) >= 1 then pc.warp(1055100, 619500) else say("You need the following item to teleport:") say_item_vnum(508051) end
                        done = true
                    elseif menu == 2 then
                        if pc.count_item(508052) >= 1 then pc.warp(921600, 614400) else say("You need the following item to teleport:") say_item_vnum(508052) end
                        done = true
                    elseif menu == 3 then
                        if pc.count_item(508053) >= 1 then pc.warp(921600, 742400) else say("You need the following item to teleport:") say_item_vnum(508053) end
                        done = true
                    elseif menu == 4 then
                        page = 2
                    elseif menu == 5 then
                        done = true
                    end

                elseif page == 2 then
                    local menu = select("4. Map [200x]", "5. Map [200x]", "6. Map [200x]", "Back", "Next", "Exit")
                    if menu == 1 then
                        if pc.count_item(508054) >= 1 then pc.warp(793600, 614400) else say("You need the following item to teleport:") say_item_vnum(508054) end
                        done = true
                    elseif menu == 2 then
                        if pc.count_item(508055) >= 1 then pc.warp(665600, 614400) else say("You need the following item to teleport:") say_item_vnum(508055) end
                        done = true
                    elseif menu == 3 then
                        if pc.count_item(508056) >= 1 then pc.warp(1049600, 742400) else say("You need the following item to teleport:") say_item_vnum(508056) end
                        done = true
                    elseif menu == 4 then
                        page = 1
                    elseif menu == 5 then
                        page = 3
                    elseif menu == 6 then
                        done = true
                    end

                elseif page == 3 then
                    local menu = select("7. Map [200x]", "8. Map [200x]", "9. Map [200x]", "Back", "Exit")
                    if menu == 1 then
                        if pc.count_item(508057) >= 1 then pc.warp(1177600, 614400) else say("You need the following item to teleport:") say_item_vnum(508057) end
                        done = true
                    elseif menu == 2 then
                        if pc.count_item(508058) >= 1 then pc.warp(665600, 742400) else say("You need the following item to teleport:") say_item_vnum(508058) end
                        done = true
                    elseif menu == 3 then
                        if pc.count_item(508059) >= 1 then pc.warp(742400, 742400) else say("You need the following item to teleport:") say_item_vnum(508059) end
                        done = true
                    elseif menu == 4 then
                        page = 2
                    elseif menu == 5 then
                        done = true
                    end
                end
            end
        end
    end
end