iluvatar

Esta quest aparece en el servidor, yo la puse en español y le agregué las cadenas de texto que van en el locale.lua para que funcione perfectamente aunque el locale.lua no este traducido ni una sola palabra.
 
Con esta quest los gm pueden dar bonus de exp, yang, doble yang o drop a los reinos cantidad y horas escogidas, hablando con el guardia de la plaza.
 
Dejo el codigo:
 

quest priv_empire begin state start begin when guild_man1.chat."GM: Bonus para reinos" or guild_man2.chat."GM: Bonus para reinos" or guild_man3.chat."GM: Bonus para reinos" with pc.is_gm() begin local imperios = { [0] = "Todos", [1] = "Shinsoo", [2] = "Chunjo", [3] = "Jinno", } say_title("Bonus para reinos") say("Escoge el reino al que deseas aplicar el bonus") local e = select("Shinsoo", "Chunjo", "Jinno", "Todos", "Cancelar") if 5 == e then return end if 4 == e then e = 0 end say_title("Bonus para el reino") say("Has escogido:") say(string.format("Reino %s", imperios[e])) say("Escoge el bonus:") local t = select("Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia", "Cancelar") if 5 == t then return end say_title("Bonus para el reino") local title_list = {"Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia" } say(string.format("Reino %s - Bonus: %s ", imperios[e], title_list[t])) say("Escoge el porcentaje") local g = { 10, 20, 50, 100, 150, 200} local p = select(g[1]..'%', g[2]..'%', g[3]..'%', g[4]..'%', g[5]..'%', g[6]..'%', 'Cancelar') if p == 7 then return end say_title("Bonus para el reino") say(string.format("Reino %s - Bonus: %s %d%%", imperios[e], title_list[t], g[p])) say("Duración:") local v = 0 local h = select('6 horas', '12 horas', '24 horas', 'Otro', 'Cancelar') if 5 == h then return elseif 4 == h then say_title("Bonus para el reino") say(string.format("Reino %s - Bonus: %s %d%%", imperios[e], title_list[t], g[p])) say("Ingresa la cantidad de horas:") v=input() if v == "" then v = 0 else v=tonumber(v) end elseif 3 == h then v=24 elseif 2 == h then v=12 elseif 1 == h then v=6 end say_title("Bonus para el reino") say_title("Resumen:") say(string.format("Reino %s [ENTER]Bonus: %s %d%% (%d horas)", imperios[e], title_list[t], g[p], v)) say("") say("¿Es correcto?") say("") local s = select("Sí ", "No") if 1 == s then __give_empire_priv(e, t, g[p], v*60*60) say("La bonificación será aplicada.") else say("Ninguna bonificación aplicada.") end end end end Está testeada y funciona al 100%, cualquier bug que ocurra en sus servidores informen para decirles como arreglarlo.

Descargas 
Debes iniciar sesión para ver el contenido del enlace en esta publicación.

LINK DE DESCARGA:
 
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
 
Fuente : Metin2Publico!.

Te has pasado mucho con la publicidad, una cosa es poner un poco de publicidad pero tu te fuistes al extremo.
Enlaces sin publicidad
AVISO Chrome me decta  el "vdi freebsd 12.1+ file + pagina web"  Es posible que este archivo sea peligroso, por lo que Chrome lo ha bloqueado.
cliente español sin patchupdate:                                      Debes iniciar sesión para ver el contenido del enlace en esta publicación.    cliente español con patchUpdate:                                    Debes iniciar sesión para ver el contenido del enlace en esta publicación.     AVISO vdi freebsd 12.1+ file + pagina web lista para usar:        Debes iniciar sesión para ver el contenido del enlace en esta publicación.        cliente bestprodution v4 + patchUpdate:                        Debes iniciar sesión para ver el contenido del enlace en esta publicación.          vdi freebsd 9.2 + file +pagina web lista para usar:          Debes iniciar sesión para ver el contenido del enlace en esta publicación.   

Buenas quiero hacer un gran aporte para los que quieran empezar con el mundo de metin2 y para los que ya empezaron.
veo que mucha gente busca vdi con freebsd 12.1, o vdi con freebsd 9.2,, ademas de estar listos, también se los deje con instalación FARM ( servidor web), con web instalada todo listo para descargar y montar, aparte le deje 2 clientes uno el que trabaja con del vdi freebsd 12.1 esta en español vieja escuela, y el que trabaja con el vdi freebsd 9.2 es el bestproduction V4 traducido al 30% al español, ambos clientes vienen con patchupdate listo para usar con instalador,
 
cliente español sin patchupdate:

Debes iniciar sesión para ver el contenido del enlace en esta publicación. cliente español con patchUpdate:

Debes iniciar sesión para ver el contenido del enlace en esta publicación. vdi freebsd 12.1+ file + pagina web lista para usar:

Debes iniciar sesión para ver el contenido del enlace en esta publicación. cliente bestprodution v4 + patchUpdate:

Debes iniciar sesión para ver el contenido del enlace en esta publicación.
vdi freebsd 9.2 + file +pagina web lista para usar:
Debes iniciar sesión para ver el contenido del enlace en esta publicación. Aquí están los tar.gz de los bestproduction que estaban pidiendo:
mysql_max_9_2 y game_max_9_2: Debes iniciar sesión para ver el contenido del enlace en esta publicación. Para Descomprimir: tar -xzvf mysql_max_9_2.tar.gz y despues colocan otra vez tar -xzvf game_max_9_2.tar.gz Creador de archivos para patchUpdate

Debes iniciar sesión para ver el contenido del enlace en esta publicación. carpeta makepack esta carpeta es el contenido del cliente para poder editar el root y todo el contenido traducirlo u otros.
Aqui les dejo el enlace de donde bajar el makepack, como compilarlo y corregir el error de los edificios que no se ven cambiar la carpeta root por la que esta en este enlace

Debes iniciar sesión para ver el contenido del enlace en esta publicación. Datos de acceso:
vdi freebsd 12.1=>usuario: root clave: 0424nilmary 
mysql freebsd 12.1=>usuario: remoto clave: R1.mo_To
vdi freebsd 9.2=>usuario: root clave: dev 
mysql freebsd 9.2=>usuario: root clave: /*bestproduction*/
clientes: usuario: nilsonmax clave:12345678
aunque con la pagina web pueden entrar en registrar y se crean las cuentas que deseen como les dije ya esta listo para montar.
para configurar escribirme, usen noip para enlazar las ip dinamica de sus pc, y abrir los puertos y desactivar el firewall sea por antivirus y/o windows
aquí les subo unas imagenes , la web, el instalador del metin, el pachtUpate, el metin y unas ventanas que tiene casi listo con todo. 
 
Este Server online Metin2Pluton traducido al 80%, ya este mes lo termino al 100%, vendo traducción interesados whatssap +573008935212
ver imágenes de la traducción al 80%

Debes iniciar sesión para ver el contenido del enlace en esta publicación. Aprovecho de  poner un enlace acá que me preguntan a cada rato que VPS les puedo recomendar, aquí les dejo el link donde les recomiendo un VPS de paga, digo que trae y porque lo prefiero y no solo para metines sino para los demas juegos online ya que trae buenas prestaciones y a muy buen precio,

Debes iniciar sesión para ver el contenido del enlace en esta publicación.  

 Los enlaces viejos se cayeron estas son imágenes ya mas reciente del proyecto, de las traducciones que estoy vendiendo es el mismo metin pero ya traducido al 80% no al 30% es para que vean lo que trae el metin.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación. Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación. Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
Debes iniciar sesión para ver el contenido del archivo adjunto en esta publicación.

Hola,
Bueno me pidio un usario que hiciera 1 video sobre como crear 1 servidor metin2 y aqui
esta todo lo necesario con el video nos entendemos.
 
Debes iniciar sesión para ver el contenido del enlace en esta publicación.
 
Link's de MEGA:
Datos Principales de todo "GUIA":
Debes iniciar sesión para ver el contenido del enlace en esta publicación.

Cliente Omega ESP con windows.dds: Debes iniciar sesión para ver el contenido del enlace en esta publicación.
 
Cliente Omega Virgen: Debes iniciar sesión para ver el contenido del enlace en esta publicación.

SF Rain 2007+ Cliente (Nuevo link @Dilong): Debes iniciar sesión para ver el contenido del enlace en esta publicación.

No-IP(DUC): Debes iniciar sesión para ver el contenido del enlace en esta publicación.

EterNexus: Debes iniciar sesión para ver el contenido del enlace en esta publicación.

Navicat Premium Full: Debes iniciar sesión para ver el contenido del enlace en esta publicación.

Port Map: Debes iniciar sesión para ver el contenido del enlace en esta publicación.

Traduccion Omega para el cliente sin traducir: Debes iniciar sesión para ver el contenido del enlace en esta publicación.

VirtualBox: Debes iniciar sesión para ver el contenido del enlace en esta publicación.

Windows.dds para el Cliente Omega Virgen sin traducir en Español[ESP]: Debes iniciar sesión para ver el contenido del enlace en esta publicación.
 
VIA HAMACHI: 
Debes iniciar sesión para ver el contenido del enlace en esta publicación. VIA HAMACHI Lauling.V3:
Debes iniciar sesión para ver el contenido del enlace en esta publicación. 1 LINK DE MEGA TODO LO NECESARIO.

Para criticas mejor ni comenteis las ignorare solo lo e posteado para los que no saben,
que comienzen aprender...
 
Saludos, Wolf solo hice la guia de YouTube.
 
Alguna foto

Debes iniciar sesión para ver el contenido del enlace en esta publicación.  
Fecha del Video: 27/03/2015

La misión que entrega las habilidades a nivel 5, con el mismo texto que el oficial, integrado en la quest para que trabaje independiente del locale.lua. Le agregue algunos comentarios para que los que entiendan más de quest sepan que le agregue y como se hacen funcionar, así podran practicarlo ellos mismos.
 
 

quest skill_group begin state start begin when login or levelup with pc.level>=5 and pc.skillgroup == 0 begin set_state(run) end end state run begin when login with pc.get_skill_group()!=0 begin restart_quest() end when letter with pc.get_skill_group()==0 begin send_letter("El entrenamiento") local job=pc.get_job() if job==0 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher1", v, "corporal") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher2", v, "mental") end elseif job==1 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher3", v, "dagas") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher4", v, "arquero") end elseif job==2 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher5", v, "armas") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher6", v, "magia_negra") end elseif job==3 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher7", v, "dragón") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher8", v, "curación") end end end when leave begin target.delete("teacher1") target.delete("teacher2") target.delete("teacher3") target.delete("teacher4") target.delete("teacher5") target.delete("teacher6") target.delete("teacher7") target.delete("teacher8") end when button or info begin -- se crea el arreglo intro, que contiene las cadenas de texto segun el tipo de personaje local intro = { "[COLOR r;1|g;1|b;0.6]Instructor del entrenamiento de Guerrero:[/COLOR][ENTER]Si admiras a los guerreros por su velocidad y [ENTER]reiterados ataques, recomiendo el maestro de[ENTER]fuerza corporal. Si quieres derrotar a grupos[ENTER]enteros de monstruos con un Sólo ataque, [ENTER]recomiendo el maestro de lucha mental. Te[ENTER]estamos esperando cerca de la plaza de la aldea.[ENTER]", "[COLOR r;1|g;1|b;0.6]Instructor del entrenamiento de Ninja:[/COLOR][ENTER]Si quieres llamarte a ti mismo un excepcional [ENTER]arquero, entonces aprende sobre el tiro con arco. [ENTER]Si estás preparado para llevar a cabo [ENTER]varias misiones en las sombras como un [ENTER]ninja, entonces la lucha con hoja es lo tuyo. [ENTER]Estamos esperándote cerca de la plaza de la [ENTER]aldea. [ENTER]", "[COLOR r;1|g;1|b;0.6]Instructor del entrenamiento del Sura:[/COLOR][ENTER]¿Quieres convertirte en un verdadero maestro de [ENTER]magia negra y en guerrero demoníaco? Entonces [ENTER]recomiendo el arte de armamento mágico. [ENTER]Sin embargo, si deseas ser temido [ENTER]como un brujo de la oscuridad y de las [ENTER]maldiciones, entonces te recomiendo el arte de[ENTER]magia negra. Te esperamos cerca de la[ENTER] plaza de la aldea.[ENTER]", "[COLOR r;1|g;1|b;0.6]Instructor del entrenamiento de Chamán:[/COLOR][ENTER]Si quieres convertirte en un chamán que controla [ENTER]la magia y las bendiciones, entonces elige el [ENTER]entrenamiento de la Fuerza Dragón. Sin embargo, [ENTER]si quieres mitigar el dolor y sufrimiento de [ENTER]otros, te recomeindo el entrenamiento de Fuerza[ENTER]Curación. Te estamos esperandocerca de la plaza[ENTER]de la aldea.[ENTER]" } -- acá se llama a la cadena que corresponda, ejemplo con un guerrero (tipo 0): intro[0+1] = intro[1] = la primera linea de nuestro arreglo anterior. say(intro[pc.job+1]) --setleftimage("") --setmapcenterposition(-200, 0) select("Confirmar") setskin(NOWINDOW) end function join(job, group, title, text, error_title, error_msg) -- se crea la función para las variables y el texto que se mostrará luego al dar click al npc que da las habilidades. -- le agregué error_title, para poder mostrarla abajo como un "say_title" local pc_job=pc.get_job() if pc_job!=job then say_title(error_title) say(error_msg) if pc_job==0 then say_reward("Un guerrero puede elegir entre un entrenamiento ") say_reward("de lucha corporal o lucha mental.") elseif pc_job==1 then say_reward("Un ninja puede elegir entre un entrenamiento de ") say_reward("lucha con hoja o tiro con arco.") elseif pc_job==2 then say_reward("Un sura puede elegir entre un entrenamiento de ") say_reward("armamento o magia negra.") elseif pc_job==3 then say_reward("Un chamán puede elegir entre un entrenamiento de ") say_reward("fuerza dragón o fuerza curación. ") end say("") else say_title(title) say(text) local s=select("Emepezár", "Más tarde") if 1==s then if pc.get_job()==job and pc.get_skill_group()==0 then set_state("start") pc.set_skill_group(group) pc.clear_skill() char_log(0, "CLEAR_SKILL", "Clear Skill By Skill Teacher") return true else test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) end end end return false end when teacher1.target.click or skill_group1_1.chat."Entrenamiento de la Fuerza Corporal" or skill_group2_1.chat."Entrenamiento de la Fuerza Corporal" or skill_group3_1.chat."Entrenamiento de la Fuerza Corporal" begin target.delete("teacher1") -- a continuación se asignan los valores y las cadenas de texto a la función join creada arriba. -- recordar: join(job, group, title, text, error_title, error_msg) if skill_group.join(0, 1, "Entrenamiento de la Fuerza Corporal", "El entrenamiento de la fuerza corporal es útil [ENTER]para un combate rápido y enseña un método de [ENTER]combate cara a cara con ataques básicos [ENTER]mejorados. [ENTER]", "Entrenamiento equivocado.", "Sólo los guerreros pueden elegir el [ENTER]entrenamiento de fuerza corporal. [ENTER]") then say_title("Has elegido el entrenamiento de la fuerza corporal.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher2.target.click or skill_group1_2.chat."Entrenamiento de la Lucha Mental" or skill_group2_2.chat."Entrenamiento de la Lucha Mental" or skill_group3_2.chat."Entrenamiento de la Lucha Mental" begin target.delete("teacher2") if skill_group.join(0, 2, "Entrenamiento de la Lucha Mental", "El entrenamiento de la lucha mental enseña a [ENTER]atacar al enemigo con fuertes ataques de chi y [ENTER]cómo defenderte de sus ataques.[ENTER]", "Entrenamiento incorrecto.", "Sólo los guerreros pueden elegir el [ENTER]entrenamiento de fuerza mental. [ENTER]") then say_title("Has elegido el entrenamiento de lucha mental.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher3.target.click or skill_group1_3.chat."Entrenamiento de lucha con hoja" or skill_group2_3.chat."Entrenamiento de lucha con hoja" or skill_group3_3.chat."Entrenamiento de lucha con hoja" begin target.delete("teacher3") if skill_group.join(1, 1, "Entrenamiento de lucha con hoja", "En el entrenamiento de la lucha con hoja, un [ENTER]ninja aprende cómo golpear el punto débil de su[ENTER]oponente con golpes rápidos y mortales.[ENTER]", "Entrenamiento equivocado.", "Sólo los ninjas pueden elegir el [ENTER]entrenamiento de lucha con hoja. [ENTER]") then say_title("Has elegido el entrenamiento de lucha con hoja.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher4.target.click or skill_group1_4.chat."Entrenamiento arquero" or skill_group2_4.chat."Entrenamiento arquero" or skill_group3_4.chat."Entrenamiento arquero" begin target.delete("teacher4") if skill_group.join(1, 2, "Entrenamiento arquero", "En el entrenamiento arquero, un ninja aprende a[ENTER]manejar su arco y a luchar contra el enemigo con[ENTER]precisión en la distancia.[ENTER]", "Entrenamiento incorrecto.", "Sólo los ninjas pueden elegir el [ENTER]entrenamiento arquero. [ENTER]") then say_title("Has elegido el entrenamiento arquero.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher5.target.click or skill_group1_5.chat."Entrenamiento de armamento" or skill_group2_5.chat."Entrenamiento de armamento" or skill_group3_5.chat."Entrenamiento de armamento" begin target.delete("teacher5") if skill_group.join(2, 1, "Entrenamiento de armamento", "En el entrenamiento de armas mágicas, practicas[ENTER]en el arte de los golpes poderosos contra enemigos[ENTER]debilitados, usando espadas malditas.[ENTER]", "Entrenamiento equivocado.", "Sólo los suras pueden elegir el [ENTER]entrenamiento de armas mágicas. [ENTER]") then say_title("Has elegido el entrenamiento de armamento.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher6.target.click or skill_group1_6.chat."Entrenamiento de magia negra" or skill_group2_6.chat."Entrenamiento de magia negra" or skill_group3_6.chat."Entrenamiento de magia negra" begin target.delete("teacher6") if skill_group.join(2, 2, "Entrenamiento de magia negra", "En el entrenamiento de magia negra, aprendes el [ENTER]arte de debilitar a tus enemigos con magia negra [ENTER]a distancia.[ENTER]", "Entrenamiento erroneo.", "Sólo los suras pueden elegir el [ENTER]entrenamiento de magia negra. [ENTER]") then say_title("Has elegido el entrenamiento de magia negra.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher7.target.click or skill_group1_7.chat."Entrenamiento de la Fuerza Dragón" or skill_group2_7.chat."Entrenamiento de la Fuerza Dragón" or skill_group3_7.chat."Entrenamiento de la Fuerza Dragón" begin target.delete("teacher7") if skill_group.join(3, 1, "Entrenamiento de la Fuerza Dragón", "El entrenamiento de la fuerza dragón usa los [ENTER]fuertes ataques de fuego del Dios Dragón al igual[ENTER]que magia de apoyo que puede dar al grupo la[ENTER]protección del Dios Dragón.[ENTER]", "Entrenamiento incorrecto.", "Lo siento. Sólo los chamanes pueden escoger el[ENTER]entrenamiento de la Fuerza Dragón.") then say_title("Has seleccionado el entrenamiento de la ") say_title("fuerza dragón.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end when teacher8.target.click or skill_group1_8.chat."Entrenamiento de la Fuerza Curación" or skill_group2_8.chat."Entrenamiento de la Fuerza Curación" or skill_group3_8.chat."Entrenamiento de la Fuerza Curación" begin target.delete("teacher8") if skill_group.join(3, 2, "Entrenamiento de la Fuerza Curación", "Con el entrenamiento de la Fuerza Curación, [ENTER]aprendes a aturdir al enemigo con descargas[ENTER]eléctricas. También puedes aprender a curar a [ENTER]miembros del grupo y darles fuerza adicional.[ENTER]", "Entrenamiento incorrecto.", "Lo siento. Sólo los chamanes pueden escoger el[ENTER]entrenamiento de la Fuerza Curación.") then say_title("Has elegido el entrenamiento de curación.") say("¡Bienvenido!") if not pc.is_clear_skill_group() then local point = pc.level -1 say("Debido a tu decisión de tomar clases, consigues"..point.."") say("puntos de habilidad. Puedes usarlos para la ") say("habilidad que quieras. ") say("") say_reward("Has recibido "..point.." puntos de habilidad. ") say("") else return end clear_letter() end end end end Cualquier error comunicarlo.

Lo primero decir que esto es de mi autoría, cualquier similitud con algo existente en cualquier dimencion o universo conocido, es coincidencia.
 
El sistema conciste en que al alcanzar el gremio el nivel 10, el lider podra adjudicarle bonus de experiencia, yang, etc a su gremio, cualquiera de los 4 tipos, pero solo 1 de ellos, osea que no se puede dar de los 2 tipos al mismo tiempo (en relidad si se puede, pero deberian editar la mision uds mismo, por que el sistema lo he creado asi con solo 1 bonus) a todos los integrantes de su gremio. La duración es de 6 horas (eso lo pueden editar) y la espera para volver a cargar bonus es de 20 horas (tambien lo pueden editar).
 
Las pruebas que he realizado han sido positivas, así que al menos no les generará ningun bug.
 
Dejo el código:
 

quest bonus_gremio begin state start begin when login with pc.isguildmaster() begin set_state(seleccion) end end state seleccion begin when login or levelup with pc.isguildmaster() begin local idg = pc.getguild() local lg = guild.level(idg) if lg >= 10 then if get_time() > pc.getqf("tiempo") then send_letter("Bonus para el gremio") end end end when button or info begin local bonuslvl = { [10] = {"Tu gremio es nivel 10.[ENTER]Puedes aplicar un bonus de 5% [ENTER]a tu elección:", 5}, [11] = {"Tu gremio es nivel 11.[ENTER]Puedes aplicar un bonus de 7% [ENTER]a tu elección:", 7}, [12] = {"Tu gremio es nivel 12.[ENTER]Puedes aplicar un bonus de 10% [ENTER]a tu elección:", 10}, [13] = {"Tu gremio es nivel 13.[ENTER]Puedes aplicar un bonus de 12% [ENTER]a tu elección:", 12}, [14] = {"Tu gremio es nivel 14.[ENTER]Puedes aplicar un bonus de 15% [ENTER]a tu elección:", 15}, [15] = {"Tu gremio es nivel 15.[ENTER]Puedes aplicar un bonus de 20% [ENTER]a tu elección:", 20}, [16] = {"Tu gremio es nivel 16.[ENTER]Puedes aplicar un bonus de 25% [ENTER]a tu elección:", 25}, [17] = {"Tu gremio es nivel 17.[ENTER]Puedes aplicar un bonus de 30% [ENTER]a tu elección:", 30}, [18] = {"Tu gremio es nivel 18.[ENTER]Puedes aplicar un bonus de 35% [ENTER]a tu elección:", 35}, [19] = {"Tu gremio es nivel 19.[ENTER]Puedes aplicar un bonus de 40% [ENTER]a tu elección:", 40}, [20] = {"Tu gremio es nivel 20.[ENTER]Puedes aplicar un bonus de 50% [ENTER]a tu elección:", 50}, } local tipobonus = {"Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia", "Cancelar" } local idg = pc.getguild() local lg = guild.level(idg) say_title("Bonus para el gremio ".. guild.name(idg) ..":") say(bonuslvl[lg][1]) local tb = select("Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia", "Cancelar") if tb != 5 then say_title("Bonus para el gremio ".. guild.name(idg) ..":") say("".. pc.get_name()..", deseas aplicar un bonus de: ") say("".. tipobonus[tb] .." ("..bonuslvl[lg][2].."% por 6 horas)") say_reward("Esto afecta a todos los integrantes de tu gremio.") say("") say("¿Es correcto?") local sn = select("Sí ", "No") if sn == 1 then say_title("Bonus para el gremio ".. guild.name(idg) ..":") say("El bonus escogido se aplicará.") say("") wait() pc.setqf("tiempo", get_time()+20*60*60) clear_letter() __give_guild_priv(idg, tp, bonuslvl[lg][2], 6*60*60) else return end else return end end end end Cualquier bug postearlo para mejorar el sistema. Son libres de postearlo donde quieran, asignandome los creditos y mencionando a metin2zone.net.

Lo primero decir que esto es de mi autoría, cualquier similitud con algo existente en cualquier dimencion o universo conocido, es coincidencia.
 
El sistema conciste en que al alcanzar el gremio el nivel 10, el lider podra adjudicarle bonus de experiencia, yang, etc a su gremio, cualquiera de los 4 tipos, pero solo 1 de ellos, osea que no se puede dar de los 2 tipos al mismo tiempo (en relidad si se puede, pero deberian editar la mision uds mismo, por que el sistema lo he creado asi con solo 1 bonus) a todos los integrantes de su gremio. La duración es de 6 horas (eso lo pueden editar) y la espera para volver a cargar bonus es de 20 horas (tambien lo pueden editar).
 
Las pruebas que he realizado han sido positivas, así que al menos no les generará ningun bug.
 
Dejo el código:
 

quest bonus_gremio begin state start begin when login with pc.isguildmaster() begin set_state(seleccion) end end state seleccion begin when login or levelup with pc.isguildmaster() begin local idg = pc.getguild() local lg = guild.level(idg) if lg >= 10 then if get_time() > pc.getqf("tiempo") then send_letter("Bonus para el gremio") end end end when button or info begin local bonuslvl = { [10] = {"Tu gremio es nivel 10.[ENTER]Puedes aplicar un bonus de 5% [ENTER]a tu elección:", 5}, [11] = {"Tu gremio es nivel 11.[ENTER]Puedes aplicar un bonus de 7% [ENTER]a tu elección:", 7}, [12] = {"Tu gremio es nivel 12.[ENTER]Puedes aplicar un bonus de 10% [ENTER]a tu elección:", 10}, [13] = {"Tu gremio es nivel 13.[ENTER]Puedes aplicar un bonus de 12% [ENTER]a tu elección:", 12}, [14] = {"Tu gremio es nivel 14.[ENTER]Puedes aplicar un bonus de 15% [ENTER]a tu elección:", 15}, [15] = {"Tu gremio es nivel 15.[ENTER]Puedes aplicar un bonus de 20% [ENTER]a tu elección:", 20}, [16] = {"Tu gremio es nivel 16.[ENTER]Puedes aplicar un bonus de 25% [ENTER]a tu elección:", 25}, [17] = {"Tu gremio es nivel 17.[ENTER]Puedes aplicar un bonus de 30% [ENTER]a tu elección:", 30}, [18] = {"Tu gremio es nivel 18.[ENTER]Puedes aplicar un bonus de 35% [ENTER]a tu elección:", 35}, [19] = {"Tu gremio es nivel 19.[ENTER]Puedes aplicar un bonus de 40% [ENTER]a tu elección:", 40}, [20] = {"Tu gremio es nivel 20.[ENTER]Puedes aplicar un bonus de 50% [ENTER]a tu elección:", 50}, } local tipobonus = {"Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia", "Cancelar" } local idg = pc.getguild() local lg = guild.level(idg) say_title("Bonus para el gremio ".. guild.name(idg) ..":") say(bonuslvl[lg][1]) local tb = select("Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia", "Cancelar") if tb != 5 then say_title("Bonus para el gremio ".. guild.name(idg) ..":") say("".. pc.get_name()..", deseas aplicar un bonus de: ") say("".. tipobonus[tb] .." ("..bonuslvl[lg][2].."% por 6 horas)") say_reward("Esto afecta a todos los integrantes de tu gremio.") say("") say("¿Es correcto?") local sn = select("Sí ", "No") if sn == 1 then say_title("Bonus para el gremio ".. guild.name(idg) ..":") say("El bonus escogido se aplicará.") say("") wait() pc.setqf("tiempo", get_time()+20*60*60) clear_letter() __give_guild_priv(idg, tp, bonuslvl[lg][2], 6*60*60) else return end else return end end end end Cualquier bug postearlo para mejorar el sistema. Son libres de postearlo donde quieran, asignandome los creditos y mencionando a metin2zone.net.

Esta quest aparece en el servidor, yo la puse en español y le agregué las cadenas de texto que van en el locale.lua para que funcione perfectamente aunque el locale.lua no este traducido ni una sola palabra.
 
Con esta quest los gm pueden dar bonus de exp, yang, doble yang o drop a los reinos cantidad y horas escogidas, hablando con el guardia de la plaza.
 
Dejo el codigo:
 

quest priv_empire begin state start begin when guild_man1.chat."GM: Bonus para reinos" or guild_man2.chat."GM: Bonus para reinos" or guild_man3.chat."GM: Bonus para reinos" with pc.is_gm() begin local imperios = { [0] = "Todos", [1] = "Shinsoo", [2] = "Chunjo", [3] = "Jinno", } say_title("Bonus para reinos") say("Escoge el reino al que deseas aplicar el bonus") local e = select("Shinsoo", "Chunjo", "Jinno", "Todos", "Cancelar") if 5 == e then return end if 4 == e then e = 0 end say_title("Bonus para el reino") say("Has escogido:") say(string.format("Reino %s", imperios[e])) say("Escoge el bonus:") local t = select("Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia", "Cancelar") if 5 == t then return end say_title("Bonus para el reino") local title_list = {"Item Drop", "Yang Drop", "Especial Yang Drop", "Experiencia" } say(string.format("Reino %s - Bonus: %s ", imperios[e], title_list[t])) say("Escoge el porcentaje") local g = { 10, 20, 50, 100, 150, 200} local p = select(g[1]..'%', g[2]..'%', g[3]..'%', g[4]..'%', g[5]..'%', g[6]..'%', 'Cancelar') if p == 7 then return end say_title("Bonus para el reino") say(string.format("Reino %s - Bonus: %s %d%%", imperios[e], title_list[t], g[p])) say("Duración:") local v = 0 local h = select('6 horas', '12 horas', '24 horas', 'Otro', 'Cancelar') if 5 == h then return elseif 4 == h then say_title("Bonus para el reino") say(string.format("Reino %s - Bonus: %s %d%%", imperios[e], title_list[t], g[p])) say("Ingresa la cantidad de horas:") v=input() if v == "" then v = 0 else v=tonumber(v) end elseif 3 == h then v=24 elseif 2 == h then v=12 elseif 1 == h then v=6 end say_title("Bonus para el reino") say_title("Resumen:") say(string.format("Reino %s [ENTER]Bonus: %s %d%% (%d horas)", imperios[e], title_list[t], g[p], v)) say("") say("¿Es correcto?") say("") local s = select("Sí ", "No") if 1 == s then __give_empire_priv(e, t, g[p], v*60*60) say("La bonificación será aplicada.") else say("Ninguna bonificación aplicada.") end end end end Está testeada y funciona al 100%, cualquier bug que ocurra en sus servidores informen para decirles como arreglarlo.

Buenas!!!
 
Aqui os dejo algunas de las misiones del biologo que tengo traducidas como el el .es
 
collect_herb_lv4.quest
 
 
 
collect_herb_lv7.quest
 
 
 
collect_herb_lv10.quest
 
 
 
collect_herb_lv15.quest
 
 
 
collect_herb_lv20.quest
 
 
 
collect_herb_lv25.quest
 
 
 
collect_quest_lv70.quest-->
Debes iniciar sesión para ver el contenido del enlace en esta publicación.  
 

Buenas a todos!
 
Aburrido en casa vi que habia subquest nuevas y me dije voy a hacer la de nivel 7.
 

---------------------------------- -- SUB QUEST LV7 -- La boda de la hija -- By Elite™ ---------------------------------- quest subquest_lv7 begin state start begin when login or levelup or enter with pc.get_level() >= 7 begin set_state(informacion) end end state informacion begin when letter begin local v=find_npc_by_vnum(20008) if 0==v then else target.vid("__TARGET__", v, "Habla con Octavio") end end when __TARGET__.target.click or 20008.chat."La boda de la hija" begin target.delete("__TARGET__") say_title("Octavio:") say("¿Tienes hijos? Entonces seguramente entenderás") say("mis preocupaciones... ¡es sobre mi hija!") say("He conocido a un hombre que le ha vuelto") say("totalmente loca. Y ahora se ha escapado a un") say("reino difetente con su amante.") say("El es de Chunjo. ¡Por supuesto yo estaba en") say("contra! Pennsé que una dama de Shinsoo no puede") say("casarse con un soñador espiritual de Chunjo. Nos") say("separamos depués de una discusión, se escapó con") say("él a Chunjo.") wait() say_title("Octavio:") say("Escuché que quiere casarse con él allí.") say("Ahora mi hija está esperando una señal mía. ¿Qué") say("haré? ¡Es mi única hija! Por supuesto voy a darle") say("mi bendición. Por favor ve con la Anciana y") say("pídele que ayude con los preparativos.") local s=select("Sí, lo haré.","No puedo hacerlo.","¡No, eso no me interesa!") if s == 3 then say("¿Quieres abandonar esta misión para siempre?") local a=select("Sí, quiero.","No, más bien no.") if 2==a then say_title("Octavio:") say("Muy mal que no me ayudes.") say("Nos vemos.") return end say_title("Octavio:") say("Muy mal que no me ayudes.") say("Nos vemos.") set_state(__GIVEUP__) return end elseif s == 2 then say_title("Octavio:")) say("Muy mal que no me ayudes.") say("Nos vemos.") return end elseif s == 1 then set_state(accept_request) end end state accept_request begin when info or button begin say_title("La boda de la hija") say("Busca a la Anciana y pídele que haga los") say("preparativos para la boda.") say("") say("La Anciana está en Yongan.") end when letter begin send_letter("La boda de la hija") local v=find_npc_by_vnum(9006) if 0==v then else target.vid("__TARGET__",v,"Ve con la Anciana") end end when __TARGET__.target.click or 9006.chat."La boda de la hija" begin target.delete("__TARGET__") say_title("Anciana:") say("¿Una boda dices? Bien, ese es un momento") say("importante en la vida de una mujer. Todo tiene") say("que estar bien, desde el vestido de boda y el") say("esmoquin hasta los anillos de compromiso que la") say("ceremonia covierte en anillos de boda. Cuando el") say("padre de la novia ha dado su consentimiento y se") say("ha pagado el Yang necesario para la boda, puede") say("organizarse la celebración.") wait() say_title("Anciana:") say("Las flores son particularmente importantes - no") say("puede llevarse a cabo una boda sin un ramo") say("nupcial que el novio da a su amada. El ramo debe") say("tener las siguientes flores;") wait() say("Necesito:") say_reward("1 x") say_item_vnum(30169) say("") say_reward("Caza:") say("Lobo Alfa Hambriento") wait() say("Todavía necesito:") say_reward("1 x") say_item_vnum(30170) say("") say_reward("Caza:") say("Lobo Azul Hambriento") wait() say("Todavía necesito:") say_reward("1 x") say_item_vnum(30171) say("") say_reward("Caza:") say("Lobo AlfaAzul Hambriento") wait() say_title("Anciana:") say("Vuelve cuando tengas las tres flores. Comprobaré") say("si son lo suficiente frescas y haré un") say("bonito ramo. Entonces puedes llevárselo a mi") say("hermana. Ella llevará la ceremonia.") pc.setqf("restantes",0) set_state(conseguir_las_flores) end end state conseguir_las_flores begin when info or button begin say_title("La boda de la hija") say("Recoger flores para el ramo nupcial.") say_reward("Te falta "..pc.getqf("restantes").." Flor(es) Rojo Sangre. Puedes conseguirla") say_reward("matando Lobos Alfa Hambrientos.") say_reward("Te falta "..pc.getqf("restantes").." Flor(es) Anaranjanda,") say_reward("Puedes conseguirla matando algunos Lobos Azules") say_reward("Hambrientos.") say_reward("Te falta "..pc.getqf("restantes").." Flor(es) Aromática Amarilla.") say_reward("Puedes conseguirla matando algunos Lobos") say_reward("AlfaAzules Hambrientos.") end when 173.kill begin local s = number(1, 100) if s <= 5 and pc.count_item(30169)< 1 - pc.getqf("restantes")then pc.give_item2(30169, 1) notice("Esta flor es un espécimen espléndido. ¡Preciosa!") end end when 174.kill begin local s = number(1, 100) if s <= 5 and pc.count_item(30170)< 1 - pc.getqf("restantes")then pc.give_item2(30170, 1) notice("Esta flor es un espécimen espléndido. ¡Preciosa!") end end when 175.kill begin local s = number(1, 100) if s <= 5 and pc.count_item(30171)< 1 - pc.getqf("restantes")then pc.give_item2(30171, 1) notice("Esta flor es un espécimen espléndido. ¡Preciosa!") end end when pc.count_item(30169) and pc.count_item(30170) and pc.count_item(30171) then set_state(traer_las_flores) end end state traer_las_flores begin when info or button begin say_title("La boda de la hija") say("¡Terminado! Esas flores deberían formar un ramo") say("precioso. ¡Ahora vuelve rápido con la Anciana") say("antes de que las cabezas de las flores empiecen a") say("mustiarse!") say("") say("La Anciana está en Yogan.") end when letter begin send_letter("La boda de la hija") local v=find_npc_by_vnum(9006) if 0==v then else target.vid("__TARGET__",v,"Ve con la Anciana") end end when __TARGET__.target.click or 9006.chat."La boda de la hija" begin target.delete("__TARGET__") say_title("Anciana:") say("Gracias, ¡es genial! Toma, coge este ramo de") say("flores y ve con mi hermana.") say_reward("La puedes encontrar en Jayang, en el Reino") say_reward("Shinshoo.") pc.give_item2(30172, 1) pc.removeitem(30169) pc.removeitem(30170) pc.removeitem(30171) set_state(Jayang) end end state Jayang begin when info or button begin say_title("La boda de la hija") say("Este no parece ser el reino correcto.") say_reward("Tienes que ir a Yayang, en el Reino Shinshoo.") end when letter begin send_letter("La boda de la hija") local v=find_npc_by_vnum(9006) if 0==v then else target.vid("__TARGET__",v,"Ve con la Anciana del 2 reino") end end when __TARGET__.target.click or 9006.chat."La boda de la hija" begin target.delete("__TARGET__") say_title("La boda de la hija") say_title(pc.get_name()..":") say("Aquí estan las flores para la boda venidera de la") say("hija de Octavio. Deberían pasar a la novia con") say("una bendición. Ella sabrá de quién son.") say_title("Anciana:") say("¡Son flores preciosas! Harán brillar a la novia.") say("Esto completa los preparativos. Por favor dile a") say("Octavio que está invitado a la ceremonia de boda.") say("Sé que estará encantado.") wait() say_title("Anciana:") say("Ve con Octavio, ¿a qué esperas?") set_state(Octavio) end end state Octavio begin when info or button begin say_title("La boda de la hija") say("Vuelve con Octavio en Yogan en el Reino Shinsoo.") end when letter begin send_letter("La boda de la hija") local v=find_npc_by_vnum(20008) if 0==v then else target.vid("__TARGET__",v,"Regresa con Octavio") end end when __TARGET__.target.click or 20008.chat."La boda de la hija" begin target.delete("__TARGET__") pc.give_exp2(2000) if pc.job==0 then local r = math.random(1, 12) if r == 1 then pc.give_item2(13, 1) elseif r == 2 then pc.give_item2(23, 1) elseif r == 3 then pc.give_item2(33, 1) elseif r == 4 then pc.give_item2(43, 1) elseif r == 5 then pc.give_item2(53, 1) elseif r == 6 then pc.give_item2(63, 1) elseif r == 7 then pc.give_item2(3013, 1) elseif r == 8 then pc.give_item2(3023, 1) elseif r == 9 then pc.give_item2(3033, 1) elseif r == 10 then pc.give_item2(3043, 1) elseif r == 11 then pc.give_item2(3053, 1) elseif r == 12 then pc.give_item2(3063, 1) end end if pc.job==1 then local r = math.random(1, 18) if r == 1 then pc.give_item2(13, 1) elseif r == 2 then pc.give_item2(23, 1) elseif r == 3 then pc.give_item2(33, 1) elseif r == 4 then pc.give_item2(43, 1) elseif r == 5 then pc.give_item2(53, 1) elseif r == 6 then pc.give_item2(63, 1) elseif r == 7 then pc.give_item2(2003, 1) elseif r == 8 then pc.give_item2(2013, 1) elseif r == 9 then pc.give_item2(2023, 1) elseif r == 10 then pc.give_item2(2033, 1) elseif r == 11 then pc.give_item2(2043, 1) elseif r == 12 then pc.give_item2(2053, 1) elseif r == 13 then pc.give_item2(1003, 1) elseif r == 14 then pc.give_item2(1013, 1) elseif r == 15 then pc.give_item2(1023, 1) elseif r == 16 then pc.give_item2(1033, 1) elseif r == 17 then pc.give_item2(1043, 1) elseif r == 18 then pc.give_item2(1053, 1) end end if pc.job==2 then local r = math.random(1, 6) if r == 1 then pc.give_item2(13, 1) elseif r == 2 then pc.give_item2(23, 1) elseif r == 3 then pc.give_item2(33, 1) elseif r == 4 then pc.give_item2(43, 1) elseif r == 5 then pc.give_item2(53, 1) elseif r == 6 then pc.give_item2(63, 1) end end if pc.job==3 then local r = math.random(1, 9) if r == 1 then pc.give_item2(5003, 1) elseif r == 2 then pc.give_item2(5013, 1) elseif r == 3 then pc.give_item2(5023, 1) elseif r == 4 then pc.give_item2(7003, 1) elseif r == 5 then pc.give_item2(7013, 1) elseif r == 6 then pc.give_item2(7023, 1) elseif r == 7 then pc.give_item2(7033, 1) elseif r == 8 then pc.give_item2(7043, 1) elseif r == 9 then pc.give_item2(7053, 1) end end local arma = 13 or 23 or 33 or 43 or 53 or 63 or 3013 or 3023 or 3033 or 3043 or 3053 or 3063 or 2003 or 2013 or 2023 or 2033 or 2043 or 2053 or 1003 or 1013 or 1023 or 1033 or 1043 or 1053 or 5003 or 5013 or 5023 or 7003 or 7013 or 7023 or 7033 or 7043 or 7053 say_title("La boda de la hija") say("No puedo agradecértelo lo suficiente. ¡Estoy tan") say("feliz de asistir a la boda de mi hija!") say("Toma, coge tu recompensa:") say_reward("Has recibido 2000 puntos de experiencia.") say_reward("Has recibido 1250 Yang.") wait() say_reward("Una arma forjada por la mano de un maestro de las") say_reward("artes marciales. ¡Cuídala bien!") say_item_vnum(arma) pc.give_exp2(2000) pc.change_money(1250) clear_letter() set_state(__COMPLETE__) set_quest_state("levelup","run") end end state __GIVEUP__ begin end state __COMPLETE__ begin end end Aqui la dejo para que la bajeis en formato .quest -->
Debes iniciar sesión para ver el contenido del enlace en esta publicación.  
Pd:
No tengo servidor asi que no he podido probar , ademas soy bastante novato aun y ando aprendiendo asi que no me critiquen si no va .
 
Espero que la pueda revisar un experto para confirmar que esta bien hecha
 
Saludos!!

Esto lo cree por que queria emular otros juegos donde muestran el la informacion del mob que eliminas. Se le pueden hacer un monton de mejoras y agregados, que seguramente se los hare, pero les dejo la base y ya uds se lanzaran a la aventura.
 

quest kill_info begin state start begin when kill begin local mob_vnum = npc.getrace() if mob_vnum < 8001 then syschat("Has matado ".. mob_name(mob_vnum) ..". ") elseif mob_vnum < 8500 then syschat("Has roto un ".. mob_name(mob_vnum) ..".") elseif mob_vnum > 8500 then syschat("Has matado ".. mob_name(mob_vnum) ..". ") end end end end

----------------------------------------------
--Misión de Patrulla
--Texto de la misión igual que el del metin2.es
--Traducida por Eliteâ„¢
----------------------------------------------
quest patrol_townaround begin
state patrol1_blue_step5 begin
when letter begin
target.pos("__TARGET__", 500, 580, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say_reward("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol1_blue_step4 begin
when letter begin
target.pos("__TARGET__", 545, 840, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4.")
setstate(patrol1_blue_step5)
end
end
state patrol1_blue_step3 begin
when letter begin
target.pos("__TARGET__", 760, 985, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3.")
setstate(patrol1_blue_step4)
end
end
state patrol1_blue_step2 begin
when letter begin
target.pos("__TARGET__", 720, 855, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2.")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2.")
setstate(patrol1_blue_step3)
end
end
state patrol1_blue_step1 begin
when letter begin
target.pos("__TARGET__", 670, 720, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1.")
setstate(patrol1_blue_step2)
end
end
state patrol1_yellow_step5 begin
when letter begin
target.pos("__TARGET__", 720, 700, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5.")
setstate(reward)
end
end
state patrol1_yellow_step4 begin
when letter begin
target.pos("__TARGET__", 900, 930, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº4")
setstate(patrol1_yellow_step5)
end
end
state patrol1_yellow_step3 begin
when letter begin
target.pos("__TARGET__", 875, 725, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº 3")
 
setstate(patrol1_yellow_step4)
end
end
state patrol1_yellow_step2 begin
when letter begin
target.pos("__TARGET__", 890, 610, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº2")
setstate(patrol1_yellow_step3)
end
end
state patrol1_yellow_step1 begin
when letter begin
target.pos("__TARGET__", 730, 590, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº1")
setstate(patrol1_yellow_step2)
end
end
state patrol1_gray_step5 begin
when letter begin
target.pos("__TARGET__", 715, 390, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5. ")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol1_gray_step4 begin
when letter begin
target.pos("__TARGET__", 765, 190, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº4")
setstate(patrol1_gray_step5)
end
end
state patrol1_gray_step3 begin
when letter begin
target.pos("__TARGET__", 790, 400, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3.")
setstate(patrol1_gray_step4)
end
end
state patrol1_gray_step2 begin
when letter begin
target.pos("__TARGET__", 890, 610, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2.")
setstate(patrol1_gray_step3)
end
end
state patrol1_gray_step1 begin
when letter begin
target.pos("__TARGET__", 730, 590, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1.")
setstate(patrol1_gray_step2)
end
end
state patrol1_purple_step5 begin
when letter begin
target.pos("__TARGET__", 500, 580, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5.")
setstate(reward)
end
end
state patrol1_purple_step4 begin
when letter begin
target.pos("__TARGET__", 490, 230, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4.")
setstate(patrol1_purple_step5)
end
end
state patrol1_purple_step3 begin
when letter begin
target.pos("__TARGET__", 665, 130, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3.")
setstate(patrol1_purple_step4)
end
end
state patrol1_purple_step2 begin
when letter begin
target.pos("__TARGET__", 765, 190, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2.")
setstate(patrol1_purple_step3)
end
end
state patrol1_purple_step1 begin
when letter begin
target.pos("__TARGET__", 715, 390, 1, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1.")
setstate(patrol1_purple_step2)
end
end
state patrol2_blue_step5 begin
when letter begin
target.pos("__TARGET__", 760, 640, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol2_blue_step4 begin
when letter begin
target.pos("__TARGET__", 830, 630, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(patrol2_blue_step5)
end
end
state patrol2_blue_step3 begin
when letter begin
target.pos("__TARGET__", 770, 440, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol2_blue_step4)
end
end
state patrol2_blue_step2 begin
when letter begin
target.pos("__TARGET__", 650, 370, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol2_blue_step3)
end
end
state patrol2_blue_step1 begin
when letter begin
target.pos("__TARGET__", 640, 510, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol2_blue_step2)
end
end
state patrol2_yellow_step6 begin
when letter begin
target.pos("__TARGET__", 640, 765, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 6.")
q.set_title("Punto de patrulla 6.")
q.start()
end
when button begin
say_title("Punto de patrulla 6.")
say("Ve al punto de patrulla nº6")
end
when info begin
say_title("Punto de patrulla 6.")
say("Ve al punto de patrulla nº6")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº6")
setstate(reward)
end
end
state patrol2_yellow_step5 begin
when letter begin
target.pos("__TARGET__", 650, 900, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol2_yellow_step4 begin
when letter begin
target.pos("__TARGET__", 780, 930, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(patrol2_yellow_step5)
end
end
state patrol2_yellow_step3 begin
when letter begin
target.pos("__TARGET__", 880, 820, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol2_yellow_step4)
end
end
state patrol2_yellow_step2 begin
when letter begin
target.pos("__TARGET__", 830, 630, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol2_yellow_step3)
end
end
state patrol2_yellow_step1 begin
when letter begin
target.pos("__TARGET__", 760, 640, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol2_yellow_step2)
end
end
state patrol2_gray_step5 begin
when letter begin
target.pos("__TARGET__", 485, 640, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol2_gray_step4 begin
when letter begin
target.pos("__TARGET__", 390, 830, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(patrol2_gray_step5)
end
end
state patrol2_gray_step3 begin
when letter begin
target.pos("__TARGET__", 480, 950, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol2_gray_step4)
end
end
state patrol2_gray_step2 begin
when letter begin
target.pos("__TARGET__", 650, 900, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol2_gray_step3)
end
end
state patrol2_gray_step1 begin
when letter begin
target.pos("__TARGET__", 640, 765, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol2_gray_step2)
end
end
state patrol2_purple_step5 begin
when letter begin
target.pos("__TARGET__", 485, 640, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol2_purple_step4 begin
when letter begin
target.pos("__TARGET__", 650, 900, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(patrol2_purple_step5)
end
end
state patrol2_purple_step3 begin
when letter begin
target.pos("__TARGET__", 830, 630, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol2_purple_step4)
end
end
state patrol2_purple_step2 begin
when letter begin
target.pos("__TARGET__", 640, 510, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol2_purple_step3)
end
end
state patrol2_purple_step1 begin
when letter begin
target.pos("__TARGET__", 485, 640, 21, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol2_purple_step2)
end
end
state patrol3_blue_step4 begin
when letter begin
target.pos("__TARGET__", 355, 530, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(reward)
end
end
state patrol3_blue_step3 begin
when letter begin
target.pos("__TARGET__", 665, 510, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol3_blue_step4)
end
end
state patrol3_blue_step2 begin
when letter begin
target.pos("__TARGET__", 610, 780, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol3_blue_step3)
end
end
state patrol3_blue_step1 begin
when letter begin
target.pos("__TARGET__", 480, 640, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol3_blue_step2)
end
end
state patrol3_yellow_step6 begin
when letter begin
target.pos("__TARGET__", 380, 690, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 6.")
q.set_title("Punto de patrulla 6.")
q.start()
end
when button begin
say_title("Punto de patrulla 6.")
say("Ve al punto de patrulla nº6")
end
when info begin
say_title("Punto de patrulla 6.")
say("Ve al punto de patrulla nº6")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº6")
setstate(reward)
end
end
state patrol3_yellow_step5 begin
when letter begin
target.pos("__TARGET__", 210, 710, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol3_yellow_step4 begin
when letter begin
target.pos("__TARGET__", 180, 580, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(patrol3_yellow_step5)
end
end
state patrol3_yellow_step3 begin
when letter begin
target.pos("__TARGET__", 200, 350, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol3_yellow_step4)
end
end
state patrol3_yellow_step2 begin
when letter begin
target.pos("__TARGET__", 360, 450, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol3_yellow_step3)
end
end
state patrol3_yellow_step1 begin
when letter begin
target.pos("__TARGET__", 355, 530, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol3_yellow_step2)
end
end
state patrol3_gray_step6 begin
when letter begin
target.pos("__TARGET__", 480, 640, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 6.")
q.set_title("Punto de patrulla 6.")
q.start()
end
when button begin
say("Punto de patrulla 6.")
say("Ve al punto de patrulla nº6")
end
when info begin
say_title("Punto de patrulla 6.")
say("Ve al punto de patrulla nº6")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº6")
setstate(reward)
end
end
state patrol3_gray_step5 begin
when letter begin
target.pos("__TARGET__", 610, 780, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 5.")
q.set_title("Punto de patrulla 5.")
q.start()
end
when button begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when info begin
say_title("Punto de patrulla 5.")
say("Ve al punto de patrulla nº5")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº5")
setstate(reward)
end
end
state patrol3_gray_step4 begin
when letter begin
target.pos("__TARGET__", 645, 1010, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº4")
setstate(patrol3_gray_step5)
end
end
state patrol3_gray_step3 begin
when letter begin
target.pos("__TARGET__", 450, 930, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº3")
setstate(patrol3_gray_step4)
end
end
state patrol3_gray_step2 begin
when letter begin
target.pos("__TARGET__", 420, 820, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol3_gray_step3)
end
end
state patrol3_gray_step1 begin
when letter begin
target.pos("__TARGET__", 380, 690, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº1")
setstate(patrol3_gray_step2)
end
end
state patrol3_purple_step4 begin
when letter begin
target.pos("__TARGET__", 445, 845, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 4.")
q.set_title("Punto de patrulla 4.")
q.start()
end
when button begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when info begin
say_title("Punto de patrulla 4.")
say("Ve al punto de patrulla nº4")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº4")
setstate(reward)
end
end
state patrol3_purple_step3 begin
when letter begin
target.pos("__TARGET__", 210, 710, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 3.")
q.set_title("Punto de patrulla 3.")
q.start()
end
when button begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when info begin
say_title("Punto de patrulla 3.")
say("Ve al punto de patrulla nº3")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("You have reached the patrol-pointNr.3 ")
setstate(patrol3_purple_step4)
end
end
state patrol3_purple_step2 begin
when letter begin
target.pos("__TARGET__", 360, 410, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 2.")
q.set_title("Punto de patrulla 2.")
q.start()
end
when button begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when info begin
say_title("Punto de patrulla 2.")
say("Ve al punto de patrulla nº2")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say_reward("Has alcanzado el punto de patrulla nº2")
setstate(patrol3_purple_step3)
end
end
state patrol3_purple_step1 begin
when letter begin
target.pos("__TARGET__", 545, 645, 41, "")
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Punto de patrulla 1.")
q.set_title("Punto de patrulla 1.")
q.start()
end
when button begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when info begin
say_title("Punto de patrulla 1.")
say("Ve al punto de patrulla nº1")
end
when __TARGET__.target.arrive begin
target.delete("__TARGET__")
say("Has alcanzado el punto de patrulla nº1")
setstate(patrol3_purple_step2)
end
end
state start begin
when 20300.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==0 and pc.level<=5 begin
setstate(accept1)
end
when 20301.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==0 and pc.level<=5 begin
setstate(accept1)
end
when 20302.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==1 and pc.level<=5 begin
setstate(accept1)
end
when 20303.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==1 and pc.level<=5 begin
setstate(accept1)
end
when 20304.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==2 and pc.level<=5 begin
setstate(accept1)
end
when 20305.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==2 and pc.level<=5 begin
setstate(accept1)
end
when 20306.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==3 and pc.level<=5 begin
setstate(accept1)
end
when 20307.chat."Ir de patrulla." with pc.get_empire()==1 and pc.job==3 and pc.level<=5 begin
setstate(accept1)
end
when 20320.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==0 and pc.level<=5 begin
setstate(accept2)
end
when 20321.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==0 and pc.level<=5 begin
setstate(accept2)
end
when 20322.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==1 and pc.level<=5 begin
setstate(accept2)
end
when 20323.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==1 and pc.level<=5 begin
setstate(accept2)
end
when 20324.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==2 and pc.level<=5 begin
setstate(accept2)
end
when 20325.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==2 and pc.level<=5 begin
setstate(accept2)
end
when 20326.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==3 and pc.level<=5 begin
setstate(accept2)
end
when 20327.chat."Ir de patrulla." with pc.get_empire()==2 and pc.job==3 and pc.level<=5 begin
setstate(accept2)
end
when 20340.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==0 and pc.level<=5 begin
setstate(accept3)
end
when 20341.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==0 and pc.level<=5 begin
setstate(accept3)
end
when 20342.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==1 and pc.level<=5 begin
setstate(accept3)
end
when 20343.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==1 and pc.level<=5 begin
setstate(accept3)
end
when 20344.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==2 and pc.level<=5 begin
setstate(accept3)
end
when 20345.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==2 and pc.level<=5 begin
setstate(accept3)
end
when 20346.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==3 and pc.level<=5 begin
setstate(accept3)
end
when 20347.chat."Ir de patrulla." with pc.get_empire()==3 and pc.job==3 and pc.level<=5 begin
setstate(accept3)
end
end
state accept1 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Patrullar castillo del área Yongan.")
q.set_title("Patrullar castillo del área Yongan.")
q.start()
end
when button begin
say_title("Patrullar castillo del área Yongan.")
if is_test_server() then
local s=select("1 Valor","2 Valor","3 Valor","4 Valor")
if 1==s then
setstate(patrol1_blue_step1)
elseif 2==s then
setstate(patrol1_yellow_step1)
elseif 3==s then
setstate(patrol1_gray_step1)
elseif 4==s then
setstate(patrol1_purple_step1)
end
else
local s=number(1, 4)
if 1>=s then -- 80.00% (1/4)
setstate(patrol1_blue_step1)
elseif 2>=s then --80,00% (1/4)
setstate(patrol1_yellow_step1)
elseif 3>=s then --80,00% (1/4)
setstate(patrol1_gray_step1)
elseif 4>=s then -- 80.00% (1/4)
setstate(patrol1_purple_step1)
end
end
end
when info begin
say_title("Patrullar castillo del área Yongan.")
if is_test_server() then
local s=select("1 Valor","2 Valor","3 Valor","4 Valor")
if 1==s then
setstate(patrol1_blue_step1)
elseif 2==s then
setstate(patrol1_yellow_step1)
elseif 3==s then
setstate(patrol1_gray_step1)
elseif 4==s then
setstate(patrol1_purple_step1)
end
else
local s=number(1, 4)
if 1>=s then -- 80.00% (1/4)
setstate(patrol1_blue_step1)
elseif 2>=s then --80,00% (1/4)
setstate(patrol1_yellow_step1)
elseif 3>=s then --80,00% (1/4)
setstate(patrol1_gray_step1)
elseif 4>=s then -- 80.00% (1/4)
setstate(patrol1_purple_step1)
end
end
end
end
state accept2 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Patrullar castillo del área Joan")
q.set_title("Patrullar castillo del área Joan")
q.start()
end
when button begin
say_title("Patrullar castillo del área Joan")
if is_test_server() then
local s=select("1 Valor","2 Valor","3 Valor","4 Valor")
if 1==s then
setstate(patrol2_blue_step1)
elseif 2==s then
setstate(patrol2_yellow_step1)
elseif 3==s then
setstate(patrol2_gray_step1)
elseif 4==s then
setstate(patrol2_purple_step1)
end
else
local s=number(1, 4)
if 1>=s then -- 80.00% (1/4)
setstate(patrol2_blue_step1)
elseif 2>=s then --80,00% (1/4)
setstate(patrol2_yellow_step1)
elseif 3>=s then --80,00% (1/4)
setstate(patrol2_gray_step1)
elseif 4>=s then -- 80.00% (1/4)
setstate(patrol2_purple_step1)
end
end
end
when info begin
say_title("Patrullar castillo del área Joan")
 
if is_test_server() then
local s=select("1 Valor","2 Valor","3 Valor","4 Valor")
if 1==s then
setstate(patrol2_blue_step1)
elseif 2==s then
setstate(patrol2_yellow_step1)
elseif 3==s then
setstate(patrol2_gray_step1)
elseif 4==s then
setstate(patrol2_purple_step1)
end
else
local s=number(1, 4)
if 1>=s then -- 80.00% (1/4)
setstate(patrol2_blue_step1)
elseif 2>=s then --80,00% (1/4)
setstate(patrol2_yellow_step1)
elseif 3>=s then --80,00% (1/4)
setstate(patrol2_gray_step1)
elseif 4>=s then -- 80.00% (1/4)
setstate(patrol2_purple_step1)
end
end
end
end
state accept3 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Patrullar castillo del área Pyungmo")
q.set_title("Patrullar castillo del área Pyungmo")
q.start()
end
when button begin
say_title("Patrullar castillo del área Pyungmo")
if is_test_server() then
local s=select("1 Valor","2 Valor","3 Valor","4 Valor")
if 1==s then
setstate(patrol3_blue_step1)
elseif 2==s then
setstate(patrol3_yellow_step1)
elseif 3==s then
setstate(patrol3_gray_step1)
elseif 4==s then
setstate(patrol3_purple_step1)
end
else
local s=number(1, 4)
if 1>=s then -- 80.00% (1/4)
setstate(patrol3_blue_step1)
elseif 2>=s then --80,00% (1/4)
setstate(patrol3_yellow_step1)
elseif 3>=s then --80,00% (1/4)
setstate(patrol3_gray_step1)
elseif 4>=s then -- 80.00% (1/4)
setstate(patrol3_purple_step1)
end
end
end
when info begin
say_title("Patrullar castillo del área Pyungmo")
if is_test_server() then
local s=select("1 Valor","2 Valor","3 Valor","4 Valor")
if 1==s then
setstate(patrol3_blue_step1)
elseif 2==s then
setstate(patrol3_yellow_step1)
elseif 3==s then
setstate(patrol3_gray_step1)
elseif 4==s then
setstate(patrol3_purple_step1)
end
else
local s=number(1, 4)
if 1>=s then -- 80.00% (1/4)
setstate(patrol3_blue_step1)
elseif 2>=s then --80,00% (1/4)
setstate(patrol3_yellow_step1)
elseif 3>=s then --80,00% (1/4)
setstate(patrol3_gray_step1)
elseif 4>=s then -- 80.00% (1/4)
setstate(patrol3_purple_step1)
end
end
end
end
state reward begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Patrulla terminada")
q.set_title("Patrulla terminada")
q.start()
end
when button begin
say_title("Patrulla terminada")
say_reward("Como recompensa por las patrullas")
say_reward("obtienes una bonificación de experiencia.")
pc.give_exp2(135)
set_quest_state("levelup", "run")
setstate(__COMPLETE__)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end

----------------------------------------------------
--COLLECT QUEST_lv70
--METIN2 collect quest
--Traducida por Eliteâ„¢
----------------------------------------------------
quest collect_quest_lv70 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 70
set_state(information)
end
end
 
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "La investigación del Biólogo")
end
send_letter("La investigación del Biólogo")
end
 
when button or info begin
say_title("La investigación del Biólogo")
say("El Biólogo Chaegirab,aprendiz de Uriel,te está")
say("buscando desesperadamente. Date prisa y descubre")
say("cómo puedes ayudarle.")
end
 
when __TARGET__.target.click or
20084.chat."Ramas de Zelkovas" begin
target.delete("__TARGET__")
say_title("Biólogo Chaegirab:")
--- l
say("Hola, ¡es agadable verte! Actualmente estoy.")
say("estudiando el Bosque Fantasma y las extrañas")
say("criaturas que viven ahí. Como ya sabes, no tengo")
say("tiempo suficiente para ir de excursión así que.")
say("dependo de tu ayuda. ¿Podrías recoger algo de")
say("información para mi?")
wait()
say_title("Biólogo Chaegirab:")
say("Es sobre el lugar que ellos llaman el Bosque")
say("Fantasma. Después de que las Piedras Metin")
say("propagasen su influencia sobre el continente,")
say("terribles fantasmas alcazaron este lugar. Esto")
say("lo hace uno de los más interesantes pero también")
say("más peligroso sitios para estudiar. Así que ten")
say("cuidado.")
wait()
say_title("Biólogo Chaegirab:")
say("Necesito 25 ramas Zelkova para mi investigación,")
say("sin embargo solo necesito aquellas que son")
say("delgadas y estén completamente intactas. Solo")
say("tráeme una rama cada vez, ya que la investigación")
say("requiere mucho tiempo")
set_state(go_to_disciple)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
 
state go_to_disciple begin
when letter begin
send_letter("La investigacion del Biólogo")
 
end
when button or info begin
say_title("Ramas del Bosque Fantasma")
--- l
say("El Biólogo Chaegirab,aprendiz de Uriel,está")
say("estudiando los árboles en el Bosque Fantasma.")
say("Necesita 25 Ramas de Zelkova para su")
say("investigación. Llévale solo una cada vez, para")
say("que pueda examinarlas individualmente. Crecen en")
say("los árboles Fantasma.")
say("")
say_item_vnum(30165)
say_reward("Has entregado " .. " " .. pc . getqf ( "collect_count") .. " ramas hasta ahora.")
end
 
when 71035.use begin
if get_time() < pc.getqf("duration") then
say("No puedes utilizar la poción de la misión")
return
end
if pc.getqf("drink_drug")==1 then
say("La estas usando.")
return
end
if pc.count_item(30165)==0 then
say_title("Biólogo Chaegirab:")
say("Mientras estas organizando las ramas del bosque ")
say("del fantasma, se puede utilizar la poción de la misión.")
return
end
 
item.remove()
pc.setqf("drink_drug",1)
end
 
 
 
when 20084.chat."Las Ramas de Zelkova" with pc.count_item(30165) >0 begin
if get_time() > pc.getqf("duration") then
say_title("Biólogo Chaegirab:")
--- l
say("Oh, ¡has encontrado una rama!")
say("Dame un segundo para comprobarla...")
pc.remove_item(30165, 1)
pc.setqf("duration",get_time()+0*0*00)
wait()
 
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
 
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 24 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤F¤@­ó+1
say_title("Biólogo Chaegirab:")
say("¡Oh! Esta rama de Zelkova es de la mejor calidad.")
say("Voy a empezar mi investigación inmediatamente.")
say("Pero necesito otras " .. " " .. 25 - pc . getqf ( "collect_count") .. ".¡Por favor inténtalo y")
say("encuentra alguna!")
say("Y recuerda que necesito tiempo para el análisis.")
say("No podré examinar la siguiente hasta mañana.")
pc.setqf("drink_drug",0)
return
end
say_title("Biólogo Chaegirab:")
say("¡Has recogido las 25 Ramas de Zelkova! Gracias.")
say("Ahora solo necesito una Piedra Alma de Gyimok")
say("para ayudarme a entender el crecimiento de esos")
say("árboles. ¿Podrías ocuparte de esto por mi? Puedes")
say("encontrarla por los árboles en el Bosque")
say("Fantasma")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Biólogo Chaegirab:")
say("Hmm...")
say("Lo siento. No puedo utilizar esta...")
say("Es muy fina y se me rompió varias veces")
say("Por favor, traeme otra.")
pc.setqf("drink_drug",0)
return
end
else
say_title("Biólogo Chaegirab:")
say("Lo siento mucho")
say("No he inspeccionado la rama que me diste.")
say("Lo siento mucho .... ¿Me puede dar otra")
say("más tarde?")
return
end
 
end
end
 
state key_item begin
when letter begin
send_letter("La investigación del biologo")
 
if pc.count_item(30224)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Encuentra la P. Alma de Gyimok")
end
end
 
end
when button or info begin
if pc.count_item(30224) >0 then
say_title("Piedra Alma de Gyimok")
--- l
say("¡Finalmente has encontrado la Piedra Alma!")
say("Llévasela al Biólogo Chaegirab.")
say("Ya te está esperando.")
return
end
 
say_title("Piedra Alma de Gyimok")
--- l
say("Has conseguido las 25 Ramas de Zelkova para la")
say("investigación del Biólogo Chaegirab. Chaegirab")
say("necesita la Piedra Alma de Gyimok para ayudarle a")
say("enteder completamente las propiedades de las")
say("ramas.")
say_item_vnum(30224)
say("Puedes conseguirla de los árboles en el Bosque")
say("Fantasma..")
end
 
when 2301.kill or
2302.kill or
2303.kill or
2304.kill or
2305.kill or
2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill or
2307.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30224)==0 then
pc.give_item2(30224)
send_letter("Has encontrado la Piedra Alma Gyimok.")
end
end
 
 
 
when __TARGET__.target.click or
20084.chat."Aqui esta la P. Alma de Gyimok" with pc.count_item(30224) > 0 begin
target.delete("__TARGET__")
say_title("Biólogo Chaegirab:")
say("¡Muchas gracias!")
say("Como recompensa, voy a darte esta receta. Su")
say("contenido no es conocido por muchos y su secreto")
say("esta guardado cuidadosamente. Ve y busca a")
say("Baek-Go- él creará la poción para ti. Adiós, mi")
say("amigo. Gracia a tu ayuda he sido capaz de")
say("averiguar mucha información importante sobre el")
say("Bosque Fantasma.")
pc.remove_item(30224,1)
set_state(__reward)
end
end
 
state __reward begin
when letter begin
send_letter("La recompensa de Chaegirab")
 
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "La recompensa de Chaegirab")
end
 
end
when button or info begin
say_title("La recompensa de Chaegirab")
--- l
say("Como recompensa por las Ramas de Zelokova y la")
say("Piedra Alma, el Biólogo Chaegirab te ha dado una")
say("recetea secreta. Ve con Baek-Go ahora, él hará lá")
say("cura milagrosa para ti")
end
 
when __TARGET__.target.click or
20018.chat."La recompensa de Chaegirab" begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Oh, ¿esta es la receta secreta del Biólogo")
say("Chaegirab? Hm, aumentará tu resistencia a los")
say("daños en un 10% y tu velocidad de movimiento en")
say("11 puntos. ¡Aquí está tu poción!")
wait()
say_title("Baek-Go:")
say("Se supone que también debo darte esta Caja de")
say("ébano Verde. Por favor cuídala bien.")
say_reward("Como recompensa por completar la petición de")
say_reward("Chaegirab, tu resistencia a los daños aumentará")
say_reward("en un 10% permanentemente y tu velocidad de")
say_reward("movimiento aumentará en 11 puntos.")
affect.add_collect(apply.MOV_SPEED,10,60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,20,60*60*24*365*60)
clear_letter()
set_quest_state("collect_quest_lv80", "run")
set_state(__complete)
end
end
state __complete begin
end
end

Buenas gente
Quiero estrenar mi estancia en el foro con una pequeña y sencilla quest que he echo hace un ratillo.
Como sabéis, pertenezco al Panamera y por lo tanto lo mio es el Old Style.
Mientras estaba traduciendo alguna quest para conseguir una similitud más grande al Metin2 ES me di cuenta que la quest skillreset2 que todos tenemos es muy antigua. Lo que he echo es actualizarla y hacerla 100% igual a GameForge.
 
Sé que este aporte es muy pequeño y habrá muchos que no lo sabrán apreciar, aun así tengo la esperanza que aún haya gente Old Style.
 
El funcionamiento y los comentarios son calcados al ES.
 
Bueno, pues aquí la quest
 

quest skill_reset2 begin state start begin when oldwoman.chat."Restablecer habilidades" begin if pc.get_level() > 30 then say_title("Anciana:") say("Tu nivel es "..pc.get_level()..". No puedo ayudarte. Con este") say("nivel, no puedes cambiar más tus habilidades.") say("Sólo si estás por debajo del nivel 30 puedes") say("escoger otra habilidad.") return end if pc.get_skill_group() == 0 then say_title("Anciana:") say("¡Todavía no has empezado ningún entrenamiento!") say("Mientras no gastes ningún punto de habilidad, no") say("podrás restablecerlas. Vuelve cuando") say("hayas echo algún error durante tu entrenamiento,") say("entonces sí estaré encantada de ayudarte.") return end local coste = pc.level * 4000 say_title("Anciana:") say("Hola, has venido al sitio correcto. Tus ojos") say("muestran mucho dolor. Permito a las personas") say("olvidar sus habilidades para que puedan empezar") say("de nuevo. ¿Quieres olvidar tus habilidades y") say("empezar de nuevo? Cuesta "..coste.." Yang.") local s = select("Restablecer habilidades","No restablecer") if s == 1 then if pc.money < coste then say_title("Anciana:") say("No tienes suficiente Yang. No puedo ayudarte;") say("necesito el dinero para sobrevivir.") else pc.changegold(-coste) pc.set_skill_group(0) end end if s == 2 then say_title("Anciana:") say("Si cambias de opinión, vuelve a visitarme.") end end end end Y como me sabe a poco, voy a explicaros el funcionamiento de la quest para los que están aprendiendo a hacerlas.
 
La quest empieza con una opción de chat a oldwomen. El npc oldwomen pertenece a a la id 9006, es decir, la anciana.
Justo empezar nos encontramos la condición pc.get_level > 30, es decir, si el jugador es mayor de nivel 30 nos mostrará un texto y el when quedará cerrado con el return.
La siguiente condición, solo se alcanzará si el jugador no cumple la primera condición, es pc.get_skill_group() == 0. Si el número de las habilidades del jugador es 0, no tiene habilidades, nos mostrará otro texto y el when quedará cerrado con el return.
Si el jugador no cumple ninguna de las anteriores condiciones, podríamos decir que puede utilizar la quest.
Lo primero que hace la quest es asignar un número a "coste" que será el nivel del pj multiplicado por 4000 (pc.level * 4000).
Nos mostrará un texto y una selección. Si seleccionamos la primera opción y la cantidad de yang del usuario es mayor al número que hemos asignado con "coste", nos asignará nuestras habilidades a 0 y nos restará el coste, es decir, podremos volver a elegir habilidades.
 
 
Pues eso es todo, espero que aprendáis algo con esto los que están iniciando.
 
Un saludo

Hola amigos les traigo unas nuevas texturas para Shinsoo, Jinno y Chunjo

Chunjo:




Jinno:





Shinsoo:








Link de Descarga:
MediaFire:
Debes iniciar sesión para ver el contenido del enlace en esta publicación.