<cffunction
	name="KillTime"
	access="public"
	returntype="void"
	output="false"
	hint="I kill time for the given miliseconds.">
 
	<!--- Define arguments. --->
	<cfargument name="MS" type="numeric" required="true" />
 
	<!--- Get start and end tick out values. --->
	<cfset var intStart = GetTickCount() />
	<cfset var intEnd = (intStart + ARGUMENTS.MS ) />
 
	<!--- Loop until this time is killed. --->
	<cfloop condition="(GetTickCount() LT intEnd)">
 
		<!--- Just try to kill some processing time. --->
		<cfset intStart = (intStart * Pi()) />
 
	</cfloop>
 
	<!--- Return out. --->
	<cfreturn />
</cffunction>