Quest Caballo

AsesinoNinja

esta esta modificada para que reviva caballo y k de ticket

quest caballo begin
state start begin
when 20094.chat."Caballo Normal" begin
say_title("By DjZed")
say("Tengo el poder de darte el caballo normal,")
say("pero debes ser nivel 25 para poder dartelo")
say_reward("Deseas el caballo normal?")
local a = select ( "Si" , "No" )
if a == 1 then
if pc . level >= 25 then
say_reward("Caballo normal creado con exito.")
pc . give_item2 ( "50051" , 1 )
horse . unride ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . ride ( )
else a == 2 then
return
end
when 20094.chat."Caballo Armado" begin
say_title("By DjZed")
say("Tengo el poder de darte el caballo armado,")
say("pero debes ser nivel 25 para poder dartelo")
say_reward("Deseas el caballo armado?")
local b = select ( "Si" , "No" )
if b == 1 then
if pc . level >= 35 then
say_reward("Caballo armado creado con exito.")
pc . give_item2 ( "50052" , 1 )
horse . unride ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . ride ( )
else b == 2 then
return
end
when 20094.chat."Caballo Armado"
say_title("By DjZed")
say("Tengo el poder de darte el caballo militar,")
say("pero debes ser nivel 70 para poder dartelo")
say_reward("Deseas el caballo armado?")
local c = select ( "Si" , "No" )
if c == 1 then
if pc . level >= 50 then
say_reward("Caballo militar creado con exito.")
pc . give_item2 ( "50053" , 1 )
horse . unride ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
command("setsk 131 20")
command("setsk 137 20")
command("setsk 138 20")
command("setsk 139 20")
command("setsk 140 20")
else c == 2 then
return
end
when 20094.chat."Revivir al Caballo" begin
say_title("By DjZed")
say("Deseas revivir al caballo?")
local d = select ( "Si" , "No" )
if d == 1 then
say_reward("Se ha revivido con exito.")
else d == 2 then
return
end
when 20094.chat"Tiquet de Caballo" begin
say_title("By DjZed")
say("Deseas un tiquet de monta?")
local e = select ( "Si" , "No" )
if e == 1 then
say_reward("Aqui tienes tu tiquet")
pc . give_item2 ( "50005" , 1 )
else e == 2 then
return
end
end
end

y aki modificada para los niveles k dijo AsesinoNinja:

quest caballo begin
state start begin
when 20094.chat."Caballo Normal" begin
say_title("By DjZed")
say("Tengo el poder de darte el caballo normal,")
say("pero debes ser nivel 25 para poder dartelo")
say_reward("Deseas el caballo normal?")
local a = select ( "Si" , "No" )
if a == 1 then
if pc . level >= 25 then
say_reward("Caballo normal creado con exito.")
pc . give_item2 ( "50051" , 1 )
horse . unride ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . ride ( )
else a == 2 then
return
end
when 20094.chat."Caballo Armado" begin
say_title("By DjZed")
say("Tengo el poder de darte el caballo armado,")
say("pero debes ser nivel 25 para poder dartelo")
say_reward("Deseas el caballo armado?")
local b = select ( "Si" , "No" )
if b == 1 then
if pc . level >= 50 then
say_reward("Caballo armado creado con exito.")
pc . give_item2 ( "50052" , 1 )
horse . unride ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . ride ( )
else b == 2 then
return
end
when 20094.chat."Caballo Armado"
say_title("By DjZed")
say("Tengo el poder de darte el caballo militar,")
say("pero debes ser nivel 70 para poder dartelo")
say_reward("Deseas el caballo armado?")
local c = select ( "Si" , "No" )
if c == 1 then
if pc . level >= 70 then
say_reward("Caballo militar creado con exito.")
pc . give_item2 ( "50053" , 1 )
horse . unride ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
command("setsk 131 20")
command("setsk 137 20")
command("setsk 138 20")
command("setsk 139 20")
command("setsk 140 20")
else c == 2 then
return
end
when 20094.chat."Revivir al Caballo" begin
say_title("By DjZed")
say("Deseas revivir al caballo?")
local d = select ( "Si" , "No" )
if d == 1 then
say_reward("Se ha revivido con exito.")
else d == 2 then
return
end
when 20094.chat"Tiquet de Caballo" begin
say_title("By DjZed")
say("Deseas un tiquet de monta?")
local e = select ( "Si" , "No" )
if e == 1 then
say_reward("Aqui tienes tu tiquet")
pc . give_item2 ( "50005" , 1 )
else e == 2 then
return
end
end
end

