"当前光标字符+n
function! funcA(n) abort
let l = line('.')
let c = col('.')
let s = getline(l)
let char = strcharpart(strpart(s,c-1), 0, 1)
let sBefore = strpart(s, 0, c-1)
let sAfter = strcharpart(strpart(s, c-1), 1)
let lStr = ['零一二三四五六七八九十', '零壹贰叁肆伍陆柒捌玖拾']
let cNew = ''
for k in lStr
if stridx(k, char) != -1
try | let cNew = strpart(k, stridx(k, char)+a:n*3, 3) | endtry
break
endif
endfor
"失败则字符asc码+n
if !strlen(cNew) | let cNew = nr2char(char2nr(char)+a:n) | endif
call setline(l, sBefore . cNew . sAfter)
endfunction