DryUz

Alguien que sea tan amable de hacer

Una quest que al iniciar

Todos los pj los lleve a un mapa x

Solo al iniciar despues de crear el pj,

No cada ves que entre al juego,

O hay alguna otra forma modificando el cliente graciasssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss

Esta quest les regalara 1 poder "P" a cada pj tenes que poner que poder le gustaría que de

pdta esta quest es mía modificada por mi .

créditos by:chiky

quest recompensa begin
state start begin
  when login with pc.level >= 50 begin
   set_state(information)
  end
end
state information begin
  when letter begin
   send_letter("Una_Habilidad_Perfect_Master")
  end
when info or button begin
say_title ( "Habilidades a Perfect Master:" )
say ( "Hola, yo soy el maestro de la habilidad" )
say ( "Si usted ha alcanzado el nivel 50 que puedo tomar" )
say ( "su habilidad para Perfect Master" )
say ( "quiere seguir mis enseñanzas." )
say ( "" )
say ( "" )
say_reward ( "Recuerde que usted debe ser el nivel 50" )
local opzioni = select ( "Ok" )
if opzioni == 1 then
say_title("¿Que raza eres?")
	  local skillp = select ("Guerrero","Ninja","Sura","Chaman...")
						   if skillp == 1 then
pc.set_skill_level (5,59)
pc.set_skill_level (16,59)
	  
	  elseif skillp == 2 then
pc.set_skill_level (35,59)
pc.set_skill_level (46,59)
	  elseif skillp == 3 then
pc.set_skill_level (66,59)
pc.set_skill_level (76,59)
	  elseif skillp == 4 then
pc.set_skill_level (96,59)
pc.set_skill_level (106,59)
	  elseif skillp == 5 then
	   return
	  end
say ( "Realizado!" )
end
						set_state(COMPLETE)
				end
		end
		state COMPLETE begin
		end
end

Para modificar el lv de la recompensa solo deben cambiar este numero >50

  when login with pc.level >= 50 begin
   set_state(information)

El error es que al invocar la mascota debería cambiar el lv del caballo lv22 23 etc...

y cambia al invocar y vuelve a lv 21 y no puedo montarme en la mascota!

