Miscellany

	function RSexp($lvl)	{		$lvl--;		$exp = 0;		$x = 1;		while ($x <= $lvl):			echo "<br /> $x - $exp - $tmpxp - $lvl <br />";			//$tmpxp = ( $x + 300 * 2 ^ ( $x / 7 ) ) / 4;						$tmpxp = $x / 7;			echo "tmpxp[1][1] - $tmpxp <br />";			$tmpxp3 = bcpow(2,$tmpxp);			$tmpxp2 = 300 * $tmpxp3;			$tmpxp2 = $x + $tmpxp2;			echo "tmpxp[2][1] - $tmpxp2 <br />";			echo "tmpxp[1][2] - $tmpxp3 <br />";			$tmpxp = floor($tmpxp3);			echo "tmpxp[1][3] - $tmpxp <br />";						$tmpxp = $tmpxp / 4;			echo "tmpxp[1][4] - $tmpxp <br />";			$exp = $exp + $tmpxp;			echo "exp[1][$x] - $exp <br />";			$x++;		endwhile;		return $exp;	}------------------------------------------------------------exp {  var %x = 1,%level = $calc($1 - 1),%xp = 0  while (%x <= %level) {    var %TempXp = $calc($floor($calc(%x + 300 * 2 ^ (%x / 7))) / 4)    inc %xp %TempXp    inc %x  }  return $int(%xp)}