/reverse { 
  %reverse = $$?"test"
  %reverse = $replace(%reverse,$chr(32),$chr(160))
  %charcount = $len(%reverse)
  %output = ""
  while (%charcount) {
    %output = %output $+ $mid(%reverse,%charcount,1)
    dec %charcount
  }
  echo %output
  %output = $replace(%output,a,ɐ,b,q,c,É”,d,p,e,ǝ,f,ÉŸ,g,ƃ,h,É¥,i,ı,j,ɾ,k,Êž,l,ʃ,m,ɯ,n,U,o,o,p,d,q,b,r,ɹ,s,s,t,ʇ,u,n,v,ÊŒ,w,ʍ,x,x,y,ÊŽ,z,z,1,¹,2,²,3,³,$chr(160),$chr(32))
  echo %output
}