
SuperStrict

Function ShadowText:Int (msg:String, x:Float, y:Float)

	Local red:Int, green:Int, blue:Int
	
	GetColor red, green, blue
	
	SetColor 0, 0, 0
	DrawText msg, x + 1, y + 1

	SetColor 255, 255, 255
	DrawText msg, x, y

	SetColor red, green, blue

End Function

Function TruncateFloat:String (num:Float, decimals:Int)

	Local float_value:String = num
	
	Local pos:Int = Instr (float_value, ".")
	
	If pos
		Return float_value [..pos + decimals]
	EndIf
	
End Function
