2 " Language: FrameScript
3 " Maintainer: Nikolai Weibull <now@bitwi.se>
4 " Latest Revision: 2008-07-19
6 if exists("b:did_indent")
11 setlocal indentexpr=GetFrameScriptIndent()
12 setlocal indentkeys=!^F,o,O,0=~Else,0=~EndIf,0=~EndLoop,0=~EndSub
13 setlocal nosmartindent
15 if exists("*GetFrameScriptIndent")
19 function GetFrameScriptIndent()
20 let lnum = prevnonblank(v:lnum - 1)
26 if getline(v:lnum) =~ '^\s*\*'
27 return cindent(v:lnum)
30 let ind = indent(lnum)
32 if getline(lnum) =~? '^\s*\%(If\|Loop\|Sub\)'
36 if getline(v:lnum) =~? '^\s*\%(Else\|End\%(If\|Loop\|Sub\)\)'