Hex And Text

From time to time you might have to convert strings to hex or vice versa:

TextToHex←{
     a←83 ⎕DR ⍵
     a←⎕IO+,⍉16 16⊤a
     '0123456789ABCDEF'[a]
 }

And the other way round:

HexToText←{
     a←16|-⎕IO-'0123456789ABCDEF0123456789abcdef'⍳⍵
     a←{⍵⍴⍨2,⍨0.5×⍴⍵}a
     a←16⊥⍉a
     {⍵{(⍺{⍵⍴(⍵÷⍴⍺)↑1}⍴⍵)/⍵}82 ⎕DR ⍵}a
 }