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_verde("Incotro vrei sa mergi straine?")
local s = select("Map1", "Map2", "Valea Orcilor", "Desert", "Sohan", "Tara de foc", "Urmatoarele", "Inchide")
if s==7 then
say_title("Teleporter:")
say_verde("Incotro vrei sa mergi straine?")
local p = select("Turnul Demonilor", "V1", "Padurea Fantomelor", "Padurea Rosie", "Tara Gigantilor", "Grota Exilului", "Inchide")
if p==1 then
x="590400"
y="110500"
elseif p==2 then
x="91900"
y="525400"
elseif p==3 then
x="289000"
y="5800"
elseif p==4 then
say_title("Teleporter")
say("Incotro vrei sa mergi straine?")
t = select("Inceput", "Sfarsit", "Inchide")
if t==1 then
x="1119900"
y="70800"
elseif t==2 then
x="1119200"
y="7000"
end
elseif p==5 then
x="828100"
y="763400"
elseif p==6 then
x="284200"
y="809600"
end
elseif s==1 then
say_title("Teleporter")
say("Incotro vrei sa mergi straine?")
t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru","Inchide")
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("Incotro vrei sa mergi straine?")
t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru", "Inchide")
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("Incotro vrei sa mergi straine?")
t = select("Inceput", "Centru", "Arahani", "Inchide")
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("Incotro vrei sa mergi straine?")
t = select("Inceput", "Sfarsit", "Inchide")
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("Incotro vrei sa mergi straine?")
t = select("Inceput", "Mijloc", "Inchide")
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("Incotro vrei sa mergi straine?")
t = select("Inceput", "Inchide")
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
poftim revino cu replay 
de 
de