sub test()
  uo.textprint( code("hello world!") ) # uryyb jbeyq!
  uo.textprint( code("uryyb jbeyq!") ) # hello world!
endsub

sub code( str )
  var s = '', len = strlen(str), map = "abcdefghijklmnopqrstuvwxyz", f = false
  var a, t, n, j, m, r, e, k = 26
  for var i = 0 to len - 1
    j = 0
    f = false
    t = mid( str, i, 1 )
    while (not f && j < k)
      a = mid( map, j, 1)
      if a == t then
        f = true
        r = j + k / 2
        n = 0
        e = false
        while not e
          if ((r / k) - int(r / k)) == 0 then
            e = true
          else
            r = r - 1
            n = n + 1
          endif
        wend
        s = s + mid( map, n, 1)
      endif
      j = j + 1
    wend
    if not f then
      s = s + t
    endif
  next
  return s
endsub