quest official_pets begin
    state start begin
	    when 53001.use with pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
		    if pc.getqf("firephoenix_use") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota se ha llamado!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("firephoenix_use", 1)
			    pc.setqf("firephoenix", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.ATT_MAX_HP, 2000, 60*60*8)
			    horse.set_level("22")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardadando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
			    affect.remove_collect(apply.ATT_MAX_HP, 2000, 60*60*8)				
			    horse.unsummon()
			    pc.setqf("firephoenix_use", 0)
			    pc.setqf("firephoenix", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("firephoenix_use") == 1 begin
		   
		    pc.setqf("firephoenix_use", 0)
		    pc.setqf("firephoenix", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 2000, 60*60*8) 
	    end
	    when 53003.use with pc.getqf("firephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
		    if pc.getqf("icephoenix_use") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota se ha llamado!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("icephoenix_use", 1)
			    pc.setqf("icephoenix", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 2000, 60*60*8)
			    horse.set_level("23")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
    affect.remove_collect(apply.MAX_HP, 2000, 60*60*8)	  
			    horse.unsummon()
			    pc.setqf("icephoenix_use", 0)
			    pc.setqf("icephoenix", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("icephoenix_use") == 1 begin
		   
		    pc.setqf("icephoenix_use", 0)
		    pc.setqf("icephoenix", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 2000, 60*60*8)
	    end
  when 53002.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
		    if pc.getqf("reindeer") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Dein Haustier wurde gerufen!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("reindeer_use", 1)
    pc.setqf("reindeer", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 100, 60*60*8)
			    horse.set_level("24")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
    affect.remove_collect(apply.MAX_HP, 100, 60*60*8)	   
			    horse.unsummon()
			    pc.setqf("reindeer_use", 0)
    pc.setqf("reindeer", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("reindeer_use") == 1 begin
		   
		    pc.setqf("reindeer_use", 0)
   pc.setqf("reindeer", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada!")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 100, 60*60*8)
	    end
  when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
		    if pc.getqf("pwahuang") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota ha sido llamada!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("pwahuang_use", 1)
    pc.setqf("pwahuang", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 300, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 300, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 7000, 60*60*8)
			    horse.set_level("25")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 300, 60*60*8)
    affect.remove_collect(apply.DEF_GRADE_BONUS, 300, 60*60*8)  
    affect.remove_collect(apply.MAX_HP, 7000, 60*60*8)	  
			    horse.unsummon()
			    pc.setqf("pwahuang_use", 0)
    pc.setqf("pwahuang", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("pwahuang_use") == 1 begin
		   
		    pc.setqf("pwahuang_use", 0)
   pc.setqf("pwahuang", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada!")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 300, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 300, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 7000, 60*60*8)
	    end
  when 53006.use with pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
		    if pc.getqf("dog_use") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota ha sido llamada!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("dog_use", 1)
			    pc.setqf("dog", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
			    horse.set_level("26")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
			    affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)				  
			    horse.unsummon()
			    pc.setqf("dog_use", 0)
			    pc.setqf("dog", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("dog_use") == 1 begin
		   
		    pc.setqf("dog_use", 0)
		    pc.setqf("dog", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada!")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 3000, 60*60*8) 
	    end
	    when 53007.use with pc.getqf("dog") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
		    if pc.getqf("lion_use") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota ha sido guardada!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("lion_use", 1)
			    pc.setqf("lion", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 200, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 200, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 5000, 60*60*8)
			    horse.set_level("27")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 200, 60*60*8)
    affect.remove_collect(apply.DEF_GRADE_BONUS, 200, 60*60*8)  
    affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)	  
			    horse.unsummon()
			    pc.setqf("lion_use", 0)
			    pc.setqf("lion", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("lion_use") == 1 begin
		   
		    pc.setqf("lion_use", 0)
		    pc.setqf("lion", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada!")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 200, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 200, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 5000, 60*60*8)
	    end
  when 53008.use with pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
		    if pc.getqf("pig") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota ha sido llamada!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("pig_use", 1)
    pc.setqf("pig", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 2000, 60*60*8)
			    horse.set_level("28")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
    affect.remove_collect(apply.MAX_HP, 2000, 60*60*8)	   
			    horse.unsummon()
			    pc.setqf("pig_use", 0)
    pc.setqf("pig", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("pig_use") == 1 begin
		   
		    pc.setqf("pig_use", 0)
   pc.setqf("pig", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada!")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 2000, 60*60*8)
	    end
  when 53009.use with pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin
		    if pc.getqf("tiger") == 0 then
			    local old_horse_name = horse.get_name() ;
				    if string.len(old_horse_name) == 0 then
					    chat("Su mascota no tiene nombre!")
				    end
			    chat("Su mascota ha sido llamada!")
			    local your_horse_level = horse.get_level()
			    pc.setqf("horse_level_save", your_horse_level)
			    pc.setqf("tiger_use", 1)
    pc.setqf("tiger", 1)
			    affect.add_collect(apply.ATT_GRADE_BONUS, 150, 60*60*8)
			    affect.add_collect(apply.DEF_GRADE_BONUS, 150, 60*60*8)
			    affect.add_collect(apply.MAX_HP, 4000, 60*60*8)
			    horse.set_level("29")
			    horse.unsummon() horse.summon()
   
    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		    else
			    chat("Su mascota se esta guardando!")
			    affect.remove_collect(apply.ATT_GRADE_BONUS, 150, 60*60*8)
    affect.remove_collect(apply.DEF_GRADE_BONUS, 150, 60*60*8)  
    affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)	  
			    horse.unsummon()
			    pc.setqf("tiger_use", 0)
    pc.setqf("tiger", 0)
			   
			    local horse_settings = pc.getqf("horse_level_save")
			    horse.set_level(horse_settings)
		   
		    end
	    end
	    when logout or login with pc.getqf("tiger_use") == 1 begin
		   
		    pc.setqf("tiger_use", 0)
   pc.setqf("tiger", 0)
			   
		    local horse_settings = pc.getqf("horse_level_save")
		    horse.set_level(horse_settings)
		   
		    chat("Su mascota ha sido guardada!")
		    affect.remove_collect(apply.ATT_GRADE_BONUS, 150, 60*60*8)
		    affect.remove_collect(apply.DEF_GRADE_BONUS, 150, 60*60*8)  
		    affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
	    end
    end
end

Alguien seria tan amable de postear esta quest

Aca te las dejo la 2 la tenes que traducir^^

toma esta que tenia yop pero falta traducirla

pues postea la nueva!! no crees?

Aca se las dejo

Descarga:

Max_Lv:16777215

This difference file has been created by IDA Pro
game
0009554A: FA FF
0009554B: 00 FF
0009554C: 00 FF

Max_Level 65535:

This difference file has been created by IDA Pro
game
0009554A: FA FF
0009554B: 00 FF

Max_level dif fixx bis lvl 6553

creditos:epvp

jaja que oso travieso jajaj

no la ise para que fucione sio que no benga un error en el compiler

 

ah?? no te entiendo si vas a ser corrector y ps correguimela para que funcione! es lo normal o no?

no me funciono ..

gracias lindo ..

se queda en

QUEST:agu

STATE:start

WHEN: witch pc. is_gm ()

creo qeu es un problema de if o end pero no logro verlo

quest agu begin
state start begin
  when 20019.chat."Evento pvp" with pc.is_gm() begin
  say_title("Hola , colega")
  say("soy Agustin Müller")
  say("te traigo el menu,")
  say("del evento pvp")
  say_reward("que deseas hacer")
  local eve = select("Activar","Desactivar","Cerrar entradas","Jugadores en el mapa","Ya hay un ganador","Sacar todos los jugadores del mapa","Cancelar")
  elesif eve == 1 then
  game.set_event_flag("pvp", 1)
  elseif eve == 2 then
  game.set_event_flag("pvp", 0)
  elseif eve == 3 then
  game.set_event_flag("pvp", 2)
  notice_in_map("El ultimo en sobrevivir")
  notice("sera el ganador , tienen 30 vidas cada uno")
  elseif eve == 4 then
  command("u")
  elseif eve == 5 then
  say("Aqui el nombre del jugador")
  local nom = input()
  say("Aqui el nombre de la recompensa que le vas a dar")
  local nomr = input()
  notice_all("Ya tenemos al nuevo rey de los duelos")
  notice_all("Es el jugador "..nom.." y ha sido recompensado con "..nomr.."")
  elseif eve == 6 then
  elesif pc.is_gm() then
  say("a ti no te saco porque sos GM")
  else
  warp_all_to_village()
  elseif eve == 7 then
  return

when 20019.chat."Evento pvp" with game.get_event_flag("pvp") == 1 begin
  say_title("Hola fein")
  say("Este metin implemento")
  say("un nuevo evento para tu mayor")
  say("divercion, aparte podras,")
  say("ganar premios geniales")
  say_reward("¿Que vas a hacer?")
  local eve2 = select("Entrar","Cancelar")
  if eve2 == 1 then
  pc.warp(460800,1049600)
  elseif eve2 == 2 then
  return
end
end
when 20019.chat."Evento pvp" with game.get_event_flag("pvp") == 2 begin
  say_title("UPS")
  say("Me parece que llegas un poco tarde")
  say("las Entradas han sido cerradas")
  say("Es recomendable que te fijes")
  say("en vuestro foro para saber")
  say("cuando se activara denuevo")
  say("o tambien puedes preguntar a un GM")
  local eve3 = select("OK")
  elesif eve == 1 then
return
end
when login or enter with pc.get_map_index() == 11 and game.get_event_flag("pvp") == 0 begin
if pc.is_gm() then
say("hola Gm, ha sido invocado el npc")
say("que tiene el menu de activacion del mapa")
command("m 20019") -- en donde dice 20094 va el comando del npc.
else
warp_to_village()
end

when logout with pc.get_map_index() == 11 begin
  warp_to_village()
end

when login or enter with pc.get_map_index() == 11 and game.get_event_flag("pvp") == 2 begin
  set_state(vidas)
  pc.setqf("state", 30)
  q.set_counter("vidas", 30)
end
end
state vidas begin
  when letter begin
  send_letter("Vidas Restantes")
end
	   
when button or info begin
  say("Aun te quedan")
  say_reward("Te quedan: "..pc.getqf("state").." vidas restantes")
end
when login with pc.get_map_index() == 11 and game.get_event_flag("pvp") == 2 begin
  elesif pc.get_hp() < 0 then
  local count = pc.getqf("state") - 1
  elesif count <= 30 then
  pc.setqf("state", count)
  q.set_counter("vidas", count)
end
elesif count == 0 then
  warp_to_village()
  notice_in_map("El jugador ".. pc.get_name() .." , ya fue eliminado")
  chat("lo sentimos mucho, pero se te acabaron las vidas")
  return
  end

te ajudo un poco sino no funciona

say('Den Spieler "'..q.name[auswahl]..'" wirklich '..bantxt..'?')
say('el Jugdor "'..q.name[auswahl]..'" de verdad '..bantxt..'?')
say(col.blue('Spieler '..bantxt)); say('[ENTER]Introduzca el nombre del jugador.[ENTER](una parte va bien)')
say(col.blue('Jugador '..bantxt)); say('[ENTER]Introduzca el nombre del jugador.[ENTER](una parte va bien)')

gran error tradusir el mysql en espanol
local q = mysql_query('select * from player.player WHERE name LIKE "%'..inp..'%" Y el nombre no como "%[%"')
local q = mysql_query('select * from player.player WHERE name LIKE "%'..inp..'%" AND name NOT like "%[%"')

ya que estas posteala completa sin errores aseme el favorsito!

sierto aca se las dejo

para el que le sirva que agradesca gracias

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("¿Qué quieres?")
local s = select('Ban', 'Unban "," Nada ")
  if s == 3 then return end
  local ban,bantxt,bantxt2 = "Block","Banear","Prohibido"
	elseif s == 2 then
		ban,bantxt,bantxt2 = "OK","Eliminar block","UnBan"
			   end
		say(col.blue('Spieler '..bantxt)); say('[ENTER]Introduzca el nombre del jugador.[ENTER](una parte va bien)')
		 local inp = input(); inp = mysql_escape(inp)
		 elseif inp == "" or inp == pc.get_name() then
		 say(col.red('entrada no válida..[ENTER] para abortar!'))
		 return
			end
		   local q = mysql_query('select * from player.player WHERE name LIKE "%'..inp..'%" Y el nombre no como "%[%"')
		   elseif q == "ERROR" then
		   say(col.red('En los datos de lectura da error o no hay nadie con ese nombre. '))
		   return
			end
			say('Seleccione el usuario que'..bantxt2..' werden soll:')
			 local wahl = q.name; table.insert(Opcional,"Salir")
			  table.insert(wahl,1,6)	-- 6 el número máximo de usuarios en un lado.
			  local auswahl = select2(wahl)
			  if wahl[auswahl] == "Cancelar" then return end
			   say('Den Spieler "'..q.name[auswahl]..'" wirklich '..bantxt..'?')
			   if select("si","no") == 2 then return end
			   mysql_query('UPDATE account.account SET status = "'..ban..'" WHERE id = '..q.account_id[auswahl]..' LIMIT 1')
				say('El jugador fue Baneado.')
		  end
	end
  end
end

questlib_by_mijago.rar

tienes que hacer barias quest

algo asi

quest caball begin

state start begin

when login or levelup with pc.get_level() == 5 begin

chat("")

horse.set_level("5")

end

end

end

quest caball begin

state start begin

when login or levelup with pc.get_level() == 10 begin

chat("")

horse.set_level("11")

end

end

end

quest caball begin

state start begin

when login or levelup with pc.get_level() == 15 begin

chat("")

horse.set_level("21")

end

end

end

algo asi debes hacer ir sumando el lv del caballo o al subir 5 niveles el caballo siempre sera lv 1

Es un exelente aporte por parte de anghios.... yo ya tenia ese diff que es tan importante en el game.. Aun asi no se porque hay gente tan odiosa en este foro que lo saben y no lo postean por que cobran $$$$ por fixear eso.. ni siquiera los administradores y mira lo posteo anghios de uj... super aporte por parte de el

 

quest energy_sys begin
    state start begin
	    when 20001.chat."Una nueva técnica" with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin
		    say_title("Alquimista")
		    say("¡Lo hice! ")
		    say("Finalmente pude una tecnología completamente nueva ")
		    say(". desarrollo ")
		    say("Me han hecho posible que los objetos")
		    say("procesamiento adicional y la energía pura de ellas")
		    say(". empate Absolutamente genial! ")
		    wait()
		    say_title("Alquimista")
		    say("Si se destruye un objeto con la ayuda de mi")
		    say("Tecnología, da poder separador. Para agregar 30")
		    say("estos fragmentos juntos, se obtiene una")
		    say("poderosos cristales de energía! Pura, sin filtrar")
		    say("Energía concentrada en una piedra preciosa. esta")
		    say("La corriente fluye en su equipo entero.")
		    say("¿Te interesa? ")
		    wait()
		    say_title("Alquimista")
		    say("Traiga el equipo como armas, joyas")
		    say("y la ropa que usted está en su")
		    say("Caza a mi disposición. Voy a")
		    say("Energía proceso de división.")
		    say("Futuro y la esperanza de nuestro mundo están en ")
		    say("esta técnica. Somos invencibles! ")
		    set_state("crear")
	    end
    end
    state crear begin
	    when 20001.chat."Extraer Fragmentos de Energía." with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin
		    say_title("Alquimista")
		    say("¿Funcionó? ¿Te divisor de potencia")
		    say("conseguir? ")
		    say("Tráeme más artículos y lo haré")
		    say("que se rompen a través de la alquimia.")
		    say("Mi técnica aún no está completamente terminado.")
		    say("Así que puedo garantizar que no sabes cómo")
		    say("te dan un montón de astillas.")
		    wait()
		    say_title("Alquimista")
		    say("Hay una condición: tanto su propia ")
		    say("también el nivel del elemento imprescindible")
		    say("ser al menos 35.")
		    say("Hm, a ver sólo...")
		    wait()
		    if pc.get_level() < 35 then
			    say_title("Alquimista")
			    say("No eres lo suficientemente fuerte! volver,")
			    say("cuando se ha alcanzado al menos el nivel 35. ")
		    else -- NICHT DE
			    say_title("Alquimista")
			    say("Ok eres lo bastante fuerte para mi nuevo")
			    say("Descubrimiento.")		
		    end
			
	    end
		
	    when 20001.chat."Crear Cristal de Energía." with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin
		    say_title("Alquimista")
		    say("¿Acaso ya has agotado tus réservas de")
		    say("Energía? No deberías trabajar tan diariamente")
		    say("y poner tu vida en riesgo tan a la ligera.")
		    say("Para crear tu Cristal de Energía necesito")
		    say("30 fragmentos de Energía.")
		    wait()
		    if pc.get_level() < 35 then
			    say_title("Alquimista")
			    say("No eres lo suficientemente fuerte!")
			    say("Vuelve cuando hayas alcanzado el")
    say("nivel 35!")
		    else
			    if pc.count_item(51001) >= 30 then
				    say_title("Alquimista")
				    say("Muy bien, ya tienes los 30 Fragmentos")
				    say("de Energía que necesitaba. Con ellos")
				    say("podré hacer un Cristal de energía.")
				    say("Espera un segundo. Voy a intentarlo,")
				    say("pero no puedo asegurarte")
				    say("que funcione.")
				    wait()
				    say_title("Alquimista")
				    say("Todo está listo para unir los fragmentos")
				    say("en un Cristal de Energía.")
				    say("Pero de algo tendré que vivir, ¿no? Y mis")
				    say("herramientas no caen del cielo sin más.")
				    say("Sólo pido una contribución por gastos de")
				    say("1000 Yang. ¿Quieres pagar?")
				    if select("¡Por supuesto!","Ahora no.") == 2 then
					    return
				    end
					
				    pc.change_money(-1000)
				    pc.remove_item(51001,30)
					
				    if number(0,1) == 1 then
					    say_title("Alquimista")
					    say("Aqui tienes tu Cristal de Energía. Sin embargo,")
					    say("sólo el primer intento es siempre exitoso. La")
					    say("Alquimia es una ciencia imprevisible: ¡Unas pocas")
	  say("diferencias pueden llevar al fracaso! Siempre")
	  say("hay un pegueño riesgo de que él")
	  say("experimento no salga bien.")
					    pc.give_item2(51002,1)
				    else -- NICHT DE
					    say_title("Alquimista")
					    say("¡Por desgracia no funcionó ésta vez")
					    say("y no se pudo producir un Cristal de Energía!")
					    return
				    end
					
			    else -- NICHT DE
				    say_title("Alquimista")
				    say("Lo siento, necesitas 30 fragmentos para")
				    say("crear tu Cristal de Energía!")
				    return
			    end
				
		    end
	    end
	    when 20001.take with game.get_event_flag("energy") == 1 or pc.is_gm() == 1 begin
		    if pc.get_level() < 35 then
			    say_title("Alquimista")
			    say("Todavía no eres lo suficientemente fuerte como para obligar a")
			    say("inherente en los chips de energía para dominar.")
			    say("Vuelve cuando nivelar por lo menos 35")
			    say("alcanzado.")
			    return
		    end
			
		    if item.get_type() == 1 or item.get_type() == 2 then
			
--			    2070 - 2239
--			    80 - 369
--			    1040 - 1189
--			    3070 - 3249
--			    5040 - 5359
--			    4030 - 4069
--			    7070 - 7219
--			    11250 - 11299
--			    11450 - 11499
--			    11650 - 11699
--			    11850 - 11899
--			    12240 - 12699
			    local maxlvl = mysql_query("SELECT limitvalue0 FROM player.item_proto WHERE vnum='"..item.get_vnum().."' LIMIT 1;")
			    test_chat(maxlvl[1][1])
			    if tonumber(maxlvl[1][1]) < 35 then 
				    -- NICHT DE
				    say_title("Alquimista")
				    say("Esta articulo no es adecuado")
	 say("para obtener fragmentos.")
				    return
			    end
			
			    say_title("Alquimista")
			    say(string.trim(item.get_name()))
			    say("Quiere destruir este Item?")
			    if select("Si!","En este momento, no.") == 2 then
				    return
			    else
				    local anzahl = number(0,15)
				    if anzahl > 0 then
					    say_title("Alquimista")
					    say("Bien! Obtienes "..anzahl.." Fragmentos de energía.")
					    say("Aquí tienes.")
					    pc.give_item2(51001, anzahl)
				    else
					    say_title("Alquimista")
					    say("Desafortunadamente no pude extraer")
					    say("Fragmentos de Energía. Quizás")
					    say("funcione en el siguiente")
	  say("intento!")
					    return
				    end
				    item.remove()
			    end
				
		    else -- NICHT DE
			    say_title("Alquimista")
				    say("Esta articulo no es adecuado")
	 say("para obtener fragmentos.")
		    end
	    end
		
	    when login begin
		    if getenergytime() < 50000 then
			    test_chat("[Energy]Restzeit: "..getenergytime())
			    setenergytime(getenergytime() + get_time())
			    cmdchat("energysystem "..getenergytyp().."|"..getenergyvalue().."#"..getenergytime())
		    end
	    end
	    when logout begin
		    if getenergytime() > get_time() then
			    local energy = getenergytime() - get_time()
			    if energy > 0 then
				    setenergytime(energy)
			    end
		    end
	    end
		
	    when 51002.use begin
		    if getenergytime() > get_time() then
			    chat("Ya esta usando la energía de un cristal!")
			    return
		    end
			
		    local anz = number(1,10)
		    boni_list = {}
		    boni_list [1] = {apply.ATTBONUS_HUMAN,    15}
		    boni_list [2] = {apply.ATTBONUS_MONSTER,    10}
		    boni_list [3] = {apply.CRITICAL_PCT,    10}
		    boni_list [4] = {apply.PENETRATE_PCT,    10}
		    boni_list [5] = {apply.MAX_HP,    1000}
		    boni_list [6] = {apply.MAX_SP,    2000}
		    boni_list [7] = {apply.HP_REGEN,    30}
		    boni_list [8] = {apply.STEAL_HP,    10}
		    boni_list [9] = {apply.ATT_GRADE_BONUS,    75}
		    boni_list [10] = {apply.ATT_GRADE_BONUS,    50}
			
		    test_chat(anz)
		    test_chat(boni_list[anz][1])
		    test_chat(boni_list[anz][2])
		    affect.add_collect(boni_list[anz][1],boni_list[anz][2],7200)
		    setenergy(anz,boni_list[anz][2],get_time() + 7200)
		    cmdchat("energysystem "..anz.."|"..boni_list[anz][2].."#"..(get_time() + 7200))
			
		    setenergytime(get_time() + 7200)
			
		    item.remove()
		    chat("Sientes que la energía del cristal, se transfiere a tu cuerpo..")
			
	    end
    end
end 

la pongo y no da ningun error pero no me funciona cuando prendo els erver y voy al npc no funka,

voy a objet/20001 y no esta el script de la quest tampoco ayuda

No la robe solo la tome prestada de epvp

Descarga: