Cod: Selectaţi tot

quest energy_system begin
	state start begin
		when 20001.chat."Inima albastra" begin
			say_title("Alchimist")
			say("De curand a aparut o noua putere.")
			say("Fiecare monstru are un fragment de energie in el.")
			say("Eu iti pot spune cum poti sa il scoti")
			say("dar aceasta este o technica grea care")
			say("poate fi invatata de abia de la levelul 75.")
			wait()
			say_title("Alchimist")
			say("Daca ai strans destule fragmente de energie,")
			say("eu ti le pot topi, pentru a obtine un cristal.")
			say("Acel cristal iti da un bonus PvP sau PvM.")
			say("Astepta o secunda.Trebuie sa gasesc cartea ...")
			wait()
			say_reward("Ai invatat cum sa obtii fragmente si cum sa le topesti!")
			set_state("make")
		end
	end
	state make begin	
		when 20001.chat."Otinerea mult temutului cristals" begin
			say_title("Alchimist")
			say("Ah vrei sa obtii un cristal plin de energie?")
			say("Pentru a putea topi fragmentele trebuie sa ai")
			say("30 din ele si levelul 75.")
			wait()
			if pc.get_level() < 750 then
				say_title("Alchimist")
				say("Inca nu esti destul de puternic.")
				say("Dute, antreneazate si revino cand ai levelul 75!")
			else
				if pc.count_item(51001) >= 30 then
					say_title("Alchimist")
					say("Foarte bine! Ai strans toate cele 30 de fragmente.")
					say("Acum ti le pot topi pentru a obtine un cristal!")
					say("Asteapta un moment. O sa incerc sa le topesc.")
					say("Dar nu pot garanta ca o sa functioneze.")
					wait()
					say_title("Alchimist")
					say("Totul este pregatit pentru topire.")
					say("Dar eu trebuie sa si traiesc din ceva.")
					say("Uneltele mele nu cad din cer!")
					say("Am nevoie de o miiiica suma de bani.")
					say("Suma este de vreo 35kk Yang")
					say("Vrei sa platesti?")
					if select("Da, normal!","Nu, nu acum") == 2 then
						return
					end
					
					pc.change_money(-350000000)
					pc.remove_item(51001,30)
					
					if number(0,1) == 1 then
						say_title("Alchimist")
						say("A functionatt!")
						say("Poftim, aici ai cristalul.")
						say("Ii simti deja puterea?")
						pc.give_item2(51002,1)
					else -- NICHT DE
						say_title("Alchimist")
						say("Din pacate nu a functionat!")
						say("Imi pare rau!")
						return
					end
					
				else -- NICHT DE
					say_title("Alchimist")
					say("Din pacate nu ai cele 30 de fragmente, ")
					say("de care am nevoie. Pleaca!")
					return
				end
				
			end
		end
		
		when login begin
			if getenergytime() < 50000 then
				test_chat("[Energy]Restzeit: "..getenergytime())
				setenergytime(getenergytime() + get_time())
				cmdchat("energysystem "..getenergytyp().."|"..getenergyvalue().."#"..getenergytime())
			end
		end
		when logout begin
			if getenergytime() > get_time() then
				local energy = getenergytime() - get_time()
				if energy > 0 then
					setenergytime(energy)
				end
			end
		end
		
		when 51002.use begin
			if getenergytime() > get_time() then
				chat("Deja te folosesti de puterea unui cristal!")
				return
			end
			
			local anz = number(1,10)
			boni_list = {}
			boni_list [1] = {apply.ATTBONUS_HUMAN,	20}
			boni_list [2] = {apply.ATTBONUS_MONSTER,	15}
			boni_list [5] = {apply.MAX_HP,	3500}
			boni_list [6] = {apply.MAX_SP,	3000}
			boni_list [9] = {apply.ATT_GRADE_BONUS,	75}
			boni_list [10] = {apply.ATT_GRADE_BONUS,	50}
			
--			test_chat(anz)
--			test_chat(boni_list[anz][1])
--			test_chat(boni_list[anz][2])

			affect.add_collect(boni_list[anz][1],boni_list[anz][2],7200)
			setenergy(anz,boni_list[anz][2],get_time() + 7200)

			cmdchat("energysystem "..anz.."|"..boni_list[anz][2].."#"..(get_time() + 7200))
			
	--		setenergytime(get_time() + 7200)
			
			item.remove()
			chat("Simti puterea nemaipomenita a cristalului ..")
			
		end
	end
end