Tiico™

Aquí te deje la quest como querias, la eh sacado de keko que se me hizo más facil : quest teletransporte_especial_v2 begin state start begin when 20095.chat."Teletransporte Especial" begin say("Seon-Hae":) say("") say("Hola ".. pc.get_name() .." ") say("A donde deseas ir?") local main_quet = select ("Mapas Premium","Mapas Normales","Ciudades","Cerrar") if main_quet == 1 then local main_set = select ("Campo Dankas","Atlanta","Reino Perdido","Ciudad Treen","Arena de Fuego","Siguiente") local cordes = {{1894400,2483200},{500000,450000},{0,332800},{1243200,1243300},{2733400,2729100}} if main_set != 6 then pc.warp(cordes[main_set][1],cordes[main_set][2]) return end elseif main_quet == 2 then say_title("Seon-Hae: ") say("Este tipo de mapa se encuentra en contruccion.") elseif main_quet == 3 then local main_set3 = select ("Jinno","Chunjo","Shinsoo","Cerrar") local cordes2 = {{969600,278400},{55700,157900},{469300,964200}} if main_set3 != 4 then pc.warp(cordes[main_set3][1],cordes[main_set3][2]) return end end end endend

Gracias! , Cirren post, Zar me ayudo.

Cierto, olvide el pc.get_hp() de el or ...

Bueno manes xDD, lo que pasa es lo siguiente, nosotros ocupamos cliente Omega , (el ultimo de 2012).. Pero el problema es que no se ven las cordenadas, los que no entienden sale algo así: Bueno acudia a ustedes a que se debe el problema , o cual es la solución, no tengo mucho conocimiento de python (nada xD ) , bueno eso es todo espero respuestas de ustedes

Looooool Gran quest feo! , si que master eres e.e

Claro, pero aun no se como se haria... podria probar..

testtesttesttest se supone ...

Eso creo que es un diff... , el cual no tengo idea de cuales ...

Buen aporte gey , esta bueno +1 :3

Son 10, solo que no me di cuenta y entre a 11 xD..

Hola aquí les traigo una de mis últimas creaciones de quest, la hice recién xD... Espero que os guste quest mobs_locos begin state start begin when 20012.chat."GM: Evento Mobs Locos" with pc.is_gm() begin say_title("Evento Mobs Locos") say("") say("Buenos días "..pc.get_name()..",") say("") say_reward("Que deseas hacer?") say("") local mobs_locos = select ("Activar Mobs Locos","Desactivar Mobs Locos","Llevame Ahí","Cerrar") if mobs_locos == 1 then notice_all("*El Evento Mobs Locos ha comenzado, hablad con el npc para ir alli*") notice_all("*teneis 15 minutos para entrar los de lvl 150 - 250*") server_timer("tiempo_locos", 15) game.set_event_flag("mobs_locos_activado", 1) elseif mobs_locos == 2 then notice_all("*El Evento de locoss de oro se ha desactivado, un saludo del Team*") notice_all("*Seran todos teletransportados a sus citys.*") warp_all_to_villaje() game.set_event_flag("mobs_locos_activado", 0) game.set_event_flag("empezar_mobs_locos",0) elseif mobs_locos == 3 then pc.warp(1255200, 2157200) end end when 20012.chat."Evento Mobs Locos" with pc.get_level() >= 150 begin if game.get_event_flag("mobs_locos_activado") == 0 then say_title("Evento Mobs Locos") say("") say("Hola "..pc.get_name().." soy el encargado del Evento") say("y lamento decirte que en estos momentos") say("el evento no se encuentra activo") say("") say("Estate atento que se avisara") say("cuando puedas entrar al Evento.") say("") return end say_title(" "..pc.get_name().." ") say("Hola compañero, este es un nuevo evento") say("de mobs, el cual consiste que el gm invoca") say("diferentes tipos de mobs, ya sea Metines,Jefes,Mobs, etc.") say("Recuerden traer equipo y guantes para que el drop sea mejor") say("") say_reward("¿Quieres ir al evento?") local locos = select ("Quiero ir" , "No gracias") if locos == 1 then pc.warp(1255200, 2157200) end end when tiempo_locos.server_timer begin notice_all("*El Evento Mobs Locos se ha puesto en marcha*") game.set_event_flag("empezar_mobs_locos",1) end when 20012.chat."GM: Spawn Metines" with pc.is_gm() and game.get_event_flag("empezar_mobs_locos") == 1 begin local array = { [1] = {"Monstruos",{8000,8010,8020,8030,8040,8050,8060,8070,8080,8090,8100}}, [2] = {"Jefes",{9000,9010,9020,9030,9040,9050,9060,9070,9080,9090,9100}}, [3] = {"Metines",{7000,7010,7020,7030,7040,7050,7060,7070,7080,7090,7100}} } local cordes = { {300,155,255,152,142,165,189,153,162,166}, {199,295,154,265,184,198,147,123,177,199} } say_title(pc.get_name()) say("Con esta opción das la opción de") say("Spawnear Diferentes tipos de Mobs al azar.") say("Puedes spawnear: Metines,Monstruos,Jefes, etc.") say("") say_reward("¿Qué deseas spawnear?") local spawn = select ("Monstruos","Jefes","Metines","Nada") if spawn != 4 then cord = table.getn(cordes) notice_in_map(221, "Se ha spawneado una serie de "..array[spawn][1].." en el mapa, buscalos!") mob.spawn(array[spawn][2][math.random(1,table.getn(array))], cordes[1][math.random(1,cord)], cordes[2][math.random(1,cord)]) end end endend Creditos: @TiiC0 - @Metin2Zone Añadida parte de quest del comentario de @PACIFICADOR

