http://anond.hatelabo.jp/20161015194043

gistfile1.txt

function! s:main() abort
  let s = '中華料理画像うｐよろしく'
  let cs = split(s, '\zs')
  let i = 0
  while i < len(cs)
    if i == 0
      echomsg s
    elseif i == len(cs) - 1
      echomsg join(reverse(cs), '')
    else
      echomsg cs[i] . repeat('＠', len(cs) - 2) . cs[-i - 1]
    endif
    let i = i + 1
  endwhile
endfunction

call s:main()