Quest para mascota

mt2arcangel

Bueno algunos diran algo pero yo la encontre i lla la posteo para que la tengan i espero le sirva a todos igual que ami saludos i desde lla Gracias por apollar mis guias lla que los files subi parese aver gustado

quest horse_summon begin
	state start begin
		function get_horse_summon_prob_pct()  local skill_level=pc.get_skill_level(131)  if skill_level==1 then   return 15  elseif skill_level==2 then   return 20  elseif skill_level==3 then   return 30  elseif skill_level==4 then   return 40  elseif skill_level==5 then   return 50  elseif skill_level==6 then   return 60  elseif skill_level==7 then   return 70  elseif skill_level==8 then   return 80  elseif skill_level==9 then   return 90  elseif skill_level>=10 then   return 100  end  return 10 end
		function show_pet_menu()
	if horse.is_mine() then			
		say(locale.pet_menu.menu)
		s = select(locale.pet_menu.global,locale.pet_menu.teleporter,locale.pet_menu.maga,locale.pet_menu.shop,locale.pet_menu.close)
		if s == 1 then
			pet_global()
		end
		if s == 2 then
			pet_teleporter()
		end
		if s == 3 then
			game.open_safebox()
		end
		if s == 4 then
			game.open_mall()
		end
		if s == 5 then
			return
		end
	end
end
	when 20120.click begin horse_summon.show_pet_menu() end
	when 20121.click begin horse_summon.show_pet_menu() end
	when 20122.click begin horse_summon.show_pet_menu() end
		when 90013.use begin
			if horse.get_level() < 22 then
				if pc.is_mount( ) then
					horse.unride ()
					if pc.getqf("pet_system") == 0 then
							pc.setqf("pet_system",1)
						end
						local var = horse.get_name()
						nome = pc.get_name()
						io.output( "locale/italy/quest/pet/"..nome..".txt" )
						io.write ( "".. var .."")
						io.close()
						horse.set_name("Pet")
						horse.unsummon()
						pc.setqf("cavallolevel",horse.get_level())
						horse.set_level(22)
						say("Il Pet e' arrivato!")
						horse.summon()
						say(" ")
					if pc.get_guild() == 0 then
						pc.mount(20107, 30000)
					elseif pc.is_guild_master() == true then
						pc.mount(20109, 30000)
					else
						pc.mount(20108, 30000)
					end
				else
					if pc.getqf("pet_system") == 0 then
						pc.setqf("pet_system",1)
					end
					local var = horse.get_name()
					nome = pc.get_name()
					io.output( "locale/italy/quest/pet/"..nome..".txt" )
					io.write ( "".. var .."")
					io.close()
					horse.set_name("Pet")
					horse.unsummon()
					pc.setqf("cavallolevel",horse.get_level())
					horse.set_level(22)
					say("Il Pet e' arrivato!")
					horse.summon()
					say(" ")
				end
			end
		end
		when 50051.use with horse.get_grade()==0 begin
			say("Non hai il cavallo!")
		end
		when 50051.use begin
			if horse . get_grade ( ) == 0 then say ( "Non hai l'abilita' per cavalcare" ) 
 				return 
			end 
			if horse . get_grade ( ) == 1 then 
				if pc . getsp ( ) >= 100 then 
					if number ( 1 , 100 )

bueno hay que traducirla fuente inforge

edgar

grasias la probare aver que pedo

ElRaulxX

Alguien puede probarlo para ver si funciona y subir sreen?
Que a mi se me ha roto el ordenador donde tenia mi server :T.T:

yassin

ami no me dija ponerla

DestroyerMt2

si funcionaa
esta la habia vissto hace dias en epvp
y yo la prove y si funciona :wiii:
yo ando haciendo una basandome a esta
para el gato y el perro

yassin

@DestroyerMt2 said:

si funcionaa
esta la habia vissto hace dias en epvp
y yo la prove y si funciona :wiii:
yo ando haciendo una basandome a esta
para el gato y el perro

pon la proba de que te funciona

ami mi sali este error

DestroyerMt2

ami casi todo me sirve
nomas porque no tengo el server on
si no te pusiera prueba

yassin

@DestroyerMt2 said:

ami casi todo me sirve
nomas porque no tengo el server on
si no te pusiera prueba

ponlo on no cuenta nada

ElRaulxX

@yassin said:

@DestroyerMt2 said:

si funcionaa
esta la habia vissto hace dias en epvp
y yo la prove y si funciona :wiii:
yo ando haciendo una basandome a esta
para el gato y el perro

pon la proba de que te funciona

ami mi sali este error

Tu error se soluciona poniendo las funciones que no reconoce en el archivo de la carpeta quest: quest_functions
Haciendo esto te la debería aceptar y, si no hay ningun bug en la quest, funcionarte.
Pruebalo a ver si funciona :charm:

yassin

@ElRaulxX said:

@yassin said:

@DestroyerMt2 said:

si funcionaa
esta la habia vissto hace dias en epvp
y yo la prove y si funciona :wiii:
yo ando haciendo una basandome a esta
para el gato y el perro

pon la proba de que te funciona

ami mi sali este error

Tu error se soluciona poniendo las funciones que no reconoce en el archivo de la carpeta quest: quest_functions
Haciendo esto te la debería aceptar y, si no hay ningun bug en la quest, funcionarte.
Pruebalo a ver si funciona :charm:

gracias ahora mi acepto la quest aver si mi funciona