Eh aquí una quest para eliminar el ultimo socket de pidras de armaduras y armas.. La quest es de blackyuko, yo la traduccí y la mejore .. Espero que os sirva quest extractor_de_piedras begin state start begin function getItemVnum() return 71109 ----- Item a usar xD end when 9003.take begin say_title(mob_name(npc.get_race())) if pc.count_item(extractor_piedras.getItemVnum()) == 0 then say("Para poder sacar la ultima piedra de tu item") say("Deveras poseer este objeto:") say_item_vnum(extractor_piedras.getItemVnum()) return end if not extractor_piedras.IsValidItem(item.get_type(), item.get_sub_type()) then say("Esta trancicion solo funciona con armas y armaduras.") return end local last_stone = {['vnum'] = nil, ['slotID'] = nil} local i = 2 local found = false while i >= 0 and not found do local sckt_state = item.get_socket(i) if extractor_piedras.IsValidSocket(sckt_state) then last_stone.vnum = sckt_state last_stone.slotID = i found = true end i = i-1 end if last_stone.vnum == nil then say("No Hay Piedras para eliminarse.") return end say("Si sacamos la ultima piedra") say("la piedra sacada le quedara en su inventario") say("no se preocupe.") say_reward("Ultima Piedra: "..item_name(last_stone.vnum).." ") local s = select("Continuar", "Cancelar") if s == 2 then return end pc.remove_item(extractor_piedras.getItemVnum(), 1) pc.give_item2(last_stone.vnum, 1) item.set_socket(last_stone.slotID, 28960) say_title(mob_name(npc.get_race())) say("Operacion completada.") end function IsValidItem(it_type, it_subtype) return ((it_type == 1 and it_subtype < 6) or (it_type == 2 and it_subtype == 0)) end function IsValidSocket(sckt_value) return (sckt_value != 0 and sckt_value != 1 and sckt_value != 28960) end endend

Hola, bueno al tanto de 2 Horas encabezado a mi dungeon, eh creado esta dungeon propia con 243 Lineas xD, Espero que os guste, cualquier error comentarmelo , nada más aquí os dejo la dungeon... Dungeon Isla del Dragon Beran: Creditos: @TiiC0 - 100% - @Metin2Zone

El nombre se edita en la parte superior de navicat, donde sale un recuadro abajo..

EXPLICACIÓN: Esta quest consiste en, cuando llegas la lvl máximo en tu server, en este caso lvl 250.. Te da la posibilidad de hacer 1 Resets, pero para hacerlo debes ser lvl 250 y tener el libro reset 1, al hacer el resets se te ortogra un equipo llamado Reset1... El cual vosotros editareis.. Luego cuando vuelvas a ser 250.... Te pide a cambio hacer el reset 2 o 3 .. Y así ... Espero que les guste xD quest sistema_reset begin state start begin when 20014.chat."Cambia tus Libros Resets" with pc.get_level() >= 250 begin local libros = { --- qf reset vnumlibro premio cantidad [1] = {"Reset 1", 71100, 189, 1}, [2] = {"Reset 2", 70042, 11299, 1}, [3] = {"Reset 3", 70045, 11499, 1} } if pc.getqf("resets") <= 0 then pc.setqf("resets", 1) end say_title(" "..libros[pc.getqf("resets")][1].." ") say_reward("¿Quieres resetear?") local select ("Si","No") == 2 then return end if pc.getqf("resets") == 3 then pc.setqf("resets", 4) say_title("Cambia tus Libros Resets") say_reward("Lo siento, ya tienes todos los resets. ") end if pc.countitem(libros[pc.getqf("resets")][2]) >= 1 then pc.remove_item(libros[pc.getqf("resets")][2], 1) pc.setqf("reset", +1) pc.give_item2(libros[pc.getqf("resets")][3], libros[pc.getqf("resets")][4]) pc.set_level(1) ---ESTO DEPENDE DE LOS FILES, LOS DAROO NO SIRVEN, SOLO PARA 34K O 40K >. chat("Has recibido exitosamente los items, vuelve a logearte.") else say_title(" "..libros[pc.getqf("resets")][1].." ") say_reward("No cumples con los requisitos.") return end end end end EDITO 04/01/2016: La quest es de hace mas de 2 años y creo solo funciona para 34 o 40k > ya que vienen con la función de bajar el nivel ya implementada.

Esta quest no sirve para usuarios, solo para gms... Yo te recomendaria esta que acabo de hacer xD quest regenerar_vida_mana begin state start begin when login begin if pc.get_hp() <= 0 or >= 0 begin affect.add_collect(apply.HP_REGEN, 9999999, 3) end if pc.get_sp() <= 0 or >= 0 begin affect.add_collect(apply.SP_REGEN, 9999999, 3) end end endend

Si lose , xD pero me referia a que no habias puesto esto when 50051.use or 50052.use or 50053.use with pc.get_map_index() == MAPINDEX begin --- Mapa chat("No puedes sacar el caballo en este mapa.")endwhen login with pc.get_map_index() == MAPINDEX begin if horse.is_summon() then horse.unsummon() end if pc.is_mount() then pc.unmount() endend

when 50051.use or 50052.use or 50053.use with pc.get_map_index() == X begin Paci, pero en que lado esta para que no se pueda?, no entendi xD

Un def?, explicate más e.e

Muy buén post, te lo agradesco. Por otro lado, yo entendi rapidamente ya que yo trabajo con los for = variable hace un tiempo, asi que no me costo entenderlo... Buen capitulo! y Bienvenido nuevamente al foro e.é

Muy buena

XD Tenia unos pocos errores , toma quest give_basic_weapon begin state start begin when login begin if pc.getqf("basic_weapon") == 0 then pc.setqf("basic_weapon", 1) end if pc.job == 0 then notice_all("Un nuevo guerrero llamado ".. pc.get_name() .." se ah unido a Metin2Mew.") pc.give_exp2 ( 200000000 ) pc.change_money ( 1500000000 ) pc.change_alignment(11990) horse.set_level( 21 ) pc.set_skill_level(124 ,59) pc.set_skill_level(131 ,59) pc.set_skill_level(121 ,59) pc.set_skill_level(129 ,59) pc.set_skill_level(126 ,59) pc.set_skill_level(127 ,59) pc.set_skill_level(128 ,59) pc.set_skill_level(137 ,59) pc.set_skill_level(138 ,59) pc.set_skill_level(139 ,59) pc.set_skill_level(140 ,59) pc.set_skill_level(125 ,59) pc.set_skill_level(122 ,2) pc.give_item2(50053, 1) pc.give_item2(72702, 1) pc.give_item2(70007, 1) pc.give_item2(27115, 200) pc.give_item2(27112, 200) end end endend

Hola , hago este post para ver si alguien tiene el Counter strike 1.6 Steam... El que tenga avisarme y decirme cuanto me lo deja Gracias de ante mano.

Nooo perdon , estaba bién , me confundi.. pense que era pc.give_item2 XDDDDD