alias h2t {
  var %x = 1
  var %text = $replace($1-,\x,$chr(255))
  while (%x <= $numtok(%text,255)) {
echo -ag Inside loop %x
var %tmp = $replace($1-,\x,$chr(255)
echo -ag Done replace.
var %tmp = $gettok(%tmp,%x,255)
echo -ag Done gettok.
var %tmp = $base(%tmp,16,10)
echo -ag Done base.
    %check = $chr(%tmp)
echo -ag Done chr.
    var %hex = %hex $iif(%check != $chr(32),$+) %check
echo -ag Done iif.
    inc %x
  }
  echo -a %hex
}