Cod: Selectaţi tot

quest warpring begin
   state start begin
      when 70007.use begin
         local x
         local y
         local t
         local e = pc.get_empire()
         say_title("Teleporter:")
         say("Încotro vrei sã mergi strãine?")
         local s = select("Map1", "Map2", "Valea Orcilor", "Desert", "Sohan", "Tara de foc", "Urmãtoarele", "Închide")
         if s==7 then
            say_title("Teleporter:")
            say("Încotro vrei sã mergi strãine?")
            local p = select("Turnul Demonilor", "V2", "Pãdurea Fantomelor", "Pãdurea Rosie", "Camp cu Serpi", "V4", "Închide")
            if p==1 then
               x="590400"
               y="110500"
            elseif p==2 then
               x="665600"
               y="435200"
            elseif p==3 then
               x="289000"
               y="5800"
            elseif p==4 then
               say_title("Teleporter")
               say("Încotro vrei sã mergi strãine?")
               t = select("Început", "Sfârsit", "Închide")
               if t==1 then
                  x="1119900"
                  y="70800"
               elseif t==2 then
                  x="1119200"
                  y="7000"
               end
            elseif p==5 then
               x="1049600"
               y="716800"
            elseif p==6 then
               x="14400"
               y="77800"
            end
         elseif s==1 then
            say_title("Teleporter")
            say("Încotro vrei sã mergi strãine?")
            t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru","Închide")
            if t==1 then
               x="473900"
               y="954600"
            elseif t==2 then
               x="63200"
               y="166700"
            elseif t==3 then
               x="959600"
               y="269700"
            end
         elseif s==2 then
            say_title("Teleporter:")
            say("Încotro vrei sã mergi strãine?")
            t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru", "Închide")
            if t==1 then
               x="352300"
               y="882700"
            elseif t==2 then
               x="145700"
               y="239800"
            elseif t==3 then
               x="863800"
               y="246000"
            end
         elseif s==3 then
            say_title("Teleporter:")
            say("Încotro vrei sã mergi strãine?")
            t = select("Început", "Centru", "Arahani", "Închide")
            if t==1 then
               if e==1 then
                  x="402100"
                  y="673900"                  
               elseif e==2 then
                  x="270400"
                  y="739900"
               elseif e==3 then
                  x="321300"
                  y="808000"
               end
            elseif t==2 then
               x="332700"
               y="745600"
            elseif t==3 then
               x="282800"
               y="792800"
            end
         elseif s==4 then
            say_title("Teleporter:")
            say("Încotro vrei sã mergi strãine?")
            t = select("Inceput", "Sfârsit", "Închide")
            if t==1 then
               if e==1 then
                  x="217800"
                  y="627200"                  
               elseif e==2 then
                  x="221900"
                  y="502700"
               elseif e==3 then
                  x="344000"
                  y="502500"
               end
            elseif t==2 then
               x="296300"
               y="547500"
            end
         elseif s==5 then
            say_title("Teleporter")
            say("Încotro vrei sã mergi strãine?")
            t = select("Început", "Mijloc", "Închide")
            if t==1 then
               if e==1 then
                  x="434200"
                  y="290600"                  
               elseif e==2 then
                  x="375200"
                  y="174900"
               elseif e==3 then
                  x="491800"
                  y="173600"
               end
            elseif t==2 then
               x="436200"
               y="215300"
            end         
         elseif s==6 then
            say_title("Teleporter:")
            say("Încotro vrei sã mergi strãine?")
            t = select("Început", "Închide")
            if t==1 then
               if e==1 then
                  x="599400"
                  y="756300"                  
               elseif e==2 then
                  x="597800"
                  y="622200"
               elseif e==3 then
                  x="730700"
                  y="689800"
               end
            elseif t==2 then
               return
            end
         end         
         if s!=8 or p!= 7 then
            pc.warp(x, y)
         end
      end
   end
end