For($i=0; $i -lt $instr.Length;  $i+=3)
	{
		$n0 = [convert]::ToInt32($instr[$i])
		$n1 = [convert]::ToInt32($instr[$i+1])
		$n2 = [convert]::ToInt32($instr[$i+2])
		$n = ($n0 -shl 16) + ($n1 -shl 8) + ($n2)
	}