$if($stricmp($get(ch),'a'),'a',
$if($stricmp($get(ch),'b'),'b',$if($stricmp($get(ch),'c'),'c',$if($stricmp($get(ch),'d'),'d',$if($stricmp($get(ch),'e'),'e',
$if($stricmp($get(ch),'f'),'f',$if($stricmp($get(ch),'g'),'g',$if($stricmp($get(ch),'h'),'h',$if($stricmp($get(ch),'i'),'i',
$if($stricmp($get(ch),'j'),'j',$if($stricmp($get(ch),'k'),'k',$if($stricmp($get(ch),'l'),'l',$if($stricmp($get(ch),'m'),'m',
$if($stricmp($get(ch),'n'),'n',$if($stricmp($get(ch),'o'),'o',$if($stricmp($get(ch),'p'),'p',$if($stricmp($get(ch),'q'),'q',
$if($stricmp($get(ch),'r'),'r',$if($stricmp($get(ch),'s'),'s',$if($stricmp($get(ch),'t'),'t',$if($stricmp($get(ch),'u'),'u',
$if($stricmp($get(ch),'v'),'v',$if($stricmp($get(ch),'w'),'w',$if($stricmp($get(ch),'x'),'x',$if($stricmp($get(ch),'y'),'y',
$if($stricmp($get(ch),'z'),'z',$if($stricmp($get(ch),'0'),'#',$if($stricmp($get(ch),'1'),'#',$if($stricmp($get(ch),'2'),'#',
$if($stricmp($get(ch),'3'),'#',$if($stricmp($get(ch),'4'),'#',$if($stricmp($get(ch),'5'),'#',$if($stricmp($get(ch),'6'),'#',
$if($stricmp($get(ch),'7'),'#',$if($stricmp($get(ch),'8'),'#',$if($stricmp($get(ch),'9'),'#',$if($stricmp($get(ch),'+'),'#',
$if($stricmp($get(ch),'-'),'#',$if($stricmp($get(ch),'/'),'#',$if($stricmp($get(ch),'*'),'#','~'))))))))))))))))))))))))))))))))))))))))
You can shorten this to: