Jump to content

LlanosEterno™

Miembro
  • Contador contenido

    18
  • Ingreso

  • Última visita

  • Días ganados

    1

Mensajes publicados por LlanosEterno™

  1. 1IafXfW.gif

     

    DESCARGA

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

    Hola ezekelitoh me puedes ayudar a instalar los files rage que montaste en vdi los instalo correctamente como instalo cualquier otro

    y no me inicia el cliente me inicia ftp navicat y el virtualbox menos el cliente queda en seras conectado al servidor

  2.  

    hola les cuento, e estado editando una quest de una misión de uriel, el problema es que cuando subo al lvl 30 la quest no se activa no me a aprese el pergamino que valla con uriel ni la flecha.

    la quest es esta

     

    quest mas1 begin	state start begin	end	state run begin		when login or levelup or enter begin			if  pc.get_level() >=30 then 								set_state( gotoeulduji )					end		end	end	state gotoeulduji begin		when letter begin			send_letter("Desactivado a Uriel")			local v=find_npc_by_vnum(20011)			if 0==v then			else				target.vid("__TARGET__", v, "Uriel")			end		end		when letter begin			setskin(NOWINDOW)           	makequestbutton( "Buscar Uriel" )			q.set_title("Parece que te esta buscando.")			q.start()		end		when button begin			say(locale.NOTICE_COLOR.."Buscar Uriel"..locale.NORMAL_COLOR)			--say("Parece que te esta bsucando.")			say("")			say("Uriel cree que lo puedes ayudar")			say("con su busqueda, del clan yu-hi.")			say("")		end		when info begin			say(locale.NOTICE_COLOR.."Buscar Uriel"..locale.NORMAL_COLOR)			say("Parece que te esta bsucando.")		end		when __TARGET__.target.click begin			target.delete("__TARGET__")	    	---                                                   l			say_title("By DjZed")			say("Uriel:")   			say("Hola")   			say("saves algo sobre el clan yu-hi..")   			say("mm veo te cuento el clan yu-hi era un.")   			say("clan que tenia abilidades misticas que ")   			say("permitian usar criatuas en sus luchas.")   			say("este clan se desiso cuando el inperio")			say("se dividio en tres, jino, chunjo y shinso.")   			say("e escuchado rumores de que aun quedan algunos")   			say("miembros de ese, clan.")			say("me ayudarias a encontrarlos..")			say("")   			wait()			say("Uriel:")   			say("se que no sera fasil, y que sera peligroso")   			say("lo ultimo que se sobre ese clan fue ")   			say("que fue visto en monos Dungeon")   			say("quisas alli encontremos alguna pista.")   			say("de su ubicasion, ve a  monos Dungeon")   			say("y yo en un rato voy para alla.")			say("nos vemos alli..")			say("")			say(locale.NOTICE_COLOR.."Usted disfrutara de los siguientes premios"..locale.NORMAL_COLOR)			say_reward("Yang".."20 000")			set_state( clickstone )			q.done()		end	end	state clickstone begin		when letter begin			local v=find_npc_by_vnum(20352)			if 0==v then			else				target.vid("__TARGET1__", v, "Mono Dungeon")			end			send_letter("La busqueda para el monumento")			q.start()		end		when info or button begin			say(locale.NOTICE_COLOR.."En el mono Dungeon"..locale.NORMAL_COLOR)			say("")			say("La informacion de Uriel")			say("la encontrara en monos Dungeon.")			say("Noticias sobre el clan")			say("yu-hi...")			say("")			say("Deberia estar en un monumento en la mazmorra de monos.")		end		when __TARGET1__.target.click or 			20352.chat."1337 ?!? Por favor,Que?" begin			target.delete("__TARGET1__")			say_pc_name()			say("Lamentablemente no se puede ver mucho.")			say("El lenguaje es extrañoo para usted")			say("asi que selo mostraras a uriel.")			say("quisas el sepa ese lenguaje")			say("")			set_state( gotoeulduji2 )			q.done()		end	end	state gotoeulduji2 begin		when letter begin			send_letter("Volver a Uriel")			local v=find_npc_by_vnum(20011)			if 0==v then			else				target.vid("__TARGET__", v, "Uriel")			end		end		when button or info begin			say(locale.NOTICE_COLOR.."Regresar los resultados de Uriel"..locale.NORMAL_COLOR)			say("")			say("No pude entender nada.")			say("pero, selo e traido a usted quisas sepa")			say("entender este lenguaje..")			say("")		end		when __TARGET__.target.click begin			target.delete("__TARGET__")			say(locale.NOTICE_COLOR.."estraño lenguaje?"..locale.NORMAL_COLOR)	    	---                                                   l			say("Uriel:")   			say("Aver que dice? ...")   			say("lo unico que logro interpretar es")   			say("que el clan yu-hi.")   			say("fue traisionado por el enperador gi-san")			say("que muchos del clan fueron asesinados")   			say("y tubieron que re fugiarse.")			say("")			say("Pero el lider del clan yu-hi. sao-ye")		   	say("juro vengarse del enperador..")		   	say("no puedo entender mas.. tendre que investigar")		   	say("")		    wait()			say("espera nombra el monumento")			say("Seul Rong!")		   	say("Por favor, ve asia el monumento Seul Rong")		   	say("y busca aver si hay nuevas piestas del clan.")			say("Estoy seguro que encontraremos algo")			say("")			-- set_state( __COMPLETE__ )			set_state(clickplace)			q.done()		end	end	state clickplace begin		when letter begin			local v=find_npc_by_vnum(20353)			if 0==v then			else				target.vid("__TARGET2__", v, "Monumento")			end			send_letter("Seul Rong monumento")			q.start()		end		when info or  button begin			say(locale.NOTICE_COLOR.."Busca en el Memorial"..locale.NORMAL_COLOR)			say("")			say("Uriel sospecha")			say("Seul Rong monumento tiene nuevas pruebas.")			say("Usted debe mirar por ahi.")			say("Lo encontrara en las inmediaciones.")			say("")		end		when __TARGET2__.target.click or		    20353.chat."Solo talla."	begin			target.delete("__TARGET2__")			say_pc_name()			say("Usted descubrio algo")			say("pero en este momento casi no se puede.")			say("entender solo que aca no eres fuerte")			say("")			set_state( gotoeulduji3 )			q.done()		end	end	state gotoeulduji3 begin		when letter begin			send_letter("Volver a Uriel")			local v=find_npc_by_vnum(20011)			if 0==v then			else				target.vid("__TARGET__", v, "Uriel")			end		end		when info or button begin			say(locale.NOTICE_COLOR.."Volver a Uriel"..locale.NORMAL_COLOR)			say("")			say("Parece como si continua con su")			say("estudios")			say("Por favor ve y.")			say("Comparte tus conocimientos con Uriel.")			say("")		end		when __TARGET__.target.click begin			pc.change_money( 20000 )			target.delete("__TARGET__")			say(locale.NOTICE_COLOR.."So So"..locale.NORMAL_COLOR)	    	---                                                   l			say("Uriel:")			say("Hmm, no entiendo!")			say("nesesitare tiempo para estudiar esto")			say("mas detalladamente")			say("Espero que me ayude a continuar.")			say_title("Recompensa:")			say_reward("Yang".."20 000")			say_reward("Gracias por su ayuda.")			clear_letter()			set_state(__COMPLETE__)			set_quest_state("main_quest_lv32", "ejecutar")			--set_state( __COMPLETE2__ )		end	end	state __COMPLETE__ begin		when login begin	--		set_quest_state("main_quest_lv32", "ejecutar")		--	set_state( __COMPLETE2__ )		end	end	state __COMPLETE2__ begin	endend

     

    quest mas1 begin

    state start begin

    when login or levelup or enter begin

    if pc.get_level() >=30 then

    set_state( gotoeulduji )

    end

    end

    end

    state gotoeulduji begin

    when letter begin

    send_letter("Desactivado a Uriel")

    local v=find_npc_by_vnum(20011)

    if 0==v then

    else

    target.vid("__TARGET__", v, "Uriel")

    end

    end

    when letter begin

    setskin(NOWINDOW)

    makequestbutton( "Buscar Uriel" )

    q.set_title("Parece que te esta buscando.")

    q.start()

    end

    when button begin

    say(locale.NOTICE_COLOR.."Buscar Uriel"..locale.NORMAL_COLOR)

    --say("Parece que te esta bsucando.")

    say("")

    say("Uriel cree que lo puedes ayudar")

    say("con su busqueda, del clan yu-hi.")

    say("")

    end

    when info begin

    say(locale.NOTICE_COLOR.."Buscar Uriel"..locale.NORMAL_COLOR)

    say("Parece que te esta bsucando.")

    end

    when __TARGET__.target.click begin

    target.delete("__TARGET__")

    --- l

    say_title("By DjZed")

    say("Uriel:")

    say("Hola")

    say("saves algo sobre el clan yu-hi..")

    say("mm veo te cuento el clan yu-hi era un.")

    say("clan que tenia abilidades misticas que ")

    say("permitian usar criatuas en sus luchas.")

    say("este clan se desiso cuando el inperio")

    say("se dividio en tres, jino, chunjo y shinso.")

    say("e escuchado rumores de que aun quedan algunos")

    say("miembros de ese, clan.")

    say("me ayudarias a encontrarlos..")

    say("")

    wait()

    say("Uriel:")

    say("se que no sera fasil, y que sera peligroso")

    say("lo ultimo que se sobre ese clan fue ")

    say("que fue visto en monos Dungeon")

    say("quisas alli encontremos alguna pista.")

    say("de su ubicasion, ve a monos Dungeon")

    say("y yo en un rato voy para alla.")

    say("nos vemos alli..")

    say("")

    say(locale.NOTICE_COLOR.."Usted disfrutara de los siguientes premios"..locale.NORMAL_COLOR)

    say_reward("Yang".."20 000")

    set_state( clickstone )

    q.done()

    end

    end

    state clickstone begin

    when letter begin

    local v=find_npc_by_vnum(20352)

    if 0==v then

    else

    target.vid("__TARGET1__", v, "Mono Dungeon")

    end

    send_letter("La busqueda para el monumento")

    q.start()

    end

    when info or button begin

    say(locale.NOTICE_COLOR.."En el mono Dungeon"..locale.NORMAL_COLOR)

    say("")

    say("La informacion de Uriel")

    say("la encontrara en monos Dungeon.")

    say("Noticias sobre el clan")

    say("yu-hi...")

    say("")

    say("Deberia estar en un monumento en la mazmorra de monos.")

    end

    when __TARGET1__.target.click or

    20352.chat."1337 ?!? Por favor,Que?" begin

    target.delete("__TARGET1__")

    say_pc_name()

    say("Lamentablemente no se puede ver mucho.")

    say("El lenguaje es extrañoo para usted")

    say("asi que selo mostraras a uriel.")

    say("quisas el sepa ese lenguaje")

    say("")

    set_state( gotoeulduji2 )

    q.done()

    end

    end

    state gotoeulduji2 begin

    when letter begin

    send_letter("Volver a Uriel")

    local v=find_npc_by_vnum(20011)

    if 0==v then

    else

    target.vid("__TARGET__", v, "Uriel")

    end

    end

    when button or info begin

    say(locale.NOTICE_COLOR.."Regresar los resultados de Uriel"..locale.NORMAL_COLOR)

    say("")

    say("No pude entender nada.")

    say("pero, selo e traido a usted quisas sepa")

    say("entender este lenguaje..")

    say("")

    end

    when __TARGET__.target.click begin

    target.delete("__TARGET__")

    say(locale.NOTICE_COLOR.."estraño lenguaje?"..locale.NORMAL_COLOR)

    --- l

    say("Uriel:")

    say("Aver que dice? ...")

    say("lo unico que logro interpretar es")

    say("que el clan yu-hi.")

    say("fue traisionado por el enperador gi-san")

    say("que muchos del clan fueron asesinados")

    say("y tubieron que re fugiarse.")

    say("")

    say("Pero el lider del clan yu-hi. sao-ye")

    say("juro vengarse del enperador..")

    say("no puedo entender mas.. tendre que investigar")

    say("")

    wait()

    say("espera nombra el monumento")

    say("Seul Rong!")

    say("Por favor, ve asia el monumento Seul Rong")

    say("y busca aver si hay nuevas piestas del clan.")

    say("Estoy seguro que encontraremos algo")

    say("")

    -- set_state( __COMPLETE__ )

    set_state(clickplace)

    q.done()

    end

    end

    state clickplace begin

    when letter begin

    local v=find_npc_by_vnum(20353)

    if 0==v then

    else

    target.vid("__TARGET2__", v, "Monumento")

    end

    send_letter("Seul Rong monumento")

    q.start()

    end

    when info or button begin

    say(locale.NOTICE_COLOR.."Busca en el Memorial"..locale.NORMAL_COLOR)

    say("")

    say("Uriel sospecha")

    say("Seul Rong monumento tiene nuevas pruebas.")

    say("Usted debe mirar por ahi.")

    say("Lo encontrara en las inmediaciones.")

    say("")

    end

    when __TARGET2__.target.click or

    20353.chat."Solo talla." begin

    target.delete("__TARGET2__")

    say_pc_name()

    say("Usted descubrio algo")

    say("pero en este momento casi no se puede.")

    say("entender solo que aca no eres fuerte")

    say("")

    set_state( gotoeulduji3 )

    q.done()

    end

    end

    state gotoeulduji3 begin

    when letter begin

    send_letter("Volver a Uriel")

    local v=find_npc_by_vnum(20011)

    if 0==v then

    else

    target.vid("__TARGET__", v, "Uriel")

    end

    end

    when info or button begin

    say(locale.NOTICE_COLOR.."Volver a Uriel"..locale.NORMAL_COLOR)

    say("")

    say("Parece como si continua con su")

    say("estudios")

    say("Por favor ve y.")

    say("Comparte tus conocimientos con Uriel.")

    say("")

    end

    when __TARGET__.target.click begin

    pc.change_money( 20000 )

    target.delete("__TARGET__")

    say(locale.NOTICE_COLOR.."So So"..locale.NORMAL_COLOR)

    --- l

    say("Uriel:")

    say("Hmm, no entiendo!")

    say("nesesitare tiempo para estudiar esto")

    say("mas detalladamente")

    say("Espero que me ayude a continuar.")

    say_title("Recompensa:")

    say_reward("Yang".."20 000")

    say_reward("Gracias por su ayuda.")

    clear_letter()

    set_state(__COMPLETE__)

    set_quest_state("main_quest_lv32", "ejecutar")

    --set_state( __COMPLETE2__ )

    end

    end

    state __COMPLETE__ begin

    when login begin

    -- set_quest_state("main_quest_lv32", "ejecutar")

    -- set_state( __COMPLETE2__ )

    end

    end

    state __COMPLETE2__ begin

    end

    end

     

     

     

    hay esta

  3. Hola Hoy Les Traigo Una Quest Creada Por Mi

     

    quest removeritens begin

    state start begin

    when 20006.chat."La eliminación de artículos" begin

    say_title ("La eliminación de artículos")

    say_title ("Quest By Mrfersak M2Z")

    say("Con esta opción se puede eliminar todos los ")

    say("elementos que desee, incluso los que ")

    say("No puede negociar o tirar ")

    say("Para remover elementos no deseados ")

    say("Simplemente arrastra el elemento para mí. ")

    end

    when 20006.take begin

    say_title("La eliminación de artículos! ")

    say("")

    say("Usted está tratando de destruir el siguiente material: ")

    say_reward(string.trim(item.get_name()))

    say("")

    say("")

    say("Deseos, incluso destruir este artículo? ")

    local opcao = select ("Si", "No")

    if opcao == 1 then

    say_title("¡Gracias! ")

    say("")

    say("")

    say("Este artículo fue destruido con éxito. ")

    item.remove()

    else

    say_title("La eliminación de artículos! ")

    say("")

    say("")

    say("Antes, cuando usted está más seguro ")

    say("remover de este material ... ")

    end

    end

    end

    end

     

    Creditos: MrFersak

     

    JaJaJaJaJa Siin Dormiir Tres Diias Por Hacer Esta Quest Para Ustedes

    • Este es un sistema gremial cuenta funciona sin el Mysql.
    • Todo va con la bandera evento `s, etc.
    • ¿Funciona de esta manera:
    • Como líder del clan puede ser una "cuenta gremio" abrirlo tiene que introducir un PIN de 5 dígitos con esto usted puede entonces posteriormente administrar el dinero en la cuenta.
    • Ahora, para las funciones: el hombre puede como miembro de un gremio (si tienen una cuenta) instruir Yang.
    • Como director / propietario del PIN `s puede enviar el dinero a la gente
    • * SOLO SI EN EL MISMO PLANO /
    • /color]
    • function pc.change_money_for_other_pc(name,betrag)
    • local name2 = pc.get_name()
    • local m
    • local d = pc.select(find_pc_by_name(name))
    • m = pc.get_gold()
    • pc.select(d)
    • if m+betrag >= 2*10^9 then
    • say("El Tiene Demasiado Dinero")
    • return
    • end
    • local d = pc.select(find_pc_by_name(name))
    • pc.change_money(betrag)
    • chat('Usted tiene de '..nombre2..' '..Cantidad..' Yang recibido!')
    • pc.select(d)
    • end
    • LAS FUNCIONES AQUI EN LA MISION
    • pc.change_money_for_other_pc()
    • AQUI LA BUSQUEDA
    • quest konto begin
    • state start begin
    • when 20020.chat."Gilden Konto" begin
    • if pc.getqf("konto") == 0 and pc.is_guild_master() then
    • say("Usted ha hecho sin tener en cuenta para su gremio ")
    • say("¿Lo hará ahora?")
    • local a = select ("Si","No")
    • if a == 2 then
    • return
    • elseif a == 1 then
    • say("Por favor, introduzca un alfiler para uno de tu clan es el")
    • say("Die Leute die diesen Pin besitzen koennen das Geld")
    • say("administrar la cuenta.")
    • say("Debe ser 5 Stellig")
    • local pin_eing = tonumber(input("12345"))
    • if pin_eing > 9999 and pin_eing < 100000 then
    • say("")
    • say("Este pin es aceptable!")
    • say("")
    • say_reward("Pin ".. pin_eing .." ¿Guardar? ")
    • local sel=select("Si", "No")
    • if sel==1 then
    • game.set_event_flag(pc.get_guild().."_pin",pin_eing)
    • game.set_event_flag(pc.get_guild(),1)
    • say("")
    • say("Pin ha sido guardado.")
    • say("Nos vemos pronto.")
    • pc.setqf("konto",1)
    • elseif sel==2 then
    • say("")
    • say("Nos vemos pronto.")
    • else
    • -- Error de intercepción!
    • say("Error desconocido!")
    • say("Por favor, comuníquese inmediatamente con su")
    • say("Código de error en el administrador de servidor")
    • say("Señalar")
    • say("código de error: 1")
    • end
    • elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
    • say("")
    • say("Lo siento, pero algo está mal con")
    • say("su pin.")
    • say("")
    • say_reward("Info: El pasador debe contener sólo números "!)
    • say_reward("Info: Pin no debe ser mayor que 99999")
    • say_reward("o ser menor que 10000!")
    • end
    • end
    • end
    • if game.get_event_flag(pc.get_guild()) == 1 then
    • say("Bienvenido al sistema de cuenta gremio")
    • say("Se puede indicar aquí y administrar el dinero como un líder con el PIN")
    • say("¿Qué haces?")
    • local a = select ("Instruir "," Gestión de PIN "," Cancelar")
    • if a == 3 then
    • return
    • elseif a == 1 then
    • say("Así que usted quiere comprometer dinero.")
    • say("¿Cuánto quieres pagar Yang a su cuenta?")
    • say("máximo de 1999999999!")
    • say("")
    • say_reward("hay: " ..pc.get_money())
    • say("")
    • local geld_auf_konto = tonumber(input(""))
    • local auf_konto_new = tonumber(geld_auf_konto) +
    • game.get_event_flag(pc.get_guild().."_konto_yang")
    • if geld_auf_konto < 0 then
    • say("")
    • say("Que no existe.")
    • else
    • if pc.get_money() < geld_auf_konto then
    • say("")
    • say("Todo lo que no tienen en absoluto "como)
    • return
    • else
    • if auf_konto_new < 2000000000 then
    • pc.change_money(-geld_auf_konto)
    • game.set_event_flag(pc.get_guild().."_konto_yang", auf_konto_new)
    • say("")
    • say("Itener dinero " ..dinero en la cuenta.. " Yang hizo a tu cuenta.")
    • else
    • say("")
    • say("Así que mucho no se puede hacer en la cuenta")
    • say("maquillaje. Eso haría que la cantidad máxima de")
    • say("exceda en 1999999999.")
    • end
    • end
    • end
    • elseif a == 2 then
    • say("")
    • say("Por favor, introduzca su PIN.")
    • local pin_abf = tonumber(input(""))
    • if pin_abf == game.get_event_flag(pc.get_guild().."_pin") then
    • say("")
    • say("Pin es correcto.")
    • say("¿Cuánto quiere destacarse de la cuenta Yang?")
    • say("")
    • say_reward("Auf Konto: " ..game.get_event_flag(pc.get_guild().."_konto_yang"))
    • say("")
    • local geld_von_konto = tonumber(input(""))
    • if geld_von_konto < 0 then
    • say("")
    • say("Que no existe.")
    • else
    • if geld_von_konto > game.get_event_flag(pc.get_guild().."_konto_yang") then
    • say("")
    • say("Por mucho que usted no tiene en su cuenta.")
    • elseif geld_von_konto <= game.get_event_flag(pc.get_guild().."_konto_yang") then
    • say("¿Quién te lo dio?")
    • say("Por favor, introduzca un algo")
    • local name2 = input()
    • if find_pc_by_name(name2) == 0 or find_pc_by_name(name2) == nil then say("La
    • persona no está en línea") return end
    • local auf_konto_new =
    • tonumber(game.get_event_flag(pc.get_guild().."_konto_yang") - geld_von_konto)
    • say("El dinero le fue dado.")
    • pc.change_money_for_other_pc(name2,geld_von_konto)
    • game.set_event_flag(pc.get_guild().."_konto_yang", auf_konto_new)
    • end
    • end
    • else
    • say("")
    • say("PIN erróneo.")
    • end
    • end
    • end
    • end
    • end
    • end
    • Creditos:Epvp y ami por traducirloo
    • Saludos A M2Z
×
×
  • Crear nuevo...