ei amigo otra pregunta mas parezco un mosco perdon u.u le sale yang para conseguir este dicho pony?

Zed

aqui les dejo esta quest que echo a peticion de cstrikeman

os explico lo que hace:
-Da caballo normal apartir de lvl 25(da pintura de caballo)
-Da caballo armado apartir de lvl 50(da el libro del armado)
-Da caballo militar apartir de lvl 70(da el libro del militar y las skills del caballo a m1)

Quest:

quest caballo begin
state start begin
when 20094.chat."Caballo Normal" begin
say_title("By DjZed")
say("Tengo el poder de darte el caballo normal,")
say("pero debes ser nivel 25 para poder dartelo")
say_reward("Deseas el caballo normal?")
local a = select ( "Si" , "No" )
if a == 1 then
if pc . level >= 25 then
say_reward("Caballo normal creado con exito.")
pc . give_item2 ( "50051" , 1 )
horse . unride ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . ride ( )
else a == 2 then
return
end
when 20094.chat."Caballo Armado" begin
say_title("By DjZed")
say("Tengo el poder de darte el caballo armado,")
say("pero debes ser nivel 25 para poder dartelo")
say_reward("Deseas el caballo armado?")
local b = select ( "Si" , "No" )
if b == 1 then
if pc . level >= 50 then
say_reward("Caballo armado creado con exito.")
pc . give_item2 ( "50052" , 1 )
horse . unride ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . ride ( )
else b == 2 then
return
end
when 20094.chat."Caballo Armado"
say_title("By DjZed")
say("Tengo el poder de darte el caballo militar,")
say("pero debes ser nivel 70 para poder dartelo")
say_reward("Deseas el caballo armado?")
local c = select ( "Si" , "No" )
if c == 1 then
if pc . level >= 70 then
say_reward("Caballo militar creado con exito.")
pc . give_item2 ( "50053" , 1 )
horse . unride ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
horse . advance ( )
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( ) 
horse . advance ( )
command("setsk 131 20")
command("setsk 137 20")
command("setsk 138 20")
command("setsk 139 20")
command("setsk 140 20")
else c == 2 then
return
end
when 20094.chat."Cancelar" begin
end
end
end

lo poneis en vuestro editor de texto y lo guardais con el siguiente nombre: caballo.quest

aora nos conectamos al server via FTP(Usando FileZilla o WinScp) y vamos a la siguiente ruta: /usr/rain/channel/share_data/locale/hongkong/quest

y ahi metemos la quest, y en ese mismo directorio buscamos el hongkong.list y lo editamos añadiendo una ultima linea con el nombre de la quest.

aora hacemos reboot o reload y listo

Espero que les guste ;D

SpasTsunami

esta wapo , creo k va ser de bastanta utilidad.

Idea y duda : se podria hacer un teleporter que te teletransporte solo por un tiempo ? es decir , te teletransporta por 1H o asi y luego regresas. :icon_rolleyes:

Zed

lo k si se podria hacer es un teleporter k solo funcione 1 vez cada hora

SpasTsunami

como el anillo ese , pero eso no m gusta........ y uno que te pregunte cosas? y si respondes correcto pasas al siguiente nivel y que si respondes bien puedes elegir un premio

Zed

si se puedee hacer, seria como una quest concurso, como un ox privado x user xD

SpasTsunami

pos creo k estaria bn , si pudieras hacerlo , pero este seria bastante largo si lo haces tomate tu tiempo

Zed

dadme ideas para las preguntas del concurso

Zed

ya tengo idea para otra quest, una quest que te suba el karma a chivalric

SpasTsunami

el herrero puede forjar armas ? /no
ay 4 caballos en el establo? /no
la tortuga gigante sale en el desierto? /si
todas las armas del 75 tienen habilidad y media? /si
SpasTsunami es el mejor? /si como no/ xD
existe un mob llamado fantasma tigre amarillo? /no
existe un mob llamado reaper? /no (aclaro : es segador de la muerte)
la batalla +9 sube a triton? /si
existe metin lvl 1? /si

nose que mas ya ire poniendo