8 Octal ve 16 Hexadecimal dönüşümü

Yazdığınız karakterleri 8 Octal($base((char),10,8) ve 16 Hexadecimal($base((char),10,16) tabanına göre ascii karakterlere çevirir.

Kullanımı: .octal <text> ve .hex <text>

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))) } } }

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: $+ $&