gvimrc

 

" .gvimrc

"

" Longer Chan's .gvimrc

" http://longerchan.blogcn.com

" 

" 2007-04-19

 

" always have syntax highlighting in with the gui:

syntax on

 

" window size:

set lines=40

 

" max window when open VIM

au GUIEnter * simalt ~x

 

" scroll bar at the left rather than the right:

"set guioptions+=r

"set guioptions-=l

 

" no menu, and no toolbar:

"set guioptions+=m

"set guioptions-=T

 

" have error messages red on white (rather than t'tother way round, which isn't

" readable in the above font):

highlight ErrorMsg guibg=White guifg=Red

function! GetProtoLine()

  let ret       = ""

  let line_save = line(".")

  let col_save  = col(".")

  let top       = line_save - winline() + 1

  let so_save = &so

  let &so = 0

  let istypedef = 0

  " find closing brace

  let closing_lnum = search('^}','cW')

  if closing_lnum > 0

    if getline(line(".")) =~ '/w/s*;/s*$'

      let istypedef = 1

      let closingline = getline(".")

    endif

    " go to the opening brace

    normal! %

    " if the start position is between the two braces

    if line(".") <= line_save

      if istypedef

        let ret = matchstr(closingline, '/w/+/s*;')

      else 

        " find a line contains function name

        let lnum = search('^/w','bcnW')

        if lnum > 0

          let ret = getline(lnum)

        endif

      endif

    endif

  endif

  " restore position and screen line

  exe "normal! " . top . "Gz/<CR>"

  call cursor(line_save, col_save)

  let &so = so_save

  return ret

endfunction

 

function! WhatFunction()

  if &ft != "c" && &ft != "cpp"

    return ""

  endif 

  let proto = GetProtoLine() 

  if proto == ""

    return "?"

  endif 

  if stridx(proto, '(') > 0

    let ret = matchstr(proto, '/w/+(/@=')

  elseif proto =~# '/<struct/>'

    let ret = matchstr(proto, 'struct/s/+/w/+')

  elseif proto =~# '/<class/>'

    let ret = matchstr(proto, 'class/s/+/w/+')

  else

    let ret = strpart(proto, 0, 15) . "..."

  endif 

  return ret

endfunction

 

 

" change status line

if has("statusline")

    set statusline=%<%f/ %{WhatFunction()}/%h%m%r%=%{/"[/".(&fenc==/"/"?&enc:&fenc).((exists(/"+bomb/")/ &&/ &bomb)?/",/":/"/")./"]/ /"}%k/ %-14.(%l,%c%V%)/ %P

" set statusline=%<%f/ %h%m%r%=%-20.(line=%l,col=%c%V,totlin=%L%)/%h%m%r%=%-40(,bytval=0x%B,%n%Y%)/%P

    " set statusline=%f:%{WhatFunction()}/ %m%=/ %l-%v/ %p%%/ %02B

endif

" set statusline=%F%m%r%h%w/ [FORMAT=%{&ff}]/ [TYPE=%Y]/ [POS=%l,%v][%p%%]/ %{strftime(/"%d/%m/%y/ -/ %H:%M/")}

 

" end of .gvimrc

 

 

"Best Regards.