# format number
	if($zahl==0)
	{ $zahl='0'; }
	else
	{
	$zahl=sprintf("%.${pos}f",$zahl);
	$zahl=~s/\.?0+$// if(index($zahl,'.')>0)
	}