SiTuMeSpamJteRetrouveIRL

 partage Quête permettant l'upgrade de pierres via un PNJ. (Metin2)

Recommended Posts

Bonjour,

Je vous propose une humble quête que je viens de réaliser permettant la fusion de pierres de faible qualité en qualité supérieure.

En quoi cela consiste ? Tout simplement à upgrader, par exemple, deux pierres+0 en une pierre+1.

 

Le taux de réussite est de 50% mais vous pourrez modifier facilement ce paramètre.

La quête de base est proposée sur l'alchimiste map1.

Plusieurs rubriques vous proposerons l'upgrade suivant le level des pierres que vous souhaitez upgrader (de +0 à +4),

une fois cette indication donnée, le code tentera alors l'upgrade de toutes les pierres de ce level que vous avez dans votre inventaire.

Si vous n'avez pas de pierres+5 sur votre serveur je vous invite à supprimer tout simplement ce choix.

J'ai créé une fonction pour vous permettre de l'utiliser dans un autre contexte et de rendre son utilisation plus simple et intuitive.

 

Bref, je vous laisse découvrir tout ça par vous même.

 

Code :

 

quest alchimistequest begin
	state start begin
		---
		when alchemist.chat."Fusionner des pierres" begin
			---
			say_title("L'alchimiste :")
			say("Je viens de mettre au point une technique")
			say("incroyable pour fusionner deux pierres")
			say("identiques de faible qualité pour en faire")
			say("une pierre de qualité supérieure.")
			say("Souhaiterais-tu essayer ? Mais attention...")
			say("Cela ne réussi pas à tous les coups !")
			local b=select("Oui", "Non")
			if b==2 then
				return
			end
			say_title("L'alchimiste :")
			say("Selectionnez les pierres que vous voulez fusionner.")
			local c=select("Fusionner des pierres+0", "Fusionner des pierres+1", "Fusionner des pierres+2", "Fusionner des pierres+3", "Fusionner des pierres+4", "Fermer")
			---
			if c==1 then
				alchimistequest.stone_getn(0)
				--- Mettez entre parenthèse le nombre correspondant au level de la pierre. 
				--- Donc 3 pour fusionner des pierres +3 en pierres +4,
				--- 1 pour fusionner des pierres +1 en pierres +2, etc...
				return
			end
			if c==2 then
				alchimistequest.stone_getn(1)
				return
			end
			if c==3 then
				alchimistequest.stone_getn(2)
				return
			end
			if c==4 then
				alchimistequest.stone_getn(3)
				return
			end
			if c==5 then
				alchimistequest.stone_getn(4)
				return
			end
			if c==6 then
				return
			end
		end
		---
		function stone_getn(stonenum)
			nstonestart = 28030 + (stonenum *100) + 0
			nstonestop = 28030 + (stonenum *100) + 13
			nstoneboucle = nstonestart
			stonefound = 0
			---
			while nstoneboucle <= nstonestop do
				if pc.countitem(nstoneboucle) >= 2 then
					stonefound = 1
					interwhile = pc.countitem(nstoneboucle) / 2
					for i = 1, interwhile do
						x = number(1, 2)
						--- Augmentez la seconde valeur de la variable x pour diminuer les chances de réussite.
						stonename = item_name(nstoneboucle)
						stoneupgradename = item_name(nstoneboucle+100)
						if x == 1 then
							pc.give_item2(nstoneboucle+100, 1)
							syschat("La fusion a réussie, vous avez reçu une "..stoneupgradename.." !")
						else
							syschat("Echec ! Vos deux "..stonename.." ont été détruites...")
						end
						pc.removeitem(nstoneboucle, 2)
					end
				end
				nstoneboucle = nstoneboucle +1
			end
			---
			if stonefound == 1 then
				say_title("L'alchimiste :")
				say("Et voilà, c'est fait !")
				say("J'ai fait vite, n'est-ce pas ?")
			else
				say_title("L'alchimiste :")
				say("Je n'ai trouvé aucune pierre à fusionner.")
				say("Revenez quand vous aurez au moins deux")
				say("pierres identiques à fusionner.")
			end
		end
		---
	end
end

 

Voilà ! Je ne sais pas si ça intéressera quelqu'un, un jour, mais bon.

Et si vous avez le moindre soucis n'hésitez pas à poster un message à la suite de celui-ci, j'y répondrai.

 

PS : Cette quête a été créée sur un serveur "files 2014" mais je ne vois pas pourquoi cela ne fonctionnerait pas sur un plus ancien/récent.

Et si vous ne savez pas implanter une quête, c'est par ici : https://funky-emu.net/topic/12061-implanter-une-quête/

 

  • Like 1

Share this post


Link to post
Share on other sites