alias nohtml { 
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x) 
  return $remove(%x,&nbsp;,$chr(09)) 
}
alias c1 { return $+($chr(3),10,$1-) }
alias c2 { return $+($chr(3),03,$1-) }