Buna ziua ma poate ajuta si pe mine cu modificarea unui quest ,vreau sa scot v4 si mapa cu metine de la acest quest :
Multumesc!
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 )
Modificare Quest Teleporter
Poftim , ar trebui sa functioneze :
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 ajuta sa te teleportezi" ) say ( "in 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 sa fi dus !" ) say_size ( 350 , 350 ) local s = select ( "Satul 1" , "De?ertul Yongbi", "Templul Hwang", "Inchide" ) if s == 7 then say ( "Unde vrei sa te teleportezi?" ) say_reward ( "Teleportari ramase: " .. pc . getqf ( "warps" ) ) say_size ( 350 , 350 ) local p = select ( "Turnul Demonilor", "Inchide" ) if p == 1 then x = "590400" y = "110500" elseif t == 2 then return end elseif s == 1 then say_size ( 350 , 200 ) t = select ( "?inutul Yongan" , "?inutul Joan" , "?inutul Pyungmoo" , "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" elseif t == 4 then return end elseif s == 2 then x = "296300" y = "547500" elseif s == 3 then x = "590500" y = "110500" elseif s == 4 then say_size ( 350 , 150 ) 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 elseif s == 8 then return end end pc . warp ( x , y ) pc . setqf ( "warps" , pc . getqf ( "warps" ) - 0 )
Daca dau pe inel si dau inchide sa nu ma teleportez nicaieri apare inca o chestie inceput si inchide si daca dau pe inceput ma duce in tara de foc
Posteaza intreg questul
Dacă în 3 zile autorul subiectului nu va da niciun semn de viata în topic, subiectul va fi mutat în Arhivă.
-
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 13 vizitatori


