[Serviciu]Creere de Questuri, Arme si Mape#Gratis#

Avatar utilizator
Profesor
Nivel 2

Nivel 2
Mesaje: 216
Membru din: 20 Sep 2014, 01:02
Regat: Jinno
Aprecieri: 47  
Mulţumiri: 7  
Medalii

DaYellowFlash scrie:
alexghinet scrie:Sal doresc ca acest quest (CAND ACESTA ESTE TERMINAT) abea atunci sa urmeze urmatorul quest
CELALALT QUEST NUME : quest DesertTalhari2 begin

Cod: Selectaţi tot

quest DesertTalhari begin
	state start begin
		when login or levelup with pc.level >= 95 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Talharii Desertului Yongbi")
		end

		when info or button begin
			say_title("Talharii Desertului Yongbi")
			say("Talharii de desert au fost mereu o amenintare pentru")
			say("oamenii care incearca sa mearga in oaza desertului")
			say("pentru a lua putina apa. ")
			say("Sper ca-i poti ajuta pe sateni sa scape de cativa.")
			say("Satenii ti-au pregatit un omagiu special")
			say("daca vei indeplinii sarcina.")
			say_reward("Omoara 500 de Talhari de desert")
			say("")
	        pc.setqf("state", 500)
	        q.set_counter("Beduin", 500)
		end

		when 2108.kill begin
			local count = pc.getqf("state") - 1
			if count <= 500 then
				pc.setqf("state", count)
	            q.set_counter("Beduin", count)
			end
			if count == 0 then
			    say_title("Talharii Desertului Yongbi - Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Satenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
			    say("Imi pare rau ca au fost atat de multi dar...")
				say("Doar asa v-om scapa de acesti talhari.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Costum Inghetat")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(18186, 1)
				clear_letter()
				set_quest_state("DesertTalhari2", "run")
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end 
Si cum sa fac eu asta ma rog ? ... nu ai precizat ce quest este acel " DesertTalhari2 " cum sa iti fac questul ? .. eu unul nu am inteles daca ai precizat sau nu. ai zis ca vrei sa ii apara scroll'ul dupa ce a terminat DesertTalhari ... dar questul DesertTalhari2 cum ai vrea sa fie ? .. fiti si voi mai expliciti.

DesertTalhari2 este quest beginul , dar DesertTalhari cand este terminat sa apara DesertTalhari2 , eu am deja facut acel quest "2" doar ca mi le da amandoua odata .. si vreau dupa ce termini sa apara celalalt :D sper ca ai inteles acum
Avatar utilizator
Profesor
Nivel 2

Nivel 2
Mesaje: 216
Membru din: 20 Sep 2014, 01:02
Regat: Jinno
Aprecieri: 47  
Mulţumiri: 7  
Medalii

Quest 1 :

Cod: Selectaţi tot

quest DesertTalhari begin
	state start begin
		when login or levelup with pc.level >= 95 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Talharii Desertului Yongbi")
		end

		when info or button begin
			say_title("Talharii Desertului Yongbi")
			say("Talharii de desert au fost mereu o amenintare pentru")
			say("oamenii care incearca sa mearga in oaza desertului")
			say("pentru a lua putina apa. ")
			say("Sper ca-i poti ajuta pe sateni sa scape de cativa.")
			say("Satenii ti-au pregatit un omagiu special")
			say("daca vei indeplinii sarcina.")
			say_reward("Omoara 500 de Talhari de desert")
			say("")
	        pc.setqf("state", 500)
	        q.set_counter("Beduin", 500)
		end

		when 2108.kill begin
			local count = pc.getqf("state") - 1
			if count <= 500 then
				pc.setqf("state", count)
	            q.set_counter("Beduin", count)
			end
			if count == 0 then
			    say_title("Talharii Desertului Yongbi - Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Satenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
			    say("Imi pare rau ca au fost atat de multi dar...")
				say("Doar asa v-om scapa de acesti talhari.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Costum Inghetat")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(18186, 1)
				clear_letter()
				set_quest_state("DesertTalhari2", "run")
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

Quest 2:

Cod: Selectaţi tot

 [code]quest DesertTalhari2 begin
	state start begin
		when login with pc.level >= 96 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Talharii Desertului Yongbi 2")
		end

		when info or button begin
			say_title("Talharii Desertului Yongbi 2")
			say("Daca ai ucis deja cei 500 de talhari")
			say("si vrei ca costumul tau sa fie mai puternic")
			say("atunci asculta cu atentie.")
			say_green("Eu iti voi da materialul de upgrade pentru costum")
			say_auriu("In desert tot apar pietre ale metinului.")
			say("si anume Metinul Sufletului")
			say("Monstrii invocati din ea.")
			say("Au ranit deja peste 25 de sateni.")
			say("Am nevoie de tine sa cauti si sa distrugi.")
			say("Cateva pietre metin.")
			say_reward("Omoara 25 Pietra Metin a Sufletului Lv.40")
			say_reward("Aceasta se poate gasii in desertul yongby")
			say("")
	        pc.setqf("state", 25)
	        q.set_counter("Metinul Sufletelui", 25)
		end

		when 8008.kill begin
			local count = pc.getqf("state") - 1
			if count <= 25 then
				pc.setqf("state", count)
	            q.set_counter("Metinul Sufletelui", count)
			end
			if count == 0 then
			    say_title("Talharii Desertului Yongbi 2- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Satenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
			    say("Imi pare rau ca au fost atat de multe dar...")
				say("Doar asa v-om scapa de acestea.")
				say("Felicitari inca odata.")
				say_auriu("Pentru a upgrada costumul trage-l pe .")
				say_auriu("Fierarul Legendar.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Nisip Cuart")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30195, 1)
				clear_letter()
				set_quest_state("SohanMountain", "run")
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

[/code]

Cand termini 1 sa inceapa 2

Dupaia asta :

Cod: Selectaţi tot

quest SohanMountain begin
	state start begin
		when login or levelup with pc.level >= 99 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("In Muntele Sohan")
		end

		when info or button begin
			say_title("Vulpea cu 9 Cozi")
			say("Daca ai ucis deja cei 500 de talhari")
			say("Ai Distrus cele 25 de metine ale sufletului")
			say("atunci ce te mai poate oprii.")
			say("in gasirea Costumului Akatsuki?")
			say("Cred ca nimic!")
			say_green("Esti pregatit pentru ceea ce urmeaza?!")
			say_green("In Muntele Sohan se afla Vulpea cu 9 Cozi,")
			say_green("Deseori ea terorizeaza muntenii Sohanului!")			
			say_reward("Gaseste 2 Vulpi cu 9 Cozi si infrange-le!")
			say_red("Muntenii te vor rasplatii cu obiectul")
			say_red("necesar pentru a evolua Costumul de Gheata.")
			say("")
	        pc.setqf("state", 2)
	        q.set_counter("Noua Cozi", 2)
		end

		when 1901.kill begin
			local count = pc.getqf("state") - 1
			if count <= 2 then
				pc.setqf("state", count)
	            q.set_counter("Noua Cozi", count)
			end
			if count == 0 then
			    say_title("Noua Cozi- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Muntenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
				say("Doar asa v-om scapa de acestea.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Cristal Albastru")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30199, 1)
				clear_letter()
				set_quest_state("SohanMountain2", "run")
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

Asta :

Cod: Selectaţi tot

[code]st SohanMountain2 begin
	state start begin
		when login or levelup with pc.level >= 100 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("In Muntele Sohan 2")
		end

		when info or button begin
			say_title("Golemii De Gheata")
			say("Daca ai ucis deja cei 500 de Talhari")
			say("Ai Distrus cele 25 de Metine ale Sufletului")
			say("Ai Ucis cele 2 Vulpi cu 9 Cozi")
			say("atunci ce te mai poate oprii.")
			say("in gasirea Costumului Akatsuki?")
			say("Cred ca nimic!")
			say_green("Esti pregatit pentru ceea ce urmeaza?!")
			say_green("Undeva in Muntele Sohan")
			say_green("Se afla Golemii De Gheata!")			
			say_reward("Gaseste-i si ucidei!")
			say_red("Muntenii te vor rasplatii cu obiectul")
			say_red("necesar pentru a evolua Costumul Phoenix.")
			say("")
	        pc.setqf("state", 75)
	        q.set_counter("Golem De Gheata", 75)
		end

		when 8511.kill begin
			local count = pc.getqf("state") - 1
			if count <= 75 then
				pc.setqf("state", count)
	            q.set_counter("Golemi De Gheata", count)
			end
			if count == 0 then
			    say_title("In Muntele Sohan 2- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Muntenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
				say("Doar asa v-om scapa de acestia.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Semnite Magice")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30197, 1)
				clear_letter()
				set_quest_state("BetaMap", "run")
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

[/code]
asta :

Cod: Selectaţi tot

----------------------------------------------
-- Talharii Desertului Yongbi
-- Quest Creator by Atashi (Don't edit this line)
----------------------------------------------
quest BetaMap begin
	state start begin
		when login or levelup with pc.level >= 101 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Amazoane Arcas")
		end

		when info or button begin
			say_title("Amazoanele")
			say("Gata cu joaca prietene ")
			say("In mapa de Lv. 95 Se afla Amazoane Arcas")
			say_reward("Pentru a ajunge la urmatorul ")
			say("Costum trebuie sa ucizi 75 de Amazoane Arcasi.")
			say("Iti doresc succes!")
			say("Nu am timp de alte povesti cu pesti")
			say("")
	        pc.setqf("state", 75)
	        q.set_counter("Amazoana Arcas", 75)
		end

		when 3501.kill begin
			local count = pc.getqf("state") - 1
			if count <= 75 then
				pc.setqf("state", count)
	            q.set_counter("Rotdieb-Amazone ", count)
			end
			if count == 0 then
			    say_title("Amazoanele Rosii- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Ai depus o munca uluitoare.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Cristal de Apa")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30198, 1)
				clear_letter()
				set_quest_state("BetaMap1", "run")
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

Dupa asta

Cod: Selectaţi tot

----------------------------------------------
-- Talharii Desertului Yongbi
-- Quest Creator by Atashi (Don't edit this line)
----------------------------------------------
quest BetaMap2 begin
	state start begin
		when login or levelup with pc.level >= 103 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Assassin Rosu")
		end

		when info or button begin
			say_title("Assassinii")
			say("Gata cu joaca prietene ")
			say("In mapa de Lv. 95 Se afla Assassini Rosi")
			say_reward("Pentru a ajunge la urmatorul ")
			say("Costum trebuie sa ucizi 75 de Asasini Rosii.")
			say("Iti doresc succes!")
			say("Nu am timp de alte povesti cu pesti")
			say("")
	        pc.setqf("state", 75)
	        q.set_counter("Asasin Rosu", 75)
		end

		when 3502.kill begin
			local count = pc.getqf("state") - 1
			if count <= 75 then
				pc.setqf("state", count)
	            q.set_counter("Rotdieb-Assassin ", count)
			end
			if count == 0 then
			    say_title("Asasinii Rosi- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Ai depus o munca uluitoare.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Buzduganul Orcilor")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30194, 1)
				clear_letter()
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

Si asta e ultimu:

Cod: Selectaţi tot

----------------------------------------------
-- Talharii Desertului Yongbi
-- Quest Creator by Atashi (Don't edit this line)
----------------------------------------------
quest BetaMap3 begin
	state start begin
		when login or levelup with pc.level >= 105 and pc.level <= 105 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Costumul Akatsuki")
		end

		when info or button begin
			say_title("Inainte de a primii materialul de upgrade")
			say("trebuie sa-mi demonstrezi ca-l meriti cu adevarat")
			say("Ucide de 3 ori Regele Demonilor")
			say_red("Ha ha ha...")
			say("Nu cel care crezi tu ci....")
			say_auriu("Azrael!")
			say("Aceasta este ultima Misiune")
			say("")
	        pc.setqf("state", 3)
	        q.set_counter("Azrael", 3)
		end

		when 2598.kill begin
			local count = pc.getqf("state") - 1
			if count <= 3 then
				pc.setqf("state", count)
	            q.set_counter("Azrael ", count)
			end
			if count == 0 then
			    say_title("Ultima Misiune- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Ai deblocat cu succes ultimul material!")
			    say("Ai depus o munca uluitoare.")
				say("Echipeaza Costumul Akatsuki.")
				say("Apoi cauta-l pe Informator.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Cenusa Demonilor")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30196, 1)
				clear_letter()
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

Avatar utilizator
DaYellowFlash
Utilizator interzis !

Utilizator interzis !
Mesaje: 211
Membru din: 22 Ian 2016, 00:12
Server: Lotus II
Aprecieri: 7  
Mulţumiri: 5  
Medalii

:)) poftim aici data viitoar]e r]evino cu EDIT nu cu dublu post ;)

Questur]ile tale :

1:

Cod: Selectaţi tot

---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 95 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("Talharii Desertului Yongbi")
		end

		when info or button begin
			say_title("Talharii Desertului Yongbi")
			say("Talharii de desert au fost mereu o amenintare pentru")
			say("oamenii care incearca sa mearga in oaza desertului")
			say("pentru a lua putina apa. ")
			say("Sper ca-i poti ajuta pe sateni sa scape de cativa.")
			say("Satenii ti-au pregatit un omagiu special")
			say("daca vei indeplinii sarcina.")
			say_reward("Omoara 500 de Talhari de desert")
			say("")
	        pc.setqf("state", 500)
	        q.set_counter("Beduin", 500)
		end

		when 2108.kill begin
			local count = pc.getqf("state") - 1
			if count <= 500 then
				pc.setqf("state", count)
	            q.set_counter("Beduin", count)
			end
			if count == 0 then
			    say_title("Talharii Desertului Yongbi - Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Satenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
			    say("Imi pare rau ca au fost atat de multi dar...")
				say("Doar asa v-om scapa de acesti talhari.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Costum Inghetat")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(18186, 1)
				clear_letter()
                set_quest_state("DesertTalhari2", "run")
                set_state(__complete)

			end
		end
	end

	state __complete begin
	end
end

 
2:

Cod: Selectaţi tot

---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari2 begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 96 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("Talharii Desertului Yongbi 2")
		end

		when info or button begin
			say_title("Talharii Desertului Yongbi 2")
			say("Daca ai ucis deja cei 500 de talhari")
			say("si vrei ca costumul tau sa fie mai puternic")
			say("atunci asculta cu atentie.")
			say_green("Eu iti voi da materialul de upgrade pentru costum")
			say_auriu("In desert tot apar pietre ale metinului.")
			say("si anume Metinul Sufletului")
			say("Monstrii invocati din ea.")
			say("Au ranit deja peste 25 de sateni.")
			say("Am nevoie de tine sa cauti si sa distrugi.")
			say("Cateva pietre metin.")
			say_reward("Omoara 25 Pietra Metin a Sufletului Lv.40")
			say_reward("Aceasta se poate gasii in desertul yongby")
			say("")
	        pc.setqf("state", 25)
	        q.set_counter("Metinul Sufletelui", 25)
		end

		when 8008.kill begin
			local count = pc.getqf("state") - 1
			if count <= 25 then
				pc.setqf("state", count)
	            q.set_counter("Metinul Sufletelui", count)
			end
			if count == 0 then
			    say_title("Talharii Desertului Yongbi 2- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Satenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
			    say("Imi pare rau ca au fost atat de multe dar...")
				say("Doar asa v-om scapa de acestea.")
				say("Felicitari inca odata.")
				say_auriu("Pentru a upgrada costumul trage-l pe .")
				say_auriu("Fierarul Legendar.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Nisip Cuart")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30195, 1)
				clear_letter()
                set_quest_state("DesertTalhari3", "run")
                set_state(__complete)

			end
		end
	end

	state __complete begin
	end
end

 
3:

Cod: Selectaţi tot

---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari3 begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 96 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("In Muntele Sohan")
		end

		when info or button begin
			say_title("Vulpea cu 9 Cozi")
			say("Daca ai ucis deja cei 500 de talhari")
			say("Ai Distrus cele 25 de metine ale sufletului")
			say("atunci ce te mai poate oprii.")
			say("in gasirea Costumului Akatsuki?")
			say("Cred ca nimic!")
			say_green("Esti pregatit pentru ceea ce urmeaza?!")
			say_green("In Muntele Sohan se afla Vulpea cu 9 Cozi,")
			say_green("Deseori ea terorizeaza muntenii Sohanului!")			
			say_reward("Gaseste 2 Vulpi cu 9 Cozi si infrange-le!")
			say_red("Muntenii te vor rasplatii cu obiectul")
			say_red("necesar pentru a evolua Costumul de Gheata.")
			say("")
	        pc.setqf("state", 2)
	        q.set_counter("Noua Cozi", 2)
		end

		when 1901.kill begin
			local count = pc.getqf("state") - 1
			if count <= 2 then
				pc.setqf("state", count)
	            q.set_counter("Noua Cozi", count)
			end
			if count == 0 then
			    say_title("Noua Cozi- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Muntenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
				say("Doar asa v-om scapa de acestea.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Cristal Albastru")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30199, 1)
				clear_letter()
                set_quest_state("DesertTalhari4", "run")
                set_state(__complete)

			end
		end
	end

	state __complete begin
	end
end


 
4:

Cod: Selectaţi tot

---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari4 begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 96 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("In Muntele Sohan 2")
		end

		when info or button begin
			say_title("Golemii De Gheata")
			say("Daca ai ucis deja cei 500 de Talhari")
			say("Ai Distrus cele 25 de Metine ale Sufletului")
			say("Ai Ucis cele 2 Vulpi cu 9 Cozi")
			say("atunci ce te mai poate oprii.")
			say("in gasirea Costumului Akatsuki?")
			say("Cred ca nimic!")
			say_green("Esti pregatit pentru ceea ce urmeaza?!")
			say_green("Undeva in Muntele Sohan")
			say_green("Se afla Golemii De Gheata!")			
			say_reward("Gaseste-i si ucidei!")
			say_red("Muntenii te vor rasplatii cu obiectul")
			say_red("necesar pentru a evolua Costumul Phoenix.")
			say("")
	        pc.setqf("state", 75)
	        q.set_counter("Golem De Gheata", 75)
		end

		when 8511.kill begin
			local count = pc.getqf("state") - 1
			if count <= 75 then
				pc.setqf("state", count)
	            q.set_counter("Golemi De Gheata", count)
			end
			if count == 0 then
			    say_title("In Muntele Sohan 2- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Muntenii iti multumesc !")
			    say("Ai depus o munca uluitoare.")
				say("Doar asa v-om scapa de acestia.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Semnite Magice")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30197, 1)
				clear_letter()
                set_quest_state("DesertTalhari5", "run")
                set_state(__complete)

			end
		end
	end

	state __complete begin
	end
end

 
5:

Cod: Selectaţi tot

---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari5 begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 96 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("Amazoane Arcas")
		end

		when info or button begin
			say_title("Amazoanele")
			say("Gata cu joaca prietene ")
			say("In mapa de Lv. 95 Se afla Amazoane Arcas")
			say_reward("Pentru a ajunge la urmatorul ")
			say("Costum trebuie sa ucizi 75 de Amazoane Arcasi.")
			say("Iti doresc succes!")
			say("Nu am timp de alte povesti cu pesti")
			say("")
	        pc.setqf("state", 75)
	        q.set_counter("Amazoana Arcas", 75)
		end

		when 3501.kill begin
			local count = pc.getqf("state") - 1
			if count <= 75 then
				pc.setqf("state", count)
	            q.set_counter("Rotdieb-Amazone ", count)
			end
			if count == 0 then
			    say_title("Amazoanele Rosii- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Ai depus o munca uluitoare.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Cristal de Apa")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30198, 1)
				clear_letter()
                set_quest_state("DesertTalhari6", "run")
                set_state(__complete)

			end
		end
	end

	state __complete begin
	end
end

 
6:

Cod: Selectaţi tot

 ---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari6 begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 96 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("Assassin Rosu")
		end

		when info or button begin
			say_title("Assassinii")
			say("Gata cu joaca prietene ")
			say("In mapa de Lv. 95 Se afla Assassini Rosi")
			say_reward("Pentru a ajunge la urmatorul ")
			say("Costum trebuie sa ucizi 75 de Asasini Rosii.")
			say("Iti doresc succes!")
			say("Nu am timp de alte povesti cu pesti")
			say("")
	        pc.setqf("state", 75)
	        q.set_counter("Asasin Rosu", 75)
		end

		when 3502.kill begin
			local count = pc.getqf("state") - 1
			if count <= 75 then
				pc.setqf("state", count)
	            q.set_counter("Rotdieb-Assassin ", count)
			end
			if count == 0 then
			    say_title("Asasinii Rosi- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Ai depus o munca uluitoare.")
				say("Felicitari inca odata.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Buzduganul Orcilor")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30194, 1)
				clear_letter()
                set_quest_state("DesertTalhari7", "run")
                set_state(__complete)

			end
		end
	end

	state __complete begin
	end
