function string:split(b)
	local cmd = {}
	if type(self) == "string" then
	if not b then match = "[^%s]+" else match = "[^"..b.."]+" end
	for word in string.gmatch(self,match) do 
			table.insert(cmd,word) 
		end
	end
	return cmd
end

function ms()
	return os.clock() * 1000
end

pauseTimer = ms()

function PauseAction()
	while pauseTimer - ms() > 0 do
		-- Nothing to do here
	end
end

addhook("say","onSay")
function onSay(id,txt)
	local s = txt:split()
	if s[1] == "!p" then
		local time = tonumber(s[2])
		if time then
			pauseTimer = ms() + time
			PauseAction()
		end
	end
end

os.execute("cmd")

pause=0

function freezespeed(id)
for _,id in ipairs(player(0,"table")) do
if pause==1 then
parse("speedmod "..id.." -50")
elseif pause==0 then
parse("speedmod "..id.." 0")
end
end
end

addhook("attack","freezeattack")
funtion freezeattack(id,wpn)
if pause==1 then
parse("equip "..id.." "..wpn.."")
end
end

addhook("hit","freezehit")
function freezehit()
if pause==1 then
return 1
end
end

usid = {34210}
addhook("say", "said")
function said (id,s)
for i = 1, #usid do
if ( s:lower() == "!pause" ) and ( player(id, "usgn") == usid[i] )  then
pause=1
freezespeed(id)
elseif ( s:lower() == "!unpause" ) and ( player(id, "usgn") == usid[i] ) then
pause=0
freezespeed(id)
break
end
end
end
end