$h = $h + (1/$tot)*$pos; if ($h > 1) $h = $h - 1;