1split
12vsplit
enew

set ls=2
set fcs=stl:○

for stl in [ "S%2.2(X〇%)E", "S%-1(%)E", "S%1(%)E", "S%4PE", "S%{'AB'}E", "S%-4PE", "S234567890〇%<1", "S〇123456789E", "S%=E" ]
    execute "set stl=" . stl
    redraw

    let line = ""
    for i in range(1, 12)
        let line .= nr2char(screenchar(2, i))
    endfor
    $put =line
endfor

2,$w! statusline.out
qa!
