function mycommandfunction(ply,command,args)
Msg(ply:Nick().." did command "..command.."with arg 1"..args[1])
end
concommand.Add("testfunction",mycommandfunction)