Snobi

 tutoriel / partage Quête Système de vote InGame by saya88140 EB

Recommended Posts

Salut à tous !

 

Je vous partage aujourd'hui une exclusivité de emulation-bay crée par Agronaque alias Rayz.

Un petit bijoux attirant vos joueurs à voter !

 

Description :

 

La quête Vote4BeTheBest.quest vous servira à faire voter vos joueurs pour votre serveur. En guise de récompense, ils gagneront un bonus simple dans une branche particulière (maxhp, def, attaque, magie)

 

Version 1.0

 

Révélation

 

---------------------------------------------------------------------------------------
--          SOURCE # Agronaque512 alias Rayz.                                        --
--          CODEX  # VOTE 4 BE THE BEST                                              --
--          http://www.emulation-bay.co m                                                 --
--          Code effectué sous demande                                               --
--          VERSION# 1.0                                                             --
---------------------------------------------------------------------------------------
quest vote4bethebest begin
	state start begin
		when login begin
			set_state("VOTE")
		end
	end
	state VOTE begin
		when letter begin
			send_letter("Votez et gagnez un bonus")
		end
		when button or info begin
			if pc.is_gm() then
				say_title("Menu vote configuration:")
				vote1 = select("Configurer les adresses", "Google", "Quitter")
				if vote1 == 1 then
					say_title("Entrez l'ID du TopSite mt2top")
					say_reward("Exemple: http://www.root-top.com/topsite/mt2top/in.php?ID=2507")
					say_reward("L'id ici est 2507.")
					adresse1 = input()
					say_title("Entrez l'ID du TopSite Combattantx:")
					say_reward("Exemple: http://www.root-top.com/topsite/combattantx/in.php?ID=373")
					say_reward("L'id ici est 373.")
					adresse2 = input()
					say_title("Entrez l'ID du TopSite zephyr:")
					say_reward("Exemple: http://www.root-top.com/topsite/zephyr/in.php?ID=516")
					say_reward("L'id ici est 516.")
					adresse3 = input()
					if adresse1 or adresse2 or adresse3 == " " then
						return
					end
				elseif vote1 == 2 then
					cmdchat("showtrailer http://google.com/")
					setskin(NOWINDOW)
				else
					return
				end
			else
				say_title("Menu vote:")
				vote = select("Vote1", "Vote2", "Vote3", "Ne pas voter")
				if vote == 1 then
					if pc.getqf("vote1") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.root-top.com/topsite/mt2top/in.php?ID="..adresse1.."")
						setskin(NOWINDOW)
						pc.setqf("vote1", 1)
						timer("cantvote1", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				elseif vote == 2 then
					if pc.getqf("vote2") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.root-top.com/topsite/combattantx/in.php?ID="..adresse2.."")
						setskin(NOWINDOW)
						pc.setqf("vote2", 1)
						timer("cantvote2", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				elseif vote == 3 then
					if pc.getqf("vote3") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.root-top.com/topsite/zephyr/in.php?ID="..adresse3.."")
						setskin(NOWINDOW)
						pc.setqf("vote3", 1)
						timer("cantvote3", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				else
					return
				end
			end
		end
		when cantvote1.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote1", 0)
			set_state("VOTE")
		end
		when cantvote2.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote2", 0)
			set_state("VOTE")
		end
		when cantvote3.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote3", 0)
			set_state("VOTE")
		end
	end
end

 

 

Version 1.1

 

Révélation

 

---------------------------------------------------------------------------------------
--          SOURCE # Agronaque512 alias Rayz.                                        --
--          CODEX  # VOTE 4 BE THE BEST                                              --
--          http://www.emulation-bay.co m                                                 --
--          Code effectué sous demande                                               --
--          VERSION# 1.1                                                             --
---------------------------------------------------------------------------------------
quest vote4bethebest begin
	state start begin
		when login begin
			set_state("VOTE")
		end
	end
	state VOTE begin
		when letter begin
			send_letter("Votez et gagnez un bonus")
		end
		when button or info begin
			if pc.is_gm() then
				say_title("Menu vote configuration:")
				vote1 = select("Configurer les adresses", "Vérifier les adresses", "Google", "Quitter")
				if vote1 == 1 then
					say_title("Entrez l'ID du TopSite mt2top")
					say_reward("Exemple: http://www.root-top.com/topsite/mt2top/in.php?ID=2507")
					say_reward("L'id ici est 2507.")
					adresse1 = input()
					say_title("Entrez l'ID du TopSite Combattantx:")
					say_reward("Exemple: http://www.root-top.com/topsite/combattantx/in.php?ID=373")
					say_reward("L'id ici est 373.")
					adresse2 = input()
					say_title("Entrez l'ID du TopSite zephyr:")
					say_reward("Exemple: http://www.root-top.com/topsite/zephyr/in.php?ID=516")
					say_reward("L'id ici est 516.")
					adresse3 = input()
					say_title("Entrez l'ID du TopSite Topmetin:")
					say_reward("Exemple: http://www.topmetin.com/index.php?p=in&id=2614")
					say_reward("L'id ici est 2614.")
					adresse4 = input()
					if adresse1 or adresse2 or adresse3 or adresse4 == " " then
						return
					end
				elseif vote1 == 2 then
					say_title("Verifier les adresses:")
					say("Les adresses actuelles sont:")
					say("1. http://www.root-top.com/topsite/mt2top/in.php?ID="..adresse1..".")
					say("2. http://www.root-top.com/topsite/combattantx/in.php?ID="..adresse2..".")
					say("3. http://www.root-top.com/topsite/zephyr/in.php?ID="..adresse3..".")
					say("4. http://www.topmetin.com/index.php?p=in&id="..adresse4..".")
					tester = select("Tester l'adresse N1", "Tester l'adresse N2", "Tester l'adresse N3", "Tester l'adresse N4", "Quitter")
					if tester == 1 then
						cmdchat("showtrailer http://www.root-top.com/topsite/mt2top/in.php?ID="..adresse1.."")
						setskin(NOWINDOW)
					elseif tester == 2 then
						cmdchat("showtrailer http://www.root-top.com/topsite/combattantx/in.php?ID="..adresse2.."")
						setskin(NOWINDOW)
					elseif tester == 3 then
						cmdchat("showtrailer http://www.root-top.com/topsite/zephyr/in.php?ID="..adresse3.."")
						setskin(NOWINDOW)
					elseif tester == 4 then
						cmdchat("showtrailer http://www.topmetin.com/index.php?p=in&id="..adresse4.."")
						setskin(NOWINDOW)
					else
						return
					end
				elseif vote1 == 3 then
					cmdchat("showtrailer http://google.com/")
					setskin(NOWINDOW)
				else
					return
				end
			else
				say_title("Menu vote:")
				vote = select("Vote1", "Vote2", "Vote3", "Vote4", "Ne pas voter")
				if vote == 1 then
					if pc.getqf("vote1") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.root-top.com/topsite/mt2top/in.php?ID="..adresse1.."")
						setskin(NOWINDOW)
						pc.setqf("vote1", 1)
						timer("cantvote1", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				elseif vote == 2 then
					if pc.getqf("vote2") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.root-top.com/topsite/combattantx/in.php?ID="..adresse2.."")
						setskin(NOWINDOW)
						pc.setqf("vote2", 1)
						timer("cantvote2", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				elseif vote == 3 then
					if pc.getqf("vote3") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.root-top.com/topsite/zephyr/in.php?ID="..adresse3.."")
						setskin(NOWINDOW)
						pc.setqf("vote3", 1)
						timer("cantvote3", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				elseif vote == 4 then
					if pc.getqf("vote4") == 1 then
						say_title("Menu vote:")
						say("Vous avez déjà voté pour ce topSite.")
					else
						cmdchat("showtrailer http://www.topmetin.com/index.php?p=in&id="..adresse4.."")
						setskin(NOWINDOW)
						pc.setqf("vote4", 1)
						timer("cantvote4", 7200)
						recomp = math.random(4)
						if recomp == 1 then
							affect.add_collect(apply.MAXHP,1,60*60*24*365*60)
							syschat("Vous recevez +1 MAXHP.")
						elseif recomp == 2 then
							affect.add_collect(apply.DEF_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en défense.")
						elseif recomp == 3 then
							affect.add_collect(apply.ATT_GRADE_BONUS,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats physiques.")
						elseif recomp == 4 then
							affect.add_collect(apply.MAGIC_ATT_GRADE,1,60*60*24*365*60)
							syschat("Vous recevez +1 en dégats magiques.")
						end
					end
				else
					return
				end
			end
		end
		when cantvote1.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote1", 0)
			set_state("VOTE")
		end
		when cantvote2.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote2", 0)
			set_state("VOTE")
		end
		when cantvote3.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote3", 0)
			set_state("VOTE")
		end
		when cantvote4.timer begin
			syschat("Vous pouvez voter à nouveau!")
			pc.setqf("vote4", 0)
			set_state("VOTE")
		end
	end
end

 

 

Vous vous loguez et vous recevez une lettre directement nommée "Votez et gagnez un bonus". Il vous suffit de cliquer dessus afin de voter dans le vote1, 2 ou 3 et ainsi gagner un petit bonus pour améliorer votre personnage.

Si vous êtes GM, vous aurez droit au panel de configuration des adresses topsite et à une page internet Google simple.

 

Vidéo :

 

 

Edited by FrancH

Share this post


Link to post
Share on other sites

Salut ,

 

Petit problème concernant la partie joueur de la quête, il ne se passe rien lorsque l'on clique sur Vote 1 2 3 ou 4. Une explication ? (oui j'ai pris en compte que des sites d'existent plus)

 

Merci d'avance.

Share this post


Link to post
Share on other sites