end

6:

Cod: Selectaţi tot

 ---#########################################
--###Quest_de_DaRealPain si DaYellowFlash###
---######################################
--###Pentru mai multe viziteaza: http://just4metin.ro/mica-publicitate/creere-questuri-arme-mape-gratis-t37429.html###


quest DesertTalhari7 begin
        state start begin
		end
	state run begin
                when login or levelup with pc.level >= 96 and pc.level <= 105 begin
                        set_state(information)
                end
        end
	state information begin
		when letter begin
			send_letter("Costumul Akatsuki")
		end

		when info or button begin
			say_title("Inainte de a primii materialul de upgrade")
			say("trebuie sa-mi demonstrezi ca-l meriti cu adevarat")
			say("Ucide de 3 ori Regele Demonilor")
			say_red("Ha ha ha...")
			say("Nu cel care crezi tu ci....")
			say_auriu("Azrael!")
			say("Aceasta este ultima Misiune")
			say("")
	        pc.setqf("state", 3)
	        q.set_counter("Azrael", 3)
		end

		when 2598.kill begin
			local count = pc.getqf("state") - 1
			if count <= 3 then
				pc.setqf("state", count)
	            q.set_counter("Azrael ", count)
			end
			if count == 0 then
			    say_title("Ultima Misiune- Succes!")
			    say("")
			    say("Ai terminat misiunea cu succes!")
			    say("Ai deblocat cu succes ultimul material!")
			    say("Ai depus o munca uluitoare.")
				say("Echipeaza Costumul Akatsuki.")
				say("Apoi cauta-l pe Informator.")
				say("")
				say_reward("Recompensa:")
			    say_reward("Ai primit Cenusa Demonilor")
			    say_reward("Ai primit 2000000 Yang")
			    say_reward("Ai primit 3000000 Experienta")
				pc.change_money(2000000)
				pc.give_exp2(3000000)
				pc.give_item2(30196, 1)
				clear_letter()
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end

Testate si functionale doar la rulare. Apar probleme lasi un Pm si eu revin cu edit la post
Avatar utilizator
Verdee
Nivel 1

Nivel 1
Mesaje: 75
Membru din: 22 Feb 2016, 05:44
Server: www.goldenmetin.com
Regat: Jinno
Aprecieri: 7  
Mulţumiri: 0
 Contact:
Medalii

Cerere: Quest
Email: [email protected]
Informatii Quest: As vrea un quest pentru sistemul puncte de onoare(dar nu alea care cad la metine, ci alea care ti le da cand omori jucatorii) si intr-un npc sa apara gen.. shop puncte onoare 10000 unde daca apesi sa iti scrie ca iti da un corn al printului si altul cu 15000 unde daca apesi sa iti dea un dinte al printului
Text: Cand dai click pe NPC-u actual.. :
Salut, ai deschis sistem-ul de putere!
La 10000 puncte onoare primesti 1 corn al printului (sau cum are numele...)
La 15000 puncte de onoare primesti 1 dinte al printului negru

ID-uri corn: 70044 - corn
ID-uri dinte: 70045 - dinte

Si va rog sa fie verificat daca sunteti draguti si funcionabil :*

Si daca am voie as dori si o mapa :p

Cerere: Mapa Golden PvP
Email: [email protected]
Informatii: vreau ceva foarte frumos si iesit din comun , o arena de pvp cum stiti voi mai bine pentru ca acolo vreau sa fac si strem online cu jucatorii care se dueleaza intre ei
Nimic nu se plateste mai sigur ca prostia!
Golden Metin - PVP FARM #ROMANIA
www.goldenmetin.com
Afișează semnătura
Avatar utilizator
[IoNuT]
Nivel 1

Nivel 1
Mesaje: 53
Membru din: 23 Noi 2013, 11:48
Server: Metin2Seren
Regat: Jinno
Aprecieri: 5  
Mulţumiri: 0
Medalii

asi dori si eu un quest in care sa iti dea la inceput doar ufar ucenic !!
Imagine
Afișează semnătura
Avatar utilizator
DaYellowFlash
Utilizator interzis !

Utilizator interzis !
Mesaje: 211
Membru din: 22 Ian 2016, 00:12
Server: Lotus II
Aprecieri: 7  
Mulţumiri: 5  
Medalii

Ne cerem scuze tuturor celor care au postat cereri si nu ai primit pana acum resursele cerute ... Am avut de invatat pt bac vin simularile si astea ... naspa :)) .. voi incepe sa rezolv cererile imediat cand voi avea acces la un pc :) Multumim pentru intelegere

[ Mesaj scris via Android ] Imagine
Avatar utilizator
qRedI3ullp
Nivel 3

Nivel 3
Mesaje: 302
Membru din: 26 Iun 2014, 09:06
Server: Metin2AlphaGun
Regat: Jinno
Aprecieri: 0
Mulţumiri: 0
Medalii

#DaRealPain ,aș dorii și eu un quest sau ceva să pun v4 / v5 la un inel de teleport ,am două implementate pe server, măcar pe 1 din ele vreau să adaug.
#Begin TeRRoR
Imagine
Afișează semnătura
Avatar utilizator
Ankhed
Fost Super Ad Moderator

Fost Super Ad Moderator
Mesaje: 2130
Membru din: 22 Noi 2015, 13:00
Aprecieri: 42  
Mulţumiri: 45  
 Contact:
Medalii

Subiect inactiv
Mutat in arhiva

[ Mesaj scris via iPhone ] Imagine
Imagine
Afișează semnătura
Închis
Răspunsuri
101
Vizualizări
9510
Răspunsuri
2
Vizualizări
389
Răspunsuri
3
Vizualizări
305
Răspunsuri
6
Vizualizări
669

Înapoi la “Arhivă”

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 11 vizitatori