Problema quest

09 Dec 2015, 14:41

quest metin begin
	state start begin
		when login begin
			cmdchat("metine_dinos " .. q . getcurrentquestindex ())
		end
		when button or info begin
			setbgimage("MetinBoard.tga")
			setskin(4)
			say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
			say_negru("                 Ai distrus "..pc.getqf("metins").." Pietre Metin. ")
			say_negru("                 Pentru ca sunteti nevoit sa")
			say_negru("                 distrugeti multe pietre metin")
			say_negru("                 pe parcursul jocului am facut")
			say_negru("                 in asa fel incat sa primiti premii")
			say_negru("                 si sa fiti anuntati pe chat la un")
			say_negru("                 anumit numar de metine distruse.")
			say_negru("                 Premiile si anuntul se fi cand:")
			say_negru("                 veti ajunge la 10,50,100,200,500")
			say_negru("                 750,1000,1250,1500,1750 si tot asa")
			say_negru("                 din 250 in 250 metine distruse.")
		end
		when kill begin
			if npc.get_race()==8001 or npc.get_race()==8002 or npc.get_race()==8003 or npc.get_race()==8004 or npc.get_race()==8005 or npc.get_race()==8006 or npc.get_race()==8007 or npc.get_race()==8008 or npc.get_race()==8009 or npc.get_race()==8010 or npc.get_race()==8011 or npc.get_race()==8012 or npc.get_race()==8013 or npc.get_race()==8014 or npc.get_race()==8015 or npc.get_race()==8016 or npc.get_race()==8017 or npc.get_race()==8018 or npc.get_race()==8019 or npc.get_race()==8020 or npc.get_race()==8021 or npc.get_race()==8022 or npc.get_race()==8023 or npc.get_race()==8024 or npc.get_race()==8025 or npc.get_race()==8026 or npc.get_race()==8027 then
			local metinanzahl = pc.getqf("metins")+1
			pc.setqf("metins", metinanzahl)
			end
			if pc.getqf("metins") == 10 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 10")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 50 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 50 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 50")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 100 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 100 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 100")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 200 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 200 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 200")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 500 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 500 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 500")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 750 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 750 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 750")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 1000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 1000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 1000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 1250 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 1250 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 1250")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 1500 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 1500 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 1500")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 1750 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 1750 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 1750")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 2000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 2000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 2000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 2250 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 2250 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 2250")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 2500 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 2500 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 2500")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 2750 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 2750 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 2750")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 3000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 3000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 3000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 4000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 4000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 4000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 5000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 5000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 5000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 6000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 6000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 6000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 7000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 7000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 7000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 8000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 8000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 8000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 9000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 9000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 9000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat")
				say("                 Urmatorul eveniment va fi")
				say("                 la 10.000 pietre metin distruse.")
				say("                 Pana atunci spor la crescut")
				say("                 si la spart metine.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
			if pc.getqf("metins") == 10000 then
				setbgimage("MetinBoard.tga")
				setskin(4)
				say_negru("[ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER][ENTER]")
				say("                 Felicitari! Ai distrus 10.000")
				say("                 pietre metin.")
				say("                 Iti vei primi premiul si")
				say("                 anuntul pe chat.")
				say("                 Acesta a fost ultimul")
				say("                 eveniment la care vei fi")
				say("                 rasplatit regeste.")
				say("                 Va dorim un joc placut.")
				pc.give_item2(76013, 10)
				pc.give_item2(71084, 5)
				notice_all( pc.getname() , " a distrus pana acum "..pc.getqf("metins").." Pietre Metin.")
			end
		end
	end
end

Am si eu questul asta facut de mine in principiu merge dar cu mici erori spre exemplu daca sparg 10 metine apare de 2 ori pe chat de 2 ori recompensa de 2 ori tot daca sparg 100 metine apare de mai multe ori de vreo 10.Questul merge la calcul ca imi apare cand dau pe buton ca am spart .... metine dar imi da de mai multe ori.Am incercat sa ii pun state compleate dar nimic.Cineva care stie ce sa pun la sfarsitul fiecaruia din ele ceva care sa il deschida decat odata....

Problema quest

Quest-ing Problema quest

Problema quest

Problema quest.

PRoblema quest

Cine este conectat