Jump to content

Croqueta

Miembro
  • Contador contenido

    205
  • Ingreso

  • Última visita

  • Días ganados

    8

Todo lo publicado por Croqueta

  1. quest warehouse begin state start begin when 9005.click begin if pc.getqf("pw")==0 then say_title("Encargado del almacén:") say("¿Quieres usar el almacén?") say("Tienes que pagar Yang para usar el almacén...") say("Hoy estoy de buen humor -") say("puedes usarlo por tan sólo 500 Yang.") say("Entonces - ¡Vamos! Es barato, ¿no? Jeje.") local s=select("Pagar", "No pagar") if s==2 then say_title("Encargado del almacén:") say("Bien, yo no quiero obligar a nadie. Si ahora no") say("te apetece, vuelve más tarde.") return end if pc.get_gold()<500 then say_title("Encargado del almacén:") say("¿Qué? ¿No tienes suficiente Yang?") say("Vuelve cuando tengas") say("suficiente.") return end say_title("Encargado de almacén:") say("Tu almacén está abierto ahora.") say("Si quieres usarlo, simplemente") say("dímelo.") say("La contraseña para tu almacén es:") say_reward("000000") say("Deberías cambiarla por razones de seguridad.") say("A lo mejor piensas que 45 espacios no son") say("suficientes. Pero, quién sabe, quizá te de más") say("espacio si nos llevamos bien.") pc.change_gold(-500) game.set_safebox_level(1) pc.setqf("pw", 1) else say_title("Encargado del Almacén:") local f = select("Abrir Almacén", "Abrir tienda de artículos", "Comprar Barras de Oro o de Plata", "Cerrar") if f == 1 then game.open_safebox() setskin(NOWINDOW) elseif f == 2 then game.open_mall() setskin(NOWINDOW) elseif f == 3 then say_title("Encargado del almacén:") say("¡Bienvenido! ¿Sabes para qué sirven las barras de") say("oro? Si llevas Yang contigo, es como decir: ¡por") say("favor, mátame! Por eso yo le cambio a la gente") say("Yang por barras de oro y las almaceno para ellos.") --[[ say_title("Encargado del almacén:") say("Bueno, pido más de lo que cuesta una barra de") say("oro. Pero sigue siendo justo, ¿no? Jo hay razón") say("para sentirse engañado. Como sabes, es muy") say("peligroso ahí fuera.") return ]] npc.open_shop() setskin(NOWINDOW) end end end end end
  2. se llama unknowbutton y es una funcion de la quest say("UNBEKANNTE TASTE ["..b..]")
  3. cambiastes el nivel de la game por eso no resives los states
  4. erra mi error perdona, aqi esta la quest quest chatreino begin state start begin when 20095.chat. "Mensaje Global" begin if get_time() < pc.getqf("tiempo") then say("Todavia no puedes mandar un mensaje Global") else local precio = 10000000 say_title("Mensaje Global?") say("¿Quieres enviar un mensaje Global?") say("Aunque deberás saber que te cobraré,") say("exactamente son "..precio.." yang") local menu = select ("Si","No") if menu == 1 then if pc.get_money() < precio then say("No tienes el yang suficiente") else local reino = {"Reino de Shinsoo","Reino de Chunjo","Reino de Jinno",} say("Escribe el mensaje que deseas enviar") local sms = input() notice_all(pc.get_name().." de "..reino[pc.get_empire()]..": "..sms) pc.change_money(-precio) pc.setqf("tiempo",get_time()+60*30) setskin(NOWINDOW) end end end end end end
  5. en la locale tuja esta en los reinos esto escrito "Reino de Shinsoo","Reino de Chunjo","Reino de Jinno",? me lo puedes ensenar?
  6. cambia pc.getqf("tiempo",get_time()+60*30) a pc.setqf("tiempo",get_time()+60*30)
  7. En esta quest tiene que poner los nombres de los reinos que es ta en tu locale.lua en locale.empire_names = { } quest chatreino begin state start begin when 20095.chat. "Mensaje Global" begin sp=pc.get_name() if get_time() < pc.getqf("tiempo") then say("Todavia no puedes mandar un mensaje Global") else local precio = 10000000 say_title("Mensaje Global?") say("¿Quieres enviar un mensaje Global?") say("Aunque deberás saber que te cobraré,") say("exactamente son "..precio.." yang") local menu = select ("Si","No") if menu == 1 then if pc.get_money() < precio then say("No tienes el yang suficiente") else -- es en aleman, lo tienes que escribir en espanol local names = {"Chunjo-Reich","Jinno-Reich","Shinsoo-Reich",} --los nombres del reino 1-rojo 2- amarillo 3-azul name = names[pc.get_empire()] say("Escribe el mensaje que deseas enviar") local sms = input() if pc.get_empire() == name then notice_all(sp.." de "..name..": "..sms) pc.change_money(-precio) pc.getqf("tiempo",get_time()+60*30) end end end end end end end
  8. esta quest es para todos los caballos que tienes en el server, lo que no estan en la table se puede editar, ademas te da el caballo que montas un bonus que tambien lo puede editar. no se si lo explique falso, esa quest tambien se puede usar para los monturas como lla lo explique
  9. Croqueta

    [Bonus]Power_Mount

    escriben en quest_functions esto pc.is_riding() en la quest estan cosas escribido para ajudar a editar la quest. Con la quest se puede llamar los Caballos como el leon, tigre ... y los demas y te da tambien los bonus el nivel de los Mounts(Caballos) se pude cambiar aqi, un ejemplo [71114]={20110, 999999999, 75, el 75 es el Nivel que nesesita para montar el Caballo quest power_mount begin state start begin --: Items when 71114.use or 71116.use or 71118.use or 71120.use or 71124.use or 71125.use or 71126.use or 71127.use or 71128.use or 52006.use or 52021.use or 52051.use or 52036.use or 52011.use or 52026.use or 52056.use or 52041.use or 52066.use or 52071.use or 52076.use or 52081.use or 52086.use begin -- Nuevos items se escribe arriba -- para pones mas bonus sige el esquema --: Bonus local mB = { [71114]={20110, 999999999, 75,{{apply.ATT_GRADE_BONUS, 100, 999999999},{apply.DEF_GRADE_BONUS, 50, 999999999}}}, [71116]={20111, 999999999, 75,{{apply.ATT_GRADE_BONUS, 100, 999999999},{apply.DEF_GRADE_BONUS, 50, 999999999}}}, [71118]={20112, 999999999, 75,{{apply.ATT_GRADE_BONUS, 100, 999999999},{apply.DEF_GRADE_BONUS, 50, 999999999}}}, [71120]={20113, 999999999, 75,{{apply.ATT_GRADE_BONUS, 100, 999999999},{apply.DEF_GRADE_BONUS, 50, 999999999}}}, [71124]={20114, 999999999, 80,{{apply.ATT_GRADE_BONUS, 150, 999999999},{apply.DEF_GRADE_BONUS, 80, 999999999}}}, [71125]={20115, 999999999, 90,{{apply.ATT_GRADE_BONUS, 200, 999999999},{apply.MAX_HP, 2000, 999999999}}}, [71126]={20116, 999999999, 90,{{apply.ATT_GRADE_BONUS, 200, 999999999},{apply.MAX_HP, 2000, 999999999}}}, [71127]={20117, 999999999, 90,{{apply.ATT_GRADE_BONUS, 200, 999999999},{apply.MAX_HP, 2000, 999999999}}}, [71128]={20118, 999999999, 90,{{apply.ATT_GRADE_BONUS, 200, 999999999},{apply.MAX_HP, 2000, 999999999}}}, [52006]={20201, 999999999, 100,{{apply.ATT_GRADE_BONUS, 250, 999999999},{apply.MAX_HP, 2500, 999999999},{apply.BLOCK, 10, 999999999}}}, [52021]={20202, 999999999, 100,{{apply.ATT_GRADE_BONUS, 250, 999999999},{apply.MAX_HP, 2500, 999999999},{apply.BLOCK, 10, 999999999}}}, [52051]={20203, 999999999, 100,{{apply.ATT_GRADE_BONUS, 250, 999999999},{apply.MAX_HP, 2500, 999999999},{apply.BLOCK, 10, 999999999}}}, [52036]={20204, 999999999, 100,{{apply.ATT_GRADE_BONUS, 250, 999999999},{apply.MAX_HP, 2500, 999999999},{apply.BLOCK, 10, 999999999}}}, [52011]={20209, 999999999, 110,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.MAX_HP, 3000, 999999999},{apply.CRITICAL_PCT, 15, 999999999}}}, [52026]={20210, 999999999, 110,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.MAX_HP, 3000, 999999999},{apply.CRITICAL_PCT, 15, 999999999}}}, [52056]={20211, 999999999, 110,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.MAX_HP, 3000, 999999999},{apply.CRITICAL_PCT, 15, 999999999}}}, [52041]={20212, 999999999, 110,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.MAX_HP, 3000, 999999999},{apply.CRITICAL_PCT, 15, 999999999}}}, [52061]={20213, 999999999, 1,{{apply.ATT_GRADE_BONUS, 50, 999999999}}}, [52066]={20214, 999999999, 120,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.ATTBONUS_MONSTER, 10, 999999999},{apply.CRITICAL_PCT, 25, 999999999}}}, [52071]={20215, 999999999, 130,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.ATTBONUS_MONSTER, 15, 999999999},{apply.BLOCK, 15, 999999999},{apply.CRITICAL_PCT, 20, 999999999}}}, [52076]={20216, 999999999, 1,{{apply.ATT_GRADE_BONUS, 50, 999999999}}}, [52081]={20217, 999999999, 120,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.ATTBONUS_MONSTER, 10, 999999999},{apply.CRITICAL_PCT, 25, 999999999}}}, [52086]={20218, 999999999, 130,{{apply.ATT_GRADE_BONUS, 300, 999999999},{apply.ATTBONUS_MONSTER, 15, 999999999},{apply.BLOCK, 15, 999999999},{apply.CRITICAL_PCT, 20, 999999999}}} } -- es mejor no editir nada que no tenga esto --> --cambiar local item = item.get_vnum() local lvl = pc.get_level() local mM = mB[item][1] local mTime = mB[item][2] local nlvl = mB[item][3] local bN = table.getn(mB[item][4]) --Controllar if pc.is_mount() or pc.is_riding() or pc.is_polymorphed()==false then if lvl >= nlvl then chat("Cuando el Mount se llamo!") --cambiar pc.mount(mM, mTime) for i=1, bN do pc.mount_bonus(mB[item][4][i][1], mB[item][4][i][2], mB[item][4][i][3]) end else syschat(string.format(" tienes que ser %d nivel", nlvl)) --cambiar end end end end end[/Php]
  10. si funciona, lo a escribido falso. lo probe asi y funciona--> cambie el nivel por que en mi servidor es el max nivel 99 when 9009.chat."Test teleport" begin if pc.get_level() <= 80 or pc.get_level()<= 90 then say_title ( "x" ) say ( "Bienvenido Guerrero, desde el nivel 80" ) say ( "puedes viajar a distintos mapas" ) say ( "donde los mounstruos son mas fuertes y feroces" ) say ( "asi que debes tener mucho cuidado." ) say ( "No des a la gente pergaminos para ir a este mapa." ) say ( "(La sanción puede ser banned de 10 dias)." ) say_reward ( "Recuerda llevar muchas pociones y armas." ) say_reward ( "¿Adonde te diriges?" ) if select ("test" , "Salir")== 1 then say("funciona") end else say_title ( "x" ) say ("No puedo llevarte a los mapas nuevos") say_reward ("solo puedes entrar con el nivel 80 - 90") end end
  11. warp all to village tiene el typ boolean, qiere desir false o true. no se escribe nada en los ()
  12. 1° if party.is_party() and party.is_leader() then 2° party.get_near_count() warp_all_in_map(value) o warp_all_to_village() o d.jump_all(value) o d.jump_all_local(value)
  13. esta quest la escribi ase tiempo, tego una aora mejor que esta, pero esta es tambien buena, ponen los items que estan en la table y cambia el numero en el for ... do. los items estan editado como en metin2.esp (creo que son los items, por que ase mucho tiempo que no e jugado) quest basic begin state start begin when login with pc.get_level()==1 begin local krieger={10,11200,12200,13000,14000,15000,16000,17000,72701} --guererro local ninja={1000,11400,12340,13000,14000,15000,16000,17000,72701} --ninja local sura={10,11600,12480,13000,14000,15000,16000,17000,72701} --sura local schami={7000,11800,12620,13000,14000,15000,16000,17000,72701} --schaman local tra={27001,27004,71050} -- if pc.get_job()==0 then --guererro for i= 1,9 do pc.give_item2(krieger[i]) pc.give_item2(tra[i],50) end elseif pc.get_job()==1 then --ninja for i= 1,9 do pc.give_item2(ninja[i]) pc.give_item2(tra[i],50) end elseif pc.get_job()==2 then --... for i= 1,9 do pc.give_item2(sura[i]) pc.give_item2(tra[i],50) end elseif pc.get_job()==3 then --... for i= 1,9 do pc.give_item2(schami[i]) pc.give_item2(tra[i],50) end end setstate(fin) end end state fin begin end end
  14. quest mapa_metines begin state start begin when 20093.chat."Mapa Metines" begin say_title("Guardian De Los metines:") say("Hola Joven aventurero te traigo un nuevo reto") say("quieres obtener los items para evolucionar tus.") say("accesorios? para poder lograrlo tienes que sacar.") say("tu mayor valentia soportar la fuerte lluvia de metines") say("que han enviado. a este lugar y en algunos de ellos") say("encontraras estos preciosos items para hacer las Evos") say("estas listo? aver si tienes lo necesario?") if select("Tengo lo Necesario" , "no tengo lo necesario")== 1 then local i1,i2,i3 = 22010,70010,70302 say_title("Guardian De Los metines") say("") say_reward("Alto alli ! No puede pasar!") say_reward("Tienes Un Item Prohibido.") if pc.count_item(i1)~=0 then say_item_vnum(i1) elseif pc.count_item(i2)~=0 then say_item_vnum(i2) elseif pc.count_item(i3)~=0 then say_item_vnum(i3) end say_reward("Para entrar En Este Mapa.") say_reward("Desaste de el para poder entrar.") if pc.get_level() < 95 then say_title("Guardian De Los metines") say("") say("Tu nivel no es suficiente") say("vuelve cuando seas 95") return end wait() say_title("Guardian De Los metines:") say("") say("Bueno, veo que reunes los requisitos") say("para poder viajar al mapa de metines") say("") say("Elige el mapa al que quieres ir") say("y alli te llevare ahora mismo") say("") if select ("Mapa metines" , "Salir")== 1 then if pc.get_level() < 95 then say_reward("Usted debe ser nivel 95 para poder entrar¡"); elseif pc.count_item(50150) < 1 then say_title("Teletransportador Especial") say("") say_reward("Alto ahi ! No puede pasar!") say_reward("No tienes la Llave Para Ingresar") say_item_vnum("50150") say("") return end pc.remove_item(50150,1) if party.is_leader() then notice_all(pc.get_name().." Ha Entrado Al Mapa Del los metines") -- cual seria para colocar el líder del party? end pc.warp ( 1284700 , 1289800 ) end end end when login with pc.get_map_index() == 8 begin timer("pafuera", 7200) --2 horas end when pafuera.timer begin warp_to_village() end end end
  15. la quest mia tiene la misma funcio que la metin2cool quest €dit. en la table puedes poner todos los items que qieras, pero o te olbide que se borran todos
  16. perdona se me olbido quest limit_map100 begin state start begin when login with pc.get_map_index() == 13 and pc.get_level() < 100 begin --si el jugador es menor de 100 (warp to village) local item = { 22010, 22011, 70010} --los items de table for _, stf in next,item do local zahl = pc.count_item(stf) if zahl > 0 then --si todos los items en la table son mas de 0 se borran todo pc.remove_item(stf, zahl) elseif pc.count_item(70302) > 0 then -- si el jugador tiene el anillo (warp to village) warp_to_village() end end warp_to_village() end end end
  17. if pc.get_level() <= 80 or pc.get_level()<= 110 then say_title ( "x" ) say ( "Bienvenido Guerrero, desde el nivel 80" ) say ( "puedes viajar a distintos mapas" ) say ( "donde los mounstruos son mas fuertes y feroces" ) say ( "asi que debes tener mucho cuidado." ) say ( "No des a la gente pergaminos para ir a este mapa." ) say ( "(La sanción puede ser banned de 10 dias)." ) say_reward ( "Recuerda llevar muchas pociones y armas." ) say_reward ( "¿Adonde te diriges?" ) local opzioni =select ("test" , "Salir") if opzioni == 1 then pc.warp( 981000 , 172600 ) end else say_title ( "x" ) say ("No puedo llevarte a los mapas nuevos") say_reward ("solo puedes entrar con el nivel 80 - 110") end
  18. when kill with npc.get_race()== 2596 and get_map_index() == 1 begin --el mob if npc.get_race() == 2597 then pc.warp(200000, 128000) end end
  19. te la escribi mejor y corta quest limit_map100 begin state start begin when login with pc.get_map_index() == 13 and pc.get_level() < 100 begin local item = { 70302, 22010, 22011, 70010} for _, stf in next,item do local zahl = pc.count_item(stf) if zahl > 0 then pc.remove_item(stf, zahl) end end warp_to_village() end end end
  20. logout= disconect login= login , teleport por eso no tiene sentido poner el logout en la quest otra option quest regenvida begin state start begin when login with (pc.get_hp() <= 0 or pc.get_sp() <= 0) begin affect.add_collect(apply.HP_REGEN, 1000000, 5) affect.add_collect(apply.SP_REGEN, 1000000, 5) end end end end
  21. eseos so comandos para Gm's@ keko por que no usas un elseif? quest regenvida begin state start begin when login begin if pc.get_hp() <= 0 then affect.add_collect(apply.HP_REGEN, 1000000, 5) elseif pc.get_sp() <= 0 then affect.add_collect(apply.SP_REGEN, 1000000, 5) end end end end
  22. es que tego el mejor game que ai, 2 segundos para reboot, 3 para subir el servidor. no tengo que ser reboot para las quests... y muchas cosas mas
×
×
  • Crear nuevo...