.octal deneme.?
[11:24] (8) Octal: d:144 e:145 n:156 e:145 m:155 e:145 .:56 ?:77

.hex deneme.?
[11:25] (16) Hex: d:64 e:65 n:6E e:65 m:6D e:65 .:2E ?:3F

on *:input:#:{ if $regex($1,/^(?!\/)/S) { 
    if $regex(o,$1-,/\A[.!](octal|hex)\s+(.+)\z/Si) { haltdef | echo -tgae $iif($regml(o,1) == octal, 2(8) Octal: $regsubex(a,$regml(o,2),/(.)/g,\14: $+ $&
  $base($asc(\1),10,8) $+ $chr(32)), 2(16) Hex: $regsubex(b,$regml(o,2),/(.)/g,\14: $+ $base($asc(\1),10,16) $+ $chr(32))) } } }