function Convert-TexttoHEX
	{
	param([string]$string)
	$string.ToCharArray() | %{[Convert]::ChangeType($_,"Int32")} | %{ $Local:hex += ("{0:X} " -f $_)}
	return $Local:hex
	}
	
function Convert-HEXtoText
	{
	param([string]$string)
	$string.split(" ") |?{$_ -ne ""} |  %{[Convert]::ToInt32($_,16)} | %{$Local:text += [char]$_}
	Return $Local:text
	}