[CERERE] Quest inel teleportare
Salut! Vreau si eu cat de urgent se poate un quest care sa contina doar Map1, Map2(si sa iti alegi ragatele). Multumesc anticipat!
-
FRANCIS
-
- Mesaje: 7879
- Membru din: 06 Noi 2015, 19:52
- Regat: Chunjo
- Aprecieri: 334
- Mulţumiri: 54528
- Discord: Copiază ID
Medalii
aici ... ăsta e bun
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 sa mergi straine?")
local s = select("Map1", "Map2", "Valea Orcilor", "Deoert", "Sohan", "Tara de foc", "Urmatoarele", "Închide")
if s==7 then
say_title("Teleporter:")
say("Încotro vrei sa mergi straine?")
local p = select("Turnul Demonilor", "V1", "Padurea Fantomelor", "Padurea Rooie", "Tara Gigantilor", "Grota Exilului", "Închide")
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("Încotro vrei sa mergi straine?")
t = select("Început", "Sfâroit", "Închide")
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("Încotro vrei sa mergi straine?")
t = select("Regatul Roou", "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 sa mergi straine?")
t = select("Regatul Roou", "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 sa mergi straine?")
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 sa mergi straine?")
t = select("Inceput", "Sfâroit", "Î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 sa mergi straine?")
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 sa mergi straine?")
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
If you talk to a man in a language he understands, that goes to his head. If you talk to him in his own language, that goes to his heart.
ENJOY
Afișează semnătura
-
Robert
-
- Mesaje: 1376
- Membru din: 19 Feb 2015, 10:29
- Server: Scorpions2
- Regat: Chunjo
- Aprecieri: 125
- Mulţumiri: 476
- Discord: Copiază ID
Medalii
Cod: Selectaţi tot
quest warpring begin
state start begin
when 70058.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", "Închide")
if 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 Roºu", "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
end
end
end
endNu este testat!
Kurosaki mai bine nu mai faceai comm... Robert o sa verific imediat si vin cu edit.
EDIT: Dau pe inel, dau pe regat dar nu am teleporteaza
EDIT: Dau pe inel, dau pe regat dar nu am teleporteaza
-
Robert
-
- Mesaje: 1376
- Membru din: 19 Feb 2015, 10:29
- Server: Scorpions2
- Regat: Chunjo
- Aprecieri: 125
- Mulţumiri: 476
- Discord: Copiază ID
Medalii
DarkOfLegend scrie:Kurosaki mai bine nu mai faceai comm... Robert o sa verific imediat si vin cu edit.
EDIT: Dau pe inel, dau pe regat dar nu am teleporteaza
Cod: Selectaţi tot
quest warpring begin
state start begin
when 70058.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", "Închide")
if 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 Roºu", "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
return
end
if s!=5 or p!= 6 then
pc.warp(x, y)
end
end
end
end- Pentru acest mesaj, Robert for the post:
- DarkOfLegend
http://just4metin.ro/topicuri-sterse/in ... t1451.html
Ai și tutorial
quest :
daca nu încearcă
sau
Ai și tutorial
quest :
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", "Deºert", "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", "V1", "Pãdurea Fantomelor", "Pãdurea Roºie", "Tara Gigantilor", "Grota Exilului", "Închide")
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("Încotro vrei sã mergi strãine?")
t = select("Început", "Sfârºit", "Închide")
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("Încotro vrei sã mergi strãine?")
t = select("Regatul Roºu", "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 Roºu", "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ârºit", "Î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
endCod: Selectaţi tot
quest inel_teleportare begin
state start begin
when 70007.use begin
local x
local y
local t
local e = pc.get_empire()
if pc.getqf ( "ring" ) == 0 then
say_title ( "Inel teleportare" )
say ( "Acest inel te ajutã sã te teleportezi" )
say ( "în aproape orice loc dorit, gratis." )
say ( "Un inel poate fi folosit doar de 50 de ori" )
say ( "" )
pc.setqf ( "ring", 1 )
pc.setqf ( "teleports", 50 )
return
end
if pc.getqf ( "teleports" ) <= 0 then
say_title ( "Inel teleportare" )
say ( "Nu mai poþi folosi acest inel." )
say ( "" )
pc.remove_item(item.vnum)
pc.setqf ( "ring", 0 )
return
end
if pc.getqf ( "ring" ) == 1 then
say_reward("Unde vrei sã te teleportezi?")
say_verde( "Teleportãri rãmase: "..pc.getqf("teleports").."" )
say_size(350, 350)
local s = select("Satul 1", "Satul 2", "Valea Seungryong", "Deºertul Yongbi", "Muntele Sohan", "Doyyumhwan", "Urmãtoarele", "Închide")
if s==7 then
say_verde( "Teleportãri rãmase: "..pc.getqf("teleports").."" )
say_size(350, 350)
local p = select("Turnul Demonilor", "Kuahlo Dong", "Lungsam", "Pãdurea Roºie", "Þãrâmul Giganþilor", "Grota Exilului", "Temniþa Maimuþelor", "Închide")
if p==1 then -- Turnul Demonilor
x="590400" y="110500"
elseif p==2 then -- Kuahlo Dong (V2)
x="91900" y="525400"
elseif p==3 then -- Lungsam
x="289000" y="5800"
elseif p==4 then -- Pãdurea Rosie
say_size(350, 180)
t = select( "Început", "Sfârºit", "Închide" )
if t==1 then
x="1119900" y="70800"
elseif t==2 then
x="1119200" y="7000"
elseif t==3 then
return
end
elseif p==5 then -- Tãrâmul Gigantilor
x="828100" y="763400"
elseif p==6 then -- Grota Exilului
x="284200" y="809600"
elseif p==7 then -- Temniþa Maimuþelor
say_size(350, 200)
t = select ( "Temniþa Maimuþelor Începãtor", "Temniþa Maimuþelor Normal", "Temniþa Maimuþelor Avansat", "Închide" )
if t== 2then
x="128000" y="640000"
elseif t==3 then
x="128000" y="716800"
elseif t==4 then
return
elseif t==1 then
local empire = pc . get_empire ( )
if empire == 1 then
x="768000" y="435200"
elseif empire == 2 then
x="844800" y="435200"
elseif empire == 3 then
x="921600" y="435200"
end
elseif p==8 then
return
end
end
elseif s==1 then -- Satul 1
say_size(350, 200)
t = select("Þinutul Yongan", "Þinutul Joan", "Þinutul Pyungmoo","Î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"
elseif t==4 then
return
end
elseif s==2 then -- Satul 2
say_size(350, 200)
t = select("Þinutul Yayang", "Þinutul Bokjung", "Þinutul Bakra", "Î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"
elseif t==4 then
return
end
elseif s==3 then -- Valea Seungryong
say_size(350, 200)
t = select("Început", "Mijloc", "Î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"
elseif e==4 then
return
end
elseif t==2 then
x="332700" y="745600"
elseif t==3 then
return
end
elseif s==4 then -- Deºertul Yongbi
say_size(350, 180)
t = select("Început", "Mijloc", "Î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"
elseif t==3 then
return
end
elseif s==5 then -- Muntele Sohan
say_size(350, 180)
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"
elseif t==3 then
return
end
elseif s==6 then -- Doyyumhwan
say_size(350, 150)
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
elseif s==8 then
return
end
pc.warp(x, y)
pc.setqf("teleports", pc.getqf("teleports") - 1)
end
end
end
endCod: Selectaţi tot
quest warpring begin
state start begin
when 80009.use with pc.get_level() >= 1 begin
if pc.countitem("80009")>=1 then
pc.removeitem("80009", 1)
end
say_title ( "Inel de Teleportare" )
say ("Salut! Ştii? In Metin2 există locuri[ENTER]")
say ("Atât de frumoase încat te-ar lăsa cu gura căscată![ENTER]")
say ("Dar există şi locuri primejdioase unde poţi[ENTER]")
say ("Găsi creaturi oribile şi înspăimântătoare.[ENTER]")
say ("Crezi că eşti un războinic adevărat?[ENTER]")
say ("Crezi că ai ce îţi trebuie pentru a le învinge?[ENTER]")
say ("Noi îţi oferim posibilitatea aceasta.[ENTER]")
local opzioni1 =select ("Da, Merg mai departe","Nu mai vreau[ENTER]")
if opzioni1 == 2 then
return
elseif opzioni1 == 1 then
local opzioni2 =select ("Ţinutul Pyungmoo","Ţinutul Bakra","Ţinutul Joan","Ţinutul Bokjung","Ţinutul Yongan","Ţinutul Jayang","Următoarea Pagină")
if opzioni2 == 1 then
pc . warp ( 969600 , 278400 )
elseif opzioni2 == 2 then
pc . warp ( 873100 , 242600 )
elseif opzioni2 == 3 then
pc . warp ( 665600 , 435200 )
elseif opzioni2 == 4 then
pc . warp ( 55700 , 157900 )
elseif opzioni2 == 5 then
pc . warp ( 469300 , 964200 )
elseif opzioni2 == 6 then
pc . warp ( 360800 , 877600 )
elseif opzioni2 == 7 then
local opzioni3 =select ("Valea Orcilor","Deşertul Yongbi","Templul Hwang","Turnul Demonilor","Muntele Sohan","Pădurea fantomelor","Următoarea Pagină")
if opzioni3 == 1 then
pc . warp ( 333949 , 752560 )
elseif opzioni3 == 2 then
pc . warp ( 344000 , 502500 )
elseif opzioni3 == 3 then
pc . warp ( 553600 , 144100 )
elseif opzioni3 == 4 then
pc . warp ( 590500 , 110500 )
elseif opzioni3 == 5 then
pc . warp ( 436210 , 215744 )
elseif opzioni3 == 6 then
pc . warp ( 1049600 , 0 )
elseif opzioni3 == 7 then
local opzioni4 =select ("Peştera Păianjenilor 1","Peştera Păianjenilor 2","Atlantida 1","Ieşire")
if opzioni3 == 1 then
pc . warp ( 60000 , 496000 )
elseif opzioni4 == 2 then
pc . warp ( 665600 , 435200 )
elseif opzioni4 == 3 then
pc . warp ( 0 , 1203200 )
elseif opzioni4 == 7 then
return
end
end
end
Afișează semnătura
Robert mersi mult pentru quest.
de 
de 
de 
de -
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 12 vizitatori