function! Box_clear ()
    mapclear!
    map <space> :<C-U>call Flip_box()<CR>
    map b i[ ] <ESC>hhh
    set laststatus=2
    set statusline=%f\ %=\ \[ChkB[x]\ spc,b]\ (%v,%l)
endfunction
call Box_clear()

function! Flip_box ()
    s!\[ \]![xXx]!eg
    s!\[x\]![ ]!eg
    s!\[xXx\]![x]!eg
endfunction