function accelerate(v0, r)

	--[[--
	v0 = initial velocity Magnitude
	r = rate of change for the velocity (AKA dv/dt or just a)

	we assume r is a constant
	v is the instantaneous velocity MAGNITUDE

	v = integral(r, t) + v0
	v = r*t + v0
	--]]--

	if r > 1 then r = r/100 end
	r = r * v0
	local fn = string.format([[
	return function(t)
		return (t*%s + %s)
	end
	]],r, v0)
	fn = loadstring(fn)
	if fn then
		return fn()
	else
		return nil
	end
end


instantVelocity = accelerate(10, .3)

local delay = .1 -- Delay is dt
t = os.clock() -- Time we'll be using.

while t < .8+delay do
	if (t + delay < os.clock()) then

		print("Time: "..t, "Speed: "..instantVelocity(t))
		t = os.clock()
	end

end

addhook("always", "speed")
player_speed = {}

function speed(p)
	for p, tab in pairs(player_speed) do
		if os.clock() < (tab.inverval + tab.t) then
			parse("speedmod "..p.." "..tab.fn(os.clock() - tab.t))
		else
			player_speed[p] = nil
		end
	end
end

function add_speed(p, r, interval)
	local v0 = player(p, "speedmod")
	player_speed[p] = {fn = accelerate(v0, r), t = os.clock(), inverval = interval}
end

sample.ut.timer=initArray(32)

if (os.clock()-sample.ut.timer[killer])>3 then
		sample.ut.level[killer]=0;
	end

if (os.clock()-sample.ut.timer[killer])>3 then
		sample.ut.level[killer]=0;
	end

sample.ut.level[victim]=0;