Przerobienie questa

[watus]

oto quest

quest SystemPunktow begin
	state start begin
		when login or levelup with pc.get_level() >= 1 begin
			setstate(odbierz_misje)
		end
	end
	
	state odbierz_misje begin
		when letter begin
			send_letter(" Zdobywaj punkty ")
			local v = find_npc_by_vnum(20011)
				if v != 0 then
					target.vid("__TARGET__", v,"Uriel")
				end
		end
		
		when button or info begin
			say_title(" Punkty za bicie metinów. ")
			say(" Zdobywaj punkty za bicie metinów. Udaj się do Uriela. ")
		end
		
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say_title("Uriel:")
			say(" Witaj "..pc.get_name().." mam do Ciebie ")
			say(" dobrą wiadomość. ")
			say(" Za bicie metinów będziesz otrzymywał punkty. ")
			say(" Punktów  otrzymasz tyle o jakim lvl rozbiłeś metina. ")
			say(" Punkty możesz wymieniać na + do statystyk, hp, int, atak, zręczność. ")
			clear_letter()
			setstate(drop)
		end
	end
	
	state drop begin
		when kill with npc.get_race() >= 8001 and npc.get_race() <= 8014 or npc.get_race() >= 8024 and npc.get_race() <= 8027 begin 
			local nagrody = {
			[8001] = "5",
			[8002] = "10",
			[8003] = "15",
			[8004] = "20",
			[8005] = "25",
			[8006] = "30",
			[8007] = "35",
			[8008] = "40",
			[8009] = "45",
			[8010] = "50",
			[8011] = "55",
			[8012] = "60",
			[8013] = "65",
			[8014] = "70",
			[8024] = "75",
			[8025] = "80",
			[8026] = "85",
			[8027] = "90"
			}
			pc.give_item2(9994, nagrody[npc.get_race()])
		end
		
		when 20011.chat."Wymień punkty za metiny" begin
			say_title(" Wymień punkty na statystyki. ")
			say(" Czy chcesz wymienić punkty statystyk? ")
			say(" 20pkt red/blue potki 200 ")
			say(" 50pkt fiol/ziel potki 200 ")
			say(" 150pkt/50 HP/1 szybkosc_ataku/1 szycie/1 kryt ")
			say(" 250pkt/100 HP/2 szybkosc_ataku/1 szycie/1 kryt ")
			say(" 500pkt/250 HP/5 szybkosc_ataku/1 szycie/1 kryt ")
			say(" 750pkt/400 HP/8 szybkosc_ataku/1 szycie/1 kryt ")
			say(" 1000pkt/550 HP/10 szybkosc_ataku/100 Wartosc ataku/1 kryt ")
			say(" 1250pkt/700 HP/12 szybkosc_ataku/150 Wartosc ataku/1 kryt ")
			say(" 1500pkt/900 HP/15 szybkosc_ataku/200 Wartosc ataku/1 kryt ")
			local s = select("Wymieniam","Nie wymieniam")
				if s == 1 then
					if pc.count_item(9994) >= 1500 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 900, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 15, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(53, 200, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 1500)
					elseif pc.count_item(9994) >= 1250 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 700, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 12, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(53, 150, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 1250)
					elseif pc.count_item(9994) >= 1000 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 550, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 10, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(53, 100, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 1000)
					elseif pc.count_item(9994) >= 750 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 400, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 8, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(16, 1, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 750)
					elseif pc.count_item(9994) >= 500 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 250, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 5, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(16, 1, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 500)
					elseif pc.count_item(9994) >= 250 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 100, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 2, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(16, 1, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 250)
					elseif pc.count_item(9994) >= 150 then
						local rand = math.random(4)
							if rand == 1 then
								affect.add_collect(apply.MAX_HP, 50, 60*60*24*365)
							elseif rand == 2 then
								affect.add_collect(7, 1, 60*60*24*365)
							elseif rand == 3 then
								affect.add_collect(16, 1, 60*60*24*365)
							elseif rand == 4 then
								affect.add_collect(15, 1, 60*60*24*365)
							end
							pc.remove_item(9994, 150)
					elseif pc.count_item(9994) >= 50 then
						local rand = math.random(2)
							if rand == 1 then
								pc.give_item2(27105, 200)
							else
								pc.give_item2(27102, 200)
							end
							pc.remove_item(9994, 50)
					elseif pc.count_item(9994) >= 20 then
						local rand = math.random(2)
							if rand == 1 then
								pc.give_item2(27003, 200)
							else
								pc.give_item2(27006, 200)
							end
							pc.remove_item(9994, 20)
					end
				end
		end
	end
end

potrzebuję, aby ktoś przerobił mi tego questa w następujący sposób:

-dodać czas co ile można wymieniać punkty na 10minut, z informacją ile czasu zostało (info o czasie nie musi być koniecznie)

-bonus HP ma być dodawany poprzez funkcję query