Salut,cine ma poate ajuta sa imi bage o mapa noua la inelul de teleportare ???
Acesta este quest-ul
local x
local y
local t
local e = pc . get_empire ( )
if pc . getqf ( "warp_ring" ) == 0 then
say_gold ( "~~| Teleportare |~~" )
say_alb ( "" )
say ( "Acest inel te ajută să te teleportezi" )
say ( "în aproape orice loc dorit, gratis." )
say ( "Acest inel este nelimitat !" )
say ( "" )
say ( "" )
say ( "" )
say ( "" )
pc . setqf ( "warp_ring" , 1 )
pc . setqf ( "warps" , 55555 )
return
end
if pc . getqf ( "warps" ) <= 0 then
say_gold ( "~~| Teleportare |~~" )
say ( "" )
say ( "Nu mai poţi folosi acest inel." )
say ( "" )
pc . remove_item ( item . vnum )
pc . setqf ( "warp_ring" , 0 )
return
end
if pc . getqf ( "warp_ring" ) == 1 then
say_gold ( "~~| Teleportare |~~" )
say_alb ( "Alege unde vrei să fi dus !" )
say_size ( 350 , 350 )
local s = select ( "Satul 1" , "Deşertul Yongbi" , "V4 - Dragon" , "Templul Hwang" , "Mapa cu Metine" , "Închide" )
if s == 7 then
say ( "Unde vrei să te teleportezi?" )
say_reward ( "Teleportări rămase: " .. pc . getqf ( "warps" ) )
say_size ( 350 , 350 )
local p = select ( "Turnul Demonilor" , "V4 - Dragon" , "Închide" )
if p == 1 then
x = "590400" y = "110500"
elseif p == 2 then
x = "222100" y = "1220700"
elseif t == 3 then
return
end
elseif s == 1 then
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
x = "296300" y = "547500"
elseif s == 3 then
x = "222100" y = "1220700"
elseif s == 4 then
x = "590500" y = "110500"
elseif s == 5 then
x = "9915800" y = "9927000"
elseif s == 7 then
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
end
pc . warp ( x , y )
pc . setqf ( "warps" , pc . getqf ( "warps" ) - 0 )
Si as vrea sa adaug Boss MAP
are warp la /warp 120 100
Cum adaug o noua MAPA la INEL de teleportare
Cod: Selectaţi tot
Acesta este quest-ul
local x
local y
local t
local e = pc . get_empire ( )
if pc . getqf ( "warp_ring" ) == 0 then
say_gold ( "~~| Teleportare |~~" )
say_alb ( "" )
say ( "Acest inel te ajută să te teleportezi" )
say ( "în aproape orice loc dorit, gratis." )
say ( "Acest inel este nelimitat !" )
say ( "" )
say ( "" )
say ( "" )
say ( "" )
pc . setqf ( "warp_ring" , 1 )
pc . setqf ( "warps" , 55555 )
return
end
if pc . getqf ( "warps" ) <= 0 then
say_gold ( "~~| Teleportare |~~" )
say ( "" )
say ( "Nu mai poţi folosi acest inel." )
say ( "" )
pc . remove_item ( item . vnum )
pc . setqf ( "warp_ring" , 0 )
return
end
if pc . getqf ( "warp_ring" ) == 1 then
say_gold ( "~~| Teleportare |~~" )
say_alb ( "Alege unde vrei să fi dus !" )
say_size ( 350 , 350 )
local s = select ( "Satul 1" , "Deşertul Yongbi" , "V4 - Dragon" , "Templul Hwang" , "Mapa cu Metine" , "Închide" )
if s == 7 then
say ( "Unde vrei să te teleportezi?" )
say_reward ( "Teleportări rămase: " .. pc . getqf ( "warps" ) )
say_size ( 350 , 350 )
local p = select ( "Turnul Demonilor" , "V4 - Dragon" "BOSS MAP" , "Închide" )
if p == 1 then
x = "590400" y = "110500"
elseif p == 2 then
x = "222100" y = "1220700"
elseif t == 3 then
x = "120" y = "100"
elseif t == 4 then
return
end
elseif s == 1 then
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
x = "296300" y = "547500"
elseif s == 3 then
x = "222100" y = "1220700"
elseif s == 4 then
x = "590500" y = "110500"
elseif s == 5 then
x = "9915800" y = "9927000"
elseif s == 7 then
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
end
pc . warp ( x , y )
pc . setqf ( "warps" , pc . getqf ( "warps" ) - 0 )
- KinKade
-

- Mesaje: 1224
- Membru din: 10 Mar 2014, 19:39
- Server: Quirin2
- Regat: Jinno
- Aprecieri: 132
- Mulţumiri: 55
- Discord: Copiază ID
- Contact:
Cod: Selectaţi tot
Acesta este quest-ul
local x
local y
local t
local e = pc . get_empire ( )
if pc . getqf ( "warp_ring" ) == 0 then
say_gold ( "~~| Teleportare |~~" )
say_alb ( "" )
say ( "Acest inel te ajută să te teleportezi" )
say ( "în aproape orice loc dorit, gratis." )
say ( "Acest inel este nelimitat !" )
say ( "" )
say ( "" )
say ( "" )
say ( "" )
pc . setqf ( "warp_ring" , 1 )
pc . setqf ( "warps" , 55555 )
return
end
if pc . getqf ( "warps" ) <= 0 then
say_gold ( "~~| Teleportare |~~" )
say ( "" )
say ( "Nu mai poţi folosi acest inel." )
say ( "" )
pc . remove_item ( item . vnum )
pc . setqf ( "warp_ring" , 0 )
return
end
if pc . getqf ( "warp_ring" ) == 1 then
say_gold ( "~~| Teleportare |~~" )
say_alb ( "Alege unde vrei să fi dus !" )
say_size ( 350 , 350 )
local s = select ( "Satul 1" , "Deşertul Yongbi" , "V4 - Dragon" , "Templul Hwang" , "Mapa cu Metine" , "Închide" )
if s == 7 then
say ( "Unde vrei să te teleportezi?" )
say_reward ( "Teleportări rămase: " .. pc . getqf ( "warps" ) )
say_size ( 350 , 350 )
local p = select ( "Turnul Demonilor" , "V4 - Dragon" "BOSS MAP" , "Închide" )
if p == 1 then
x = "590400" y = "110500"
elseif p == 2 then
x = "222100" y = "1220700"
elseif p == 3 then
x = "12000" y = "10000"
elseif p == 4 then
return
end
elseif s == 1 then
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
x = "296300" y = "547500"
elseif s == 3 then
x = "222100" y = "1220700"
elseif s == 4 then
x = "590500" y = "110500"
elseif s == 5 then
x = "9915800" y = "9927000"
elseif s == 7 then
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
end
pc . warp ( x , y )
pc . setqf ( "warps" , pc . getqf ( "warps" ) - 0 )
- KinKade
-

- Mesaje: 1224
- Membru din: 10 Mar 2014, 19:39
- Server: Quirin2
- Regat: Jinno
- Aprecieri: 132
- Mulţumiri: 55
- Discord: Copiază ID
- Contact:
tot core dumped iti da?
baga questu original in code cum am pus eu da tot inclusiv
quest ........ begin
state start begin
baga questu original in code cum am pus eu da tot inclusiv
quest ........ begin
state start begin
- Yahiko
-

- Mesaje: 3865
- Membru din: 25 Mai 2015, 18:31
- Aprecieri: 0
- Mulţumiri: 4857
- Discord: Copiază ID
- Contact:
Inactiv
-
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Semrush [Bot] și 65 vizitatori


