;; Kathy's asc chr part (little bit modified)
on *:text:*:#:{
if $1 == $me {
if $2 == asc {
if ($3) || ($3 == 0) {
var %number = $asc($left($3,1)),%number = $iif(%number,$ifmatch,0)
var %gettok = $calc(%number +1)
if (%number isnum 0-32) {
var %sighn = $gettok(NUL¢Start of Header¢Start of Text¢End of Text¢End of Transmission¢Enquiry¢Acknowledge¢Bell¢Backspace¢Horizontal Tab¢Line Feed¢Vertical Tab¢Form Feed¢Carriage Return¢Shift Out¢Shift In¢Delete¢-free-¢-free-¢-free-¢-free-¢Negative Acknowledge¢Sychronous Idle¢End of Transmission¢Cancel¢End of Medium¢Substidude¢Escape¢File Seperator¢Group Seperator¢Record Seperator¢Unit Seperator¢Space,%gettok,162)
}
msg # The asc value for $iif(%sighn,$ifmatch,$left($3,1)) is $asc($3)
}
}
if $2 == chr && $3 isnum 0-4294967295 {
var %number = $asc($chr($3)),%number = $iif(%number,$ifmatch,0)
var %gettok = $calc(%number +1)
if (%number isnum 0-32) {
var %sighn = $gettok(NUL¢Start of Header¢Start of Text¢End of Text¢End of Transmission¢Enquiry¢Acknowledge¢Bell¢Backspace¢Horizontal Tab¢Line Feed¢Vertical Tab¢Form Feed¢Carriage Return¢Shift Out¢Shift In¢Delete¢-free-¢-free-¢-free-¢-free-¢Negative Acknowledge¢Sychronous Idle¢End of Transmission¢Cancel¢End of Medium¢Substidude¢Escape¢File Seperator¢Group Seperator¢Record Seperator¢Unit Seperator¢Space,%gettok,162)
}
msg # Char %number stands for $iif(%sighn,$ifmatch,$chr(%number))
}
}
}