Jump to content

Buscar en la comunidad

Mostrando resultados para las etiquetas 'quest'.

  • Buscar por etiquetas

    Escribe las etiquetas separadas por comas.
  • Buscar por autor

Tipo de contenido


Foros

  • Metin2 Zone
    • Comunidad
    • Presentaciones y despedidas
  • Servidores Privados
    • Presentaciones de Servidores
    • Presentación de Proyectos
  • General
    • Discusiones generales
    • Socios y Colaboraciones
    • Servicios y compraventa
    • Ayudas y preguntas
    • Opiniones y consejos
    • Offtopic
  • Técnica
    • Programación
    • Edición de servidores Metin2
    • Desarrollo Web
    • Seguridad
    • Sistemas Operativos
    • Informática
  • Arte
    • Diseño y sección gráfica
    • Galería de imágenes y vídeos
    • Modelado 3D
    • Mapping
  • Descargas
    • Servidores y Clientes
    • Modelos 3D
    • Imágenes Metin2
    • Mapas
    • Traducciones
  • Archivo
    • Servidores Offline
    • Temas Links Caidos

Encontrar resultados en...

Encontrar resultados que...


Fecha creación

  • Inicio

    Fin


Última actualización

  • Inicio

    Fin


Filtrar por número de...

Ingreso

  • Inicio

    Fin


Grupo


Email


Sitio web


Jabber


Skype


Discord


Localización


Intereses

  1. Hola comunidad de Metin2Zone quien me podria hacer el favor y me podria editar esta quest para que escoja si quiere corporal o mental etc, y si es posible que pida 50kk de yang por hacerte las p muchisimas gracias y disculpen si los incomodo when 50512.use begin if pc.get_level() < 50 then say_title("Debe De Ser Nivel 50 Para Poder Subir Sus Habilidades Ha Perfect") return end say_title ("Subir Ha Perfect Master") say ("") say ("¿Husted Desea Subir Sus Habilidades Ha Perfect?") say ("") a = select ("Subir A Perfect" , "Cerrar") if a == 2 then elseif a == 1 then pc.set_skill_level (1,59) pc.set_skill_level (2,59) pc.set_skill_level (3,59) pc.set_skill_level (4,59) pc.set_skill_level (5,59) pc.set_skill_level (6,59) pc.set_skill_level (16,59) pc.set_skill_level (17,59) pc.set_skill_level (18,59) pc.set_skill_level (19,59) pc.set_skill_level (20,59) pc.set_skill_level (21,59) pc.set_skill_level (31,59) pc.set_skill_level (32,59) pc.set_skill_level (33,59) pc.set_skill_level (34,59) pc.set_skill_level (35,59) pc.set_skill_level (36,59) pc.set_skill_level (46,59) pc.set_skill_level (47,59) pc.set_skill_level (48,59) pc.set_skill_level (49,59) pc.set_skill_level (50,59) pc.set_skill_level (51,59) pc.set_skill_level (61,59) pc.set_skill_level (62,59) pc.set_skill_level (63,59) pc.set_skill_level (64,59) pc.set_skill_level (65,59) pc.set_skill_level (66,59) pc.set_skill_level (76,59) pc.set_skill_level (77,59) pc.set_skill_level (78,59) pc.set_skill_level (79,59) pc.set_skill_level (80,59) pc.set_skill_level (81,59) pc.set_skill_level (91,59) pc.set_skill_level (92,59) pc.set_skill_level (93,59) pc.set_skill_level (94,59) pc.set_skill_level (95,59) pc.set_skill_level (96,59) pc.set_skill_level (106,59) pc.set_skill_level (107,59) pc.set_skill_level (108,59) pc.set_skill_level (109,59) pc.set_skill_level (110,59) pc.set_skill_level (111,59) pc . remove_item("50512",1) elseif a == 2 then end end end end
  2. hola metineros de metinzone venia a pedir si alguien me aria el favor de hacerme una quest con las citi 1 chunjo shinso jino y los mapas del acantilado del diablo 1049600 1510400 BayBlackSand 1177600 1664000 DawnMistWood 1024000 1664000 CapeDragonHead esas son las cordenadas .. o si es mas sencillo solo la quest con las cordenadas de los mapas para que se pueda ir desde el mob 20094 desde ya muchas gracias
  3. Hola buenas. Uso files de maxmi 34k y el cliente de omega 34k. Todo genial, la mayoría de cosas están traducidas (el mob_proto y el item_proto al 100%), el problema viene con las quest que están en turco. Sé que para editar lo que dicen en las quest debo ir a /usr/game/locale/turkey/ y aquí hay muchos archivos .quest que con notepad++ son fáciles de editar. Pero mi problema es que cuando acabo de editar una quest (traducida al español), guardo los cambios en los files (uso FileZilla), rebooteo... Y los textos dentro del juego no cambian. Siguen en Turco xD sin embargo abro de nuevo los files ".quest" que traduje y efectivamente; están los textos cambiados en español. No es problema de haberlo hecho mal, pues si hubiese cometido algún fallo (ya sea no poner/comerme un "", o eliminar algo que no debo), no me dejaría entrar al server xD ¿Es posible que los textos de las Quest no se editen en los files del servidor? ¿Es acaso en el cliente? Gracias de antemano...
  4. HOLA GENTE NESESITO 2 QUEST :) 1 - QUEST DE HALLOWEEN DE DROP DE CALABAZAS Y BARITAS Y SI PUEDE SER LA QUEST DEL SEÑOR CALABAZA :/ 2 - VI EN UN SERVIDOR QUE TE DABAN EQUIPO INICIAL YA DOPADO PVM PARA LEVIAR QUERIA SABER SI ESO ES QUEST O ALGUN SYSTEMA :/ SI ES UNA QUEST PODRIAN PASARMELO PORFAVOR O COMO PUEDO CREARLO? :/ MUCHAS GRACIAS :D
  5. Buenas alguien me podia decir como editar esta quest para QUE QUEDEN LOS BONUS en el sistema de rachas gracias de antemano aqui os la dejo quest Racha begin state start begin when kill with npc.is_pc() begin pc.setqf("estado", pc.getqf("estado")+1) if pc.getqf("estado") == 1 then pc.setqf("asesinatos", pc.getqf("asesinatos")+1) chat("He tio, pero si has hecho un *FristKill*") cmdchat("Fris") elseif pc.getqf("estado") == 2 then pc.setqf("asesinatos", pc.getqf("asesinatos")+2) chat("He tio, pero si has hecho un *DoubleKill*") cmdchat("Double") elseif pc.getqf("estado") == 3 then pc.setqf("asesinatos", pc.getqf("asesinatos")+4) chat("He tio, pero si has hecho un *TripleKill*") cmdchat("Triple") elseif pc.getqf("estado") == 4 then pc.setqf("asesinatos", pc.getqf("asesinatos")+7) chat("He tio, pero si has hecho un *MultiKill*") cmdchat("Multi") elseif pc.getqf("estado") == 5 then pc.setqf("asesinatos", pc.getqf("asesinatos")+15) chat("He tio, pero si has hecho un *UltraKill*") cmdchat("Ultra") pc.setqf("estado", 0) chat("Se han reseteado tus kills con exito.") end end end end
  6. Ayuda necesito una quest Para en la cual en un npc haya una opción de ponerle a una arma (cualquiera) 50 de media o 50 de habilidad a cambio de 500kk AYUDENME PORFAVOR Gracias.
  7. Hola, aqui de nuevo preguntando algo sobre una quest que postearon en este foro y me deja cargando el pj, esta quest es la que matas y se escucha un sonido. link de la quest:
  8. Cabe la posibilidad de Ponerle algún tipo de bonus a esta quest¿? Es la quest que trae por defectos los files maxmi 34k Muchos diran por que no te actualizas a 40k que esto que lo otro, que src y tal, Estoy en ello tanto 40k como 34k Solo quiero hacer unas pruebas y es todo, Pero Necesito Saber si hay alguna manera de colocarle un bonus distinto a cada mascota Ejemplo a la que se saca con el item 53001 me dé 500hp criticos mh y moustruo? y alguna otra que me de las defensas con todas las razas excepto lycan obvio, y HP y critico o algún otro hay alguna Posibilidad de hacer funcionar esa quest Pero con esa Función? Tengo entendido que esa quest solo saca a el pet pero no me da ni 100 de hp ni mas ni menos Espero su respuesta Gracias de ante mano.
  9. BUENO MI PEDIDO ES UNA QUEST DE UN NPC QUE LE DES LA ID DE UN MOB Y TE TRANSFORME EN MOB DE LA ID QUE LE DISTE PERO SOLO POR UN TIEMPO AH Y QUE SEAS NIVEL 100 Y QUE CUESTE YANG, ESPERO QUE ME PUEDAN AYUDAR, GRACIAS.
  10. ¡Hola comunidad de Metin2Zone! Vengo solicitando de nuevo su ayuda... ¿Alguien de casualidad tiene una quest que al llegar a determinado (Como 90) nivel te de 3 o 4 objetos de regalo? Agradecería mucho que me ayudaran, de antemano gracias.
  11. Hola Gente. Estoy haciendo una quest que involucra matar jefes; queria saber cual es el comando para identificar si el mob al que mataste es de grado Jefe. quest drop_general begin state start begin when kill with npc.get_rank () == 5 begin game.drop_item_with_ownership(0000, 0) end end end seria un comando similar a este- npc.get_rank () == 5 si alguien sabe, se agradece la ayuda.
  12. quest scroll_update begin state start begin function pc.set_ht(points) mysql_direct_query("UPDATE player.player SET ht = ht + "..points.." WHERE name = '"..pc.get_name().."';") end function pc.set_iq(points) mysql_direct_query("UPDATE player.player SET iq = iq + "..points.." WHERE name = '"..pc.get_name().."';") end function pc.set_st(points) mysql_direct_query("UPDATE player.player SET st = st + "..points.." WHERE name = '"..pc.get_name().."';") end function pc.set_dx(points) mysql_direct_query("UPDATE player.player SET dx = dx + "..points.." WHERE name = '"..pc.get_name().."';") end --------------------- ---PERGAMINO VIT----- --------------------- when 71103.use begin if pc.get_ht() == 100 then syschat("Lo siento, tienes los puntos al maximo") return end if pc.get_ht() < 90 then syschat("Lo siento, no tienes 90 puntos para usar este pergamino") return end pc.set_ht(pc.get_ht()+2) item.remove() syschat("Stat de VIT: Aumentado (+2)") end ---------------------- ---PERGAMINO DE INT--- ---------------------- when 71104.use begin if pc.get_iq() == 100 then syschat("Lo siento, tienes los puntos al maximo") return end if pc.get_iq() < 90 then syschat("Lo siento, no tienes 90 puntos para usar este pergamino") return end pc.set_ht(pc.get_iq()+2) item.remove() syschat("Stat de INT: Aumentado (+2)") end ---------------------- ---PERGAMINO DE STR--- ---------------------- when 71105.use begin if pc.get_st() == 100 then syschat("Lo siento, tienes los puntos al maximo") return end if pc.get_st() < 90 then syschat("Lo siento, no tienes 90 puntos para usar este pergamino") return end pc.set_st(pc.get_st()+2) item.remove() syschat("Stat de STR: Aumentado (+2)") end --------------------- ---PERGAMINO DE DEX-- --------------------- when 71106.use begin if pc.get_dx() == 100 then syschat("Lo siento, tienes los puntos al maximo") return end if pc.get_dx() < 90 then syschat("Lo siento, no tienes 90 puntos para usar este pergamino") return end pc.set_dx(pc.get_dx()+2) item.remove() syschat("Stat de DEX: Aumentado (+2)") end end end ¿Alguien me puede ayudar? no se si declare mal las funciones...
  13. Buen día a todos. Me disculpo de antemano si incomodo alguno con mi problema. Estoy aprendiendo a implementar Quest en metin2 y por ahora estoy probando una que me permita "levear" en el 4to piso de las Catacumbas del Demonio: mi inconveniente es que al entrar al piso, se activa la función que te devuelve si mueres en el piso y te saca fuera de la Catacumba, si alguien sabe como solucionar ese proceso o indicarme que debo hacer les agradecería. Muchas Gracias.
  14. Buenas Zoneros Anda precisando algunas quest de caballo, para que cuando suba al 25-35 y 50 me de caballo de su respectivo level Pj lv 25- Caballo lv1 Pj lv 35- Caballo lv11 Pj lv 50-Caballo lv 22 Muchas Gracias desde ya
  15. Hola, en estos días he estado usando un poco más los timers, de hecho los usé para mi quest personalizada del biologo... Pero tengo 1 pregunta... ¿El timer sigue corriendo aunque el PJ esté offline?, es que en 1 pj cuando probé esa quest, pues le coloqué solo 10 segundos al timer para poder entregar los dientes y eso rápido y probar el desarrollo completo de la quest. Pero cuando entregué uno, entonces cambie el pj para sacar algo de otro pj, y al entrar es como si el timer se hubiera congelado, ya que terminaron los 10 segundos y aún no podía entregar otro diente. Para que tengan una idea la función para la que aplico el timer es algo así:
  16. ya que no pude solucionar el error de que la db no guarda el lvl aveces, los usuarios molestos por perder su lvl.. vendo a pedirles una quest que empiezen en lvl 250. ya he probado las que han posteado y ninguna me sirve no se cuanta exp poner o que editar para que de el lv 250.. ya he puesto varias de aca y solo me tira el server. si alguien me puede ayudar con una para iniciar lvl 250 se lo agradezco.
  17. holas muy buenas me gustaria haber si alguien me hace una quest o la tiene se trata de una quest de un npc que te teletrasporte a unas coordenadas dentro de un mismo mapa, por ejemplo un npc esta al principio de un mapa y teletrasporta al otro sitio del mismo mapa. gracias
  18. Buenas !! Me gustaría saber como implementar la Piedra de Perfects en mi servidor, es decir, un item que te suba todas las habilidades a Perfect dandole click, lo he visto en otros servers que he jugado y pues quiero implementarla en el mio.. JAJAJ Si alguien sabe como o encuentra alguna guia que me diga, porque he andado buscando y no encuentro S:.. Muchas Gracias de Antemano !!
  19. Les traigo este resumen de quest lo hice mientras estudiaba este lenguaje. Tiene lo básico no está completo (Me ha dado pereza completarlo hace casi 1 año que lo hice... pero les servirá a los que deseen aprender. ---Resumen de las Quest [*]Estructura de una quest quest capidos begin -----> Encabezado de la quesy seguido del nombre de la quest se recomienda que sea el mismo del archivo que se crea. state start begin -----> Indica que la quest empieza aquí when login begin -----> Pregunta por algo que esta pasando en este caso pregunta por un login es decir si un personaje se conecto. chat("Bienvenido al servidor, pasalo bien") -----> La acción que se realiza en al quest. end -----> Finaliza la acción end -----> Finaliza el estado end -----> Finaliza la quest [*] Comentarios Se hacen con un -- [*] Variables local nombre = variable -----> Nos sirve para almacenar datos. Ejemplo local nivel = pc.get_level() local texto = input() local numero = math.random(1,100) local s = select ("opcion1" , "opcion2" , "opcion3") -----> Sirve para colocar botones en los mensajes if s == 1 then -----> Sirve para preguntar por cual de las opciones se le dió clic es decir a la opcion1 corresponde el 1 a la opcion2 corresponde el 2 y asi sucesivamente con la cantidad de opciones que se coloquen. [*] Estados de las quest start -----> Estado de inicio de una quest. setstate("nombre estado") -----> Cambiar de estado. Tambien se usa la funcion set_state("nombre estado") set_quest_state(,) -----> Cambiar el estado de una quest distinta. Recordando que el nombre y el estado van dentro de comillas "" asi: set_quest_state("nombre", "estado") Ejemplo de estados: quest capidos begin -----> Encabezado de la quesy seguido del nombre de la quest se recomienda que sea el mismo del archivo que se crea. state start begin -----> Indica que la quest empieza aquí when login begin -----> Pregunta por algo que esta pasando en este caso pregunta por un login es decir si un personaje se conecto. setstate("run") -----> Ejecuta el cambio de STATE end -----> Finaliza la acción end -----> Finaliza el estado state run begin -----> Indica que la quest empieza aquí when enter begin -----> Se usa para que las acciones se hagan cuando se entra al estado. chat("Has entrado al state.") end when leave begin -----> Se usa para que las acciones se hagan cuando se finaliza o sale del estado. chat("Has salido del state.") end when login begin -----> Pregunta por algo que esta pasando en este caso pregunta por un login es decir si un personaje se conecto. return -----> Finaliza la quest end -----> Finaliza la acción end -----> Finaliza el estado end -----> Finaliza la quest [*] Operadores lógicos when -----> sirve para comenzar acciones. while -----> sirve para comenzar acciones. with -----> poner condiciones. and -----> poner condiciones. or -----> poner condiciones. if -----> poner condiciones. elseif -----> poner condiciones. else -----> poner condiciones. > -----> Comparación < -----> Comparación >= -----> Comparación <= -----> Comparación == -----> Comparación ~= -----> Comparación [*] Estructura de un IF if [X] then accion1 else if [X2] then accion2 end [*] Estructura de un when when condiciones begin accion end [*] Ciclos o Bucles Un BUCLE se puede romper con la palabra break [*] Bucle 1 repeat bloque de sentencias until (condición) [*] Bucle 2 while (condición) do bloque de sentencias end -- BUCLE INFINITO while true do bloque end -- FIN DE BUCLE INFINITO [*] Bucle 3 for var = start, stop , aumento do bloque de sentencias end [*] Bucle 4 -- FOR PARA ARRAY local tab = {"valor1", "valor2", "valor3"} for k, v in ipairs(tab) do say(k.." = "..v) end --for -- FIN FOR PARA ARRAY [*] Arrays local nombrearray = {10,20,34,43,57} -----> Array simple nombrearray[1] -----> Trae el contenido del array en la posición 1 en esta caso 10. EJEMPLO: local items = {160,161,162,163} for i=1, table.getn(items) do -- en la i ponemos igual a 1 y luego la cantidad de veces que se repita pc.give_item2(items[i]) -- te dara cada uno de los items que haya en la tabla end -- cada for le corresponde un end local nombre = { -- abres la tabla {} -- subcategoria 1 {} -- subcategoria 2 {} -- subcategoria 3 } -- cierras la tabla Una subcategoría sirve para agrupar una cantidad de elementos en si y para obtener los elementos se hace: nombre[subcategoria][posicion] Ejemplo: local cordes = { {12500,13400,17500,14000}, {12400,18900,13200} } cordes[1][4] -- 14000 cordes[2][2] -- 18900 EJEMPLO PRACTICO 1: local cordes = { {12500,13400}, {12400,18900}, {19800,12300} } pc.warp(cordes[1][1],cordes[1][2]) -- 12500, 13400 EJEMPLO PRACTICO 2: say("Que arma quieres") say("") local items = { {160,2}, {161,1}, {162,3} } local arma = select ("Ninfa +0" , "Ninfa +1" , "Ninfa +2" , "Cerrar") if arma == table.getn(items)+1 then return end pc.give_item2(items[arma][1],items[arma][2]) [*]Mostrar Texto En El Cliente chat("mensaje") -----> Mostrar chat de infromación en el chat general. Solo lo ve el personaje que se conecta. notice_all("mensaje") -----> Mostrar a todos los personajes Conectados. say_title("mensaje") -----> Mensaje en forma de título say("mensaje") -----> Mensaje que muestra el texto que se desea. Est mensaje es mostrado en un recuadro en medio de la pantalla. say_reward("mensaje") -----> Mensaje en forma de recompensa con color distinto. [*] Datos Curiosos. math.random(numero incial,numero final) -----> Funcion que devuelve un número aleatorio entre el numero inicial y el numero final que se establezca. pc -----> Es el usuario o personaje que esta conectado. pc.get_level() -----> Obteiene el nivel de un personaje. login -----> Acción que se da al conectarse un personaje. logout -----> Acción que se da al desconectarse un personaje. when vnum.chat."texto de opcion" begin -----> Se utiliza para activar la quest cuando le da en una opcion de un lista de opciones. Es decir, cuando se le da clic en la opcion "texto de opcion" del npv o item del vnum. pc.count_item("vnum") -----> Sirve para comprobar si el personaje tiene el item correspondiente al venum en su inventario. vnum.chat."texto" -----> Al darle clic en la npc con el vnum se abre un dialogo con opciones. Al dar click en la opción que contiene el texto empieza el contenido del when. vnum.click -----> Al hacer click en el npc del vnum, empieza el contenido del when. vnum.click -----> Al hacer click en el npc, empieza el contenido del when. kill -----> Cuando el jugador mata un enemigo, comienza el contenido del when. when vnum.kill begin -----> Indica si el monstruo que le corresponde el vnum esta muerto party_kill -----> Cuando un miembro del grupo mata a un enemigo inicia el contenido del when. vnum.party_kill -----> Cuando un miembro del grupo mata a aun enemigo con vnum, empieza el contenido del when. X.target.click -----> Cuando haces click al tarjet de nombre X empieza el contenido del when. X.target.arrive -----> Cuando llegas al punto con el tarje de nombre X empieza el contenido del when. pc.get_map_index == codigomapa -----> Indica si el personaje esta en el mapa de codigomapa pc.get_max_hp -----> Se puede preguntar por el nivel de hp que tienes. pc.is_mount -----> Se puede preguntar si estas montado en una montura o no. when condicion1 with condicion2 and condicion3 begin ----> Estrctura para 2 o mas condiciones pc.get_empire() -----> Se puede preguntar en que reino estas. vnum.use -----> Cuando se una un el item del vnum se activa esta quest pc.give_item2("vnum", cantidad) -----> Se utiliza para dar un item al inventario del personaje. return -----> Accion que se utiliza en la accion de un boton de cancelar o cerrar. Y sirve para cerrar la ventana de la quest. pc.change_money(-cantidad) -----> Acción que sirve para disminuir o aumentar la cantidad de yang de un personaje. pc.remove_item(vnum, cantidad) -----> Accion que sirve para remover un item del inventario del personaje. pc.gold -----> Pregunta por la cantidad de yang que tiene el personaje. pc.get_sex() -----> Obtiene el sexo de un personaje. Se compara 1 hombre 2 mujer. say_item_vnum(vnum) -----> Muestra 1 item con su imagen. pc.count_item(vnum) -----> Cuenta cuantos items hay. mob_name(vnum) -----> Nombre de un monstruo pc.getname() -----> Obtener el nombre del personaje. --------------------------------------------------------------------------------------------------------------------------------------------- ¡¡¡¡¡IMPORTANTE !!!! EL JUEGO ALMACENA PARA SIEMPRE LOS VALORES DE LOS SIGUIENTES COMANDOS pc.setqf -----> nos permite asignar un determinado valor a un personaje de modo que podamos usar el comando pc.getqf para crear condiciones que impliquen que el personaje tenga ese valor concreto para activarse. pc.setqf("nombredelqf", valor) otra forma pc.setqf("kekomola", pc.getqf("kekomola") + 1) ejemplo: pc.setqf("kekomola", 2) --> valor fijo pc.setqf("kekomola", pc.getqf("kekomola") + 1) ---> Cada que se use aumenta 1 pc.getqf -----> Chekea que valor tiene el comando anterior ejemplo: if pc.getqf("kekomola") == 5 then ----> se comprueba el valor de kemola que es el valor que se acumulo en el comando anterior. Ejemplo combinado: quest item begin state start begin when 70045.use begin pc.setqf("buenas", pc.getqf("buenas") + 1) if pc.getqf("buenas") == 1 then chat("buenas") elseif pc.getqf("buenas") == 2 then chat("que tal") elseif pc.getqf("buenas") >= 3 then chat("me aburro") end end end end Ejemplo Practico: quest muertes begin state start begin when kill with not npc.is_pc() begin pc.setqf("mobs", pc.getqf("mobs") + 1) chat("LLevas "..pc.getqf("mobs").." matados en tu juego") end end end --------------------------------------------------------------------------------------------------------------------------------------------- horse.unsummon() -----> Nos permite guardar el Caballo horse.summon() -----> Nos permite sacar el caballo horse.set_level(nivel) -----> Asigna un nivel al caballo letter : Relacionado con las letters (explicación en otro capitulo). button : Relacionado con las letters (explicación en otro capitulo). info : Relacionado con las letters (explicación en otro capitulo). nombre.timer : Cuando el timer llamado con nombre llega a 0, empieza el contenido del when. nombre.server_timer : Cuando el server_timer llamado con nombre llega a 0, empieza el contenido del when. ---------------------- Como hago yo para saber que valor tiene en el qf cierto personaje? es decir puedo poner una ques con el mismo nombre del qf para todos los personajes? y si es así como hago yo para saber con otra quest distinta que valor del qf tiene un personaje X ? pc.getf('nombrequest','nombreqf') pc.getqf = get playing character quest flag pc.getf = get playing character flag ----------------------- Resumen de Quest.txt
  20. Hola gente, hace unos dias pasaba por UJ y me encontre con esto, ustedes diran "hab a p wao ._." pero lo que hace esto es que tambien te sube las habilidades secundarias como Poliformismo, las habilidades de monta, etc. Creditos: Clawdi
  21. Me gustaria Que el siguiente Quest Quedaría en un ITEM (80010) Pero cuando yo lo hice no me deja. no me aparece. y me sale el siguiente error. quest control begin state start begin when login with pc.is_gm() begin set_state(information) end end state information begin when letter begin send_letter("Control de Gm") end when button or info begin say_title("Control de Gm:") say("Que Quieres hacer?") local menu = select("Halloween","Dia/Noche","Rates","Bloquear chat","Navidad","Banear","Teleport","Cerrar") if menu == 8 then return --Halloween elseif menu == 1 then command("m 20023") --npcs para halloween(Quitarle los -- de delante para que funcionen -- command("m npc") -- command("m npc") --Dia/Noche elseif menu == 2 then say("Que quieres poner?") local menu2 = select("Dia","Noche","Cerrar") if menu2 == 1 then command ("x 2") elseif menu2 == 2 then command ("x 1") elseif menu2 == 3 then return end --Rates elseif menu == 3 then say("Rates:") say("Que rate quieres añadir?") local menu2 = select("Experiencia","Yang","Drop","Cerrar") if menu2 == 4 then return --Exp elseif menu2 == 1 then say("Experiencia:") say("A que reino le quieres dar experiencia?") local menu3 = select("Shinsoo","Chunjo","Jinno","Todos","Cerrar") if menu3 == 5 then return elseif menu3 == 1 then local tipo = 4 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Experiencia para Shinsoo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 2 then local tipo = 4 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Experiencia para Chunjo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 3 then local tipo = 4 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Experiencia para Jinno:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 4 then local tipo = 4 local reino = 0 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Experiencia para todos:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end end --Yang elseif menu2 == 2 then say("Yang:") say("A que reino le quieres dar Yang?") local menu3 = select("Shinsoo","Chunjo","Jinno","Todos","Cerrar") if menu3 == 5 then return elseif menu3 == 1 then local tipo = 2 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Yang para Shinsoo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 2 then local tipo = 2 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Yang para Chunjo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 3 then local tipo = 2 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Yang para Jinno:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 4 then local tipo = 2 local reino = 0 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Yang para todos:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end end --Drop elseif menu2 == 3 then say("Drop:") say("A que reino le quieres dar Drop?") local menu3 = select("Shinsoo","Chunjo","Jinno","Todos","Cerrar") if menu3 == 5 then return elseif menu3 == 1 then local tipo = 1 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Drop para Shinsoo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 2 then local tipo = 1 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Drop para Chunjo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 3 then local tipo = 1 local reino = menu3 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Drop para Chunjo:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end elseif menu3 == 4 then local tipo = 1 local reino = 0 say("Que porcentaje quieres darle?") say_reward("Introduce solo numeros enteros.") local rate = input() rate=tonumber(rate) say("Introduce el tiempo de duración en minutos") say("Ej: 120") say("Que serian 2 horas") local tiempo=input() tiempo=tonumber(tiempo) say("Drop para todos:") say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?") local menu4 = select("Si","No") if menu4 == 1 then __give_empire_priv(reino, tipo, rate, tiempo*60) else return end end end --Mutear elseif menu == 4 then say("Que quieres hacer") local menu2 = select("Bloquear chat","Quitar bloqueo de chat","Lista de bloqueados","Cerrar") if menu2 == 1 then say("Bloquear chat:") say("Introduce el nombre del jugador que quieres mutear") local nombre = input() say("Introduce el tiempo que quieres silecciarlo en minutos") say("Recuerda 1 hora = 60 minutos") say("Debes introducir solo el numero") local tiempo = input() say("Estas seguro que quieres mutear a "..nombre.."[ENTER]durante "..tiempo.." minutos?") local menu3 = select("Si","Cerrar") if menu3 == 1 then notice_all(nombre.." ha sido silenciado del chat durante "..tiempo.." minutos de juego") tiempo = tonumber(tiempo)*60 command("block_chat "..nombre.." "..tiempo) elseif menu3 == 2 then return end elseif menu2 == 2 then say("Desbloquear chat:") say("Escribe el nombre del jugador que quieres desmutear.") local nombre = input() if find_pc_by_name(nombre) == 0 then say("Ese nombre no existe") return end say("Estas seguro que quieres quitar el muteo a "..nombre) local menu3 = select("Si","Cerrar") if menu3 == 1 then command("block_chat "..nombre.." 0") elseif menu3== 2 then return end elseif menu2 == 3 then command("block_chat_list") elseif menu2 == 4 then return end --Navidad elseif menu == 5 then say("Que quieres hacer?") local menu2 = select("Nieve","Villancicos","Fuegos artificiales","Arbol navidad","Santa Claus","Cerrar") if menu2==1 then say("Nieve:") local menu3 = select("Nieve On","Nieve Off","Cerrar") if menu3 == 1 then command("xmas_snow 1") elseif menu3 == 2 then command("xmas_snow 0") elseif menu3 == 3 then return end elseif menu2 == 2 then say("Villancicos:") local menu3 = select("Villancicos On","Villancicos Off","Cerrar") if menu3 == 1 then command("xmas_song 1") elseif menu3 == 2 then command("xmas_song 0") elseif menu3 == 3 then return end elseif menu2 == 3 then say("Fuegos artificiales:") local menu3 = select("Fuegos artificiales On","Fuegos artificiales Off","Cerrar") if menu3 == 1 then command("xmas_boom 1") elseif menu3 == 2 then command("xmas_boom 0") elseif menu3 == 3 then return end elseif menu2 == 4 then say("Arbol de navidad:") local menu3 = select("Arbol Fase1","Arbol Fase 2","Arbol Fase 3","Arbol Off","Cerrar") if menu3 == 1 then command("xmas_tree 1") elseif menu3 == 2 then command("xmas_tree 2") elseif menu3 == 3 then command("xmas_tree 3") elseif menu3 == 4 then command("xmas_tree 0") elseif menu3 == 4 then return end elseif menu2 == 5 then say("Santa Claus:") local menu3 = select("Santa Claus On","Santa Claus Off","Cerrar") if menu3 == 1 then command("xmas_santa 1") elseif menu3 == 2 then command("xmas_santa 0") elseif menu3 == 3 then return end elseif menu2 == 6 then return end --Banear elseif menu == 6 then say("Banear:") say("Que quieres hacer?") local menu2 = select("Banear","Quitar Ban","Cerrar") if menu2 == 1 then say("Introduce el nombre del jugador[ENTER]que quieres perder de vista xD") local nombre = input() say("Estas seguro que quieres banear a "..nombre) local menu2 = select("Si","No") if menu2 == 1 then local id = mysql_query("SELECT player.account_id from player.player where player.name = '"..nombre.."'","survgrim","Dan1Gr1m12","player","192.168.0.100") --say(id.account_id[1].." intento 1") --say(id.id.." intento 2") mysql_query("Update account.account set account.status = 'BLOCK' WHERE account.id = "..id.account_id[1].."","survgrim","Dan1Gr1m12","account","192.168.0.100") say(nombre.." ha sido baneado.") elseif menu2== 2 then return end elseif menu2 == 2 then say("Introduce el nombre del jugador[ENTER]al que le quieres quitar el ban.") local nombre = input() say("Estas seguro que quieres[ENTER]quitarle el ban a "..nombre) local menu2 = select("Si","No") if menu2 == 1 then local id = mysql_query("SELECT player.account_id from player.player where player.name = '"..nombre.."'","survgrim","Dan1Gr1m12","player","192.168.0.100") --say(id.account_id[1].." intento 1") --say(id.id.." intento 2") mysql_query("Update account.account set account.status = 'OK' WHERE account.id = "..id.account_id[1].."","survgrim","Dan1Gr1m12","account","192.168.0.100") say(nombre.." ha sido desbaneado.") elseif menu2== 2 then return end elseif menu2 == 3 then return end --teleport elseif menu == 7 then say("Que quieres hacer") local menu2 = select("Traer a alguien","Ir hacia alguien","Cerrar") if menu2 == 3 then return elseif menu2 == 1 then say("Traer a alguien:") say("") say("Escribe el nombre del jugador") local nombre = input() if find_pc_by_name(nombre) == 0 then say("El jugadore no existe o está desconectado") return else command("t "..nombre) say("El jugador "..nombre.." está de camino xD") end elseif menu2== 2 then say("Ir hacia alguien:") say("") say("Escribe el nombre del jugador") local nombre = input() if find_pc_by_name(nombre) == 0 then say("El jugadore no existe o está desconectado") return else command("warp "..nombre) end end end end end end ​
  22. Aqui traigo esta quest que encontre por ahi, que cambie tu nick, a algunos les servira, a otros no, igualmente aqui la tiene ^-^ quest cambio_nombre begin state start begin when item que desea usar.use begin if pc.is_married() then say("Usted no puede cambiarse su nombre si está casado.") say("") return end if pc.is_polymorphed() then say("Usted no puede cambiar su nombre si está transformado.") say("") return end if pc.has_guild() then say("Usted no puede cambiar su nombre si está en un gremio. ") say("") return end if party.is_party() then say("Usted no puede cambiar su nombre si está en grupo.") say("") return end if pc.get_level() < 35 then say("Necesitas ser nivel 35 o mas para cambiar tu nombre!") say("") return end if get_time() < pc.getqf("next_time") then say("No puede utilizarce ahora.") say("") if is_test_server() == true then say("Puede irse") say("") else return end end say("Introdusca su nombre nuevo") ; local name = pc.name ; local str = input() ; if string.len(str) > 16 then say("El nombre es demasiado largo, intentelo de nuevo.") say("") return end local ret = pc.change_name(str) ; if ret == 0 then say("Debe relogear despues de cambiar su nombre.") say("please re-log in.") say("") char_log(0, "CHANGE_NAME", "HAVE NOT RE-LOGIN") elseif ret == 1 then say("Ha ocurrido un problema.") say("Por favor uselo de nuevo.") say("") char_log(0, "CHANGE_NAME", "ITEM USE PROBLEM") elseif ret == 2 then say("Este nombre no está disponible.") say("Por favor ingrese otro nombre.") say("") char_log(0, "CHANGE_NAME", "CAN NOT USE NAME") elseif ret == 3 then say("Este nombre no está disponible.") say("Por favor ingrese otro nombre.") say("") char_log(0, "CHANGE_NAME", "ALREADY USING NAME") elseif ret == 4 then say("Ha cambiado su nombre con exito.") say("Por favor, inicie sesión de nuevo.") say("") item.remove() ; pc.setqf("next_time", get_time() + time_hour_to_sec(24*15)) char_log(0, "CHANGE_NAME", "SUCCESS: from "..name.." to "..str) else say("Error desconocido.") say("") char_log(0, "CHANGE_NAME", "UNKNOWN NAME") end end end end si yasé que ya estaba por ahi, pero solo le puse las lineas al español(que dificil no? XD)
  23. Alguien me puede crear una quest asi como una mision de muertes que al matar 400 personas te de la piedra arcoiris y un anillo de teletransportacion? porfavor si no es molestia las id del anillo de teletransportacion es 80009 y la de la piedra arcoiris es 50512 no pido mas nada sera que me puede ayudar please? Gracias :DD
  24. Hola, encontré es un foro rumano una quest para subir de level matando "PJs" y me preguntaba si alguien me podria ayudar a modificarla un poco (si es posible) y hacer que no siempre de exp. Me explico: Quiero que dé experiencia al matar 3 de cada 10 personajes (30% probabilidad de recibir exp) **Si lo de arriba no es posible , agradeceria que me ayudaran para que pueda activar esta quest en el juego cuando quiera , como si fuera un evento. Al activarla ,cuando se maten entre ellos reciban la exp, y al desactivarla que ya no reciban exp matando pjs obviamente xD. Os dejo la quest que encontré, Gracias. quest player_kill1 beginstate start beginwhen login or levelup with pc.level >= 1 beginset_state(player_kill1)endendstate player_kill1 beginwhen letter beginsend_letter("Quest - PvP")endwhen button or info beginsay("Vrei din nou Experienta ?.")say("distrugeti rivalul,")say("Esti pregatit !")say_reward("Aminteste-ti să fie dintr-un alt taram")say("")q.set_counter("kills", 0)set_state(kill)endendstate kill beginwhen letter beginsend_letter("Omoara Player")endwhen button or info beginsay_title("Player:")say_reward("Lai omorat pe "..pc.getqf("state").." player")say("")endwhen kill beginif npc.is_pc() and npc.empire != pc.empire thenlocal count = pc.getqf("state") + 1if count >= 0 thenq.set_counter("kills", count)pc.give_exp2(20000)endelseif count == 0 thensay("¡Rivalul tau a fost omorat!")endendendend
  25. Alguien podría echar un vistazo? No se donde falla.http://pastebin.com/raw.php?i=ZuHV5Mcu
×
×
  • Crear nuevo...