TrxShell [ mangaberri.com ]

Name	Size	Permission
aap.vim	331 B	-rw-r--r--
ada.vim	11.06 KB	-rw-r--r--
ant.vim	290 B	-rw-r--r--
automake.vim	243 B	-rw-r--r--
awk.vim	7.68 KB	-rw-r--r--
bash.vim	390 B	-rw-r--r--
basic.vim	250 B	-rw-r--r--
bib.vim	346 B	-rw-r--r--
bitbake.vim	583 B	-rw-r--r--
bst.vim	1.86 KB	-rw-r--r--
bzl.vim	2.86 KB	-rw-r--r--
c.vim	391 B	-rw-r--r--
cdl.vim	4.26 KB	-rw-r--r--
ch.vim	556 B	-rw-r--r--
chaiscript.vim	1.18 KB	-rw-r--r--
changelog.vim	264 B	-rw-r--r--
chatito.vim	731 B	-rw-r--r--
clojure.vim	11.29 KB	-rw-r--r--
cmake.vim	2.98 KB	-rw-r--r--
cobol.vim	8.63 KB	-rw-r--r--
config.vim	2.17 KB	-rw-r--r--
context.vim	1.67 KB	-rw-r--r--
cpp.vim	395 B	-rw-r--r--
cs.vim	1.88 KB	-rw-r--r--
css.vim	1.77 KB	-rw-r--r--
cucumber.vim	2.74 KB	-rw-r--r--
cuda.vim	371 B	-rw-r--r--
d.vim	605 B	-rw-r--r--
dictconf.vim	411 B	-rw-r--r--
dictdconf.vim	414 B	-rw-r--r--
docbk.vim	336 B	-rw-r--r--
dosbatch.vim	1.35 KB	-rw-r--r--
dtd.vim	11.79 KB	-rw-r--r--
dtrace.vim	451 B	-rw-r--r--
dts.vim	1.69 KB	-rw-r--r--
dune.vim	430 B	-rw-r--r--
dylan.vim	2.75 KB	-rw-r--r--
eiffel.vim	3.24 KB	-rw-r--r--
elm.vim	3.2 KB	-rw-r--r--
erlang.vim	50.74 KB	-rw-r--r--
eruby.vim	2.95 KB	-rw-r--r--
eterm.vim	743 B	-rw-r--r--
expect.vim	207 B	-rw-r--r--
falcon.vim	13.84 KB	-rw-r--r--
fennel.vim	273 B	-rw-r--r--
fish.vim	2.66 KB	-rw-r--r--
fortran.vim	7.72 KB	-rw-r--r--
framescript.vim	891 B	-rw-r--r--
freebasic.vim	237 B	-rw-r--r--
gdscript.vim	4.26 KB	-rw-r--r--
gitconfig.vim	841 B	-rw-r--r--
gitolite.vim	1.29 KB	-rw-r--r--
go.vim	1.73 KB	-rw-r--r--
gyp.vim	169 B	-rw-r--r--
haml.vim	2.19 KB	-rw-r--r--
hamster.vim	1.65 KB	-rw-r--r--
hare.vim	4.38 KB	-rw-r--r--
hog.vim	1.85 KB	-rw-r--r--
html.vim	33.12 KB	-rw-r--r--
htmldjango.vim	273 B	-rw-r--r--
idlang.vim	1.68 KB	-rw-r--r--
ishd.vim	1.83 KB	-rw-r--r--
j.vim	1.77 KB	-rw-r--r--
java.vim	4.19 KB	-rw-r--r--
javascript.vim	15.13 KB	-rw-r--r--
javascriptreact.vim	109 B	-rw-r--r--
json.vim	4.54 KB	-rw-r--r--
jsonc.vim	4.74 KB	-rw-r--r--
jsp.vim	462 B	-rw-r--r--
julia.vim	15.29 KB	-rw-r--r--
kotlin.vim	1.53 KB	-rw-r--r--
krl.vim	4.25 KB	-rw-r--r--
ld.vim	1.82 KB	-rw-r--r--
less.vim	243 B	-rw-r--r--
lifelines.vim	638 B	-rw-r--r--
liquid.vim	2.03 KB	-rw-r--r--
lisp.vim	349 B	-rw-r--r--
livebook.vim	206 B	-rw-r--r--
logtalk.vim	1.91 KB	-rw-r--r--
lua.vim	2.22 KB	-rw-r--r--
luau.vim	252 B	-rw-r--r--
mail.vim	385 B	-rw-r--r--
make.vim	3.48 KB	-rw-r--r--
matlab.vim	4.81 KB	-rw-r--r--
meson.vim	5.19 KB	-rw-r--r--
mf.vim	164 B	-rw-r--r--
mma.vim	2.31 KB	-rw-r--r--
mp.vim	9.72 KB	-rw-r--r--
nginx.vim	1.7 KB	-rw-r--r--
nsis.vim	3.23 KB	-rw-r--r--
objc.vim	1.65 KB	-rw-r--r--
obse.vim	1.4 KB	-rw-r--r--
ocaml.vim	9.09 KB	-rw-r--r--
occam.vim	4.63 KB	-rw-r--r--
pascal.vim	5.66 KB	-rw-r--r--
perl.vim	5.91 KB	-rw-r--r--
php.vim	25.76 KB	-rw-r--r--
postscr.vim	1.64 KB	-rw-r--r--
pov.vim	2.71 KB	-rw-r--r--
prolog.vim	1.91 KB	-rw-r--r--
ps1.vim	410 B	-rw-r--r--
pyrex.vim	326 B	-rw-r--r--
python.vim	886 B	-rw-r--r--
qb64.vim	232 B	-rw-r--r--
qml.vim	1.27 KB	-rw-r--r--
quarto.vim	23 B	-rw-r--r--
r.vim	13.96 KB	-rw-r--r--
racket.vim	2.87 KB	-rw-r--r--
raku.vim	3.45 KB	-rw-r--r--
raml.vim	285 B	-rw-r--r--
rapid.vim	7.97 KB	-rw-r--r--
readline.vim	786 B	-rw-r--r--
rhelp.vim	2.83 KB	-rw-r--r--
rmd.vim	2.25 KB	-rw-r--r--
rnoweb.vim	1.1 KB	-rw-r--r--
rpl.vim	1.82 KB	-rw-r--r--
rrst.vim	1.19 KB	-rw-r--r--
rst.vim	1.9 KB	-rw-r--r--
ruby.vim	30.33 KB	-rw-r--r--
rust.vim	10.26 KB	-rw-r--r--
sas.vim	5.18 KB	-rw-r--r--
sass.vim	926 B	-rw-r--r--
scala.vim	19.3 KB	-rw-r--r--
scheme.vim	372 B	-rw-r--r--
scss.vim	191 B	-rw-r--r--
sdl.vim	2.76 KB	-rw-r--r--
sh.vim	9.04 KB	-rw-r--r--
sml.vim	6.42 KB	-rw-r--r--
solidity.vim	12.61 KB	-rw-r--r--
sql.vim	1.18 KB	-rw-r--r--
sqlanywhere.vim	12.96 KB	-rw-r--r--
sshconfig.vim	796 B	-rw-r--r--
systemverilog.vim	10.55 KB	-rw-r--r--
tcl.vim	2.48 KB	-rw-r--r--
tcsh.vim	1.35 KB	-rw-r--r--
teraterm.vim	1.38 KB	-rw-r--r--
tex.vim	13.52 KB	-rw-r--r--
tf.vim	1.57 KB	-rw-r--r--
tilde.vim	1.11 KB	-rw-r--r--
treetop.vim	785 B	-rw-r--r--
typescript.vim	14.28 KB	-rw-r--r--
typescriptreact.vim	109 B	-rw-r--r--
vb.vim	4.69 KB	-rw-r--r--
verilog.vim	8.08 KB	-rw-r--r--
vhdl.vim	14.43 KB	-rw-r--r--
vim.vim	675 B	-rw-r--r--
vroom.vim	379 B	-rw-r--r--
vue.vim	385 B	-rw-r--r--
wat.vim	458 B	-rw-r--r--
xf86conf.vim	786 B	-rw-r--r--
xhtml.vim	325 B	-rw-r--r--
xinetd.vim	1.28 KB	-rw-r--r--
xml.vim	7.6 KB	-rw-r--r--
xsd.vim	253 B	-rw-r--r--
xslt.vim	297 B	-rw-r--r--
yacc.vim	858 B	-rw-r--r--
yaml.vim	5.45 KB	-rw-r--r--
zig.vim	2.09 KB	-rw-r--r--
zimbu.vim	3.92 KB	-rw-r--r--
zsh.vim	411 B	-rw-r--r--

Code Editor : rapid.vim

" ABB Rapid Command indent file for Vim
" Language: ABB Rapid Command
" Maintainer: Patrick Meiser-Knosowski <knosowski@graeffrobotics.de>
" Version: 2.2.7
" Last Change: 12. May 2023
" Credits: Based on indent/vim.vim
"
" Suggestions of improvement are very welcome. Please email me!
"
" Known bugs: ../doc/rapid.txt
"
" TODO
" * indent wrapped lines which do not end with an ; or special key word,
"     maybe this is a better idea, but then () and [] has to be changed as
"     well
"

if exists("g:rapidNoSpaceIndent")
  if !exists("g:rapidSpaceIndent")
    let g:rapidSpaceIndent = !g:rapidNoSpaceIndent
  endif
  unlet g:rapidNoSpaceIndent
endif

" Only load this indent file when no other was loaded.
if exists("b:did_indent") || get(g:,'rapidNoIndent',0)
  finish
endif
let b:did_indent = 1

setlocal nolisp
setlocal nosmartindent
setlocal autoindent
setlocal indentexpr=GetRapidIndent()
if get(g:,'rapidNewStyleIndent',0)
  setlocal indentkeys=!^F,o,O,0=~endmodule,0=~error,0=~undo,0=~backward,0=~endproc,0=~endrecord,0=~endtrap,0=~endfunc,0=~else,0=~endif,0=~endtest,0=~endfor,0=~endwhile,:,<[>,<]>,<(>,<)>
else
  setlocal indentkeys=!^F,o,O,0=~endmodule,0=~error,0=~undo,0=~backward,0=~endproc,0=~endrecord,0=~endtrap,0=~endfunc,0=~else,0=~endif,0=~endtest,0=~endfor,0=~endwhile,:
endif
let b:undo_indent="setlocal lisp< si< ai< inde< indk<"

if get(g:,'rapidSpaceIndent',1)
  " Use spaces for indention, 2 is enough. 
  " More or even tabs wastes space on the teach pendant.
  setlocal softtabstop=2
  setlocal shiftwidth=2
  setlocal expandtab
  setlocal shiftround
  let b:undo_indent = b:undo_indent." sts< sw< et< sr<"
endif

" Only define the function once.
if exists("*GetRapidIndent")
  finish
endif

let s:keepcpo= &cpo
set cpo&vim

function GetRapidIndent()
  let ignorecase_save = &ignorecase
  try
    let &ignorecase = 0
    return s:GetRapidIndentIntern()
  finally
    let &ignorecase = ignorecase_save
  endtry
endfunction

function s:GetRapidIndentIntern() abort

let l:currentLineNum = v:lnum
  let l:currentLine = getline(l:currentLineNum)

if  l:currentLine =~ '^!' && !get(g:,'rapidCommentIndent',0)
    " If current line is ! line comment, do not change indent
    " This may be useful if code is commented out at the first column.
    return 0
  endif

" Find a non-blank line above the current line.
  let l:preNoneBlankLineNum = s:RapidPreNoneBlank(v:lnum - 1)
  if  l:preNoneBlankLineNum == 0
    " At the start of the file use zero indent.
    return 0
  endif

let l:preNoneBlankLine = getline(l:preNoneBlankLineNum)
  let l:ind = indent(l:preNoneBlankLineNum)

" Add shiftwidth
  if l:preNoneBlankLine =~ l:addShiftwidthPattern
        \|| s:RapidLenTilStr(l:preNoneBlankLineNum, "then",     0)>=0
        \|| s:RapidLenTilStr(l:preNoneBlankLineNum, "else",     0)>=0
        \|| s:RapidLenTilStr(l:preNoneBlankLineNum, "do",       0)>=0
        \|| s:RapidLenTilStr(l:preNoneBlankLineNum, "case",     0)>=0
        \|| s:RapidLenTilStr(l:preNoneBlankLineNum, "default",  0)>=0
    let l:ind += &sw
  endif

" Subtract shiftwidth
  if l:currentLine =~ l:subtractShiftwidthPattern
        \|| s:RapidLenTilStr(l:currentLineNum, "endif",     0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "endfor",    0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "endwhile",  0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "endtest",   0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "else",      0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "elseif",    0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "case",      0)>=0
        \|| s:RapidLenTilStr(l:currentLineNum, "default",   0)>=0
    let l:ind = l:ind - &sw
  endif

" First case (or default) after a test gets the indent of the test.
  if (s:RapidLenTilStr(l:currentLineNum, "case", 0)>=0 || s:RapidLenTilStr(l:currentLineNum, "default", 0)>=0) && s:RapidLenTilStr(l:preNoneBlankLineNum, "test", 0)>=0
    let l:ind += &sw
  endif

" continued lines with () or []
  let l:OpenSum  = s:RapidLoneParen(l:preNoneBlankLineNum,"(") + s:RapidLoneParen(l:preNoneBlankLineNum,"[")
  if get(g:,'rapidNewStyleIndent',0)
    let l:CloseSum = s:RapidLoneParen(l:preNoneBlankLineNum,")") + s:RapidLoneParen(l:currentLineNum,"]")
  else
    let l:CloseSum = s:RapidLoneParen(l:preNoneBlankLineNum,")") + s:RapidLoneParen(l:preNoneBlankLineNum,"]")
  endif
  if l:OpenSum > l:CloseSum
    let l:ind += (l:OpenSum * 4 * &sw)
  elseif l:OpenSum < l:CloseSum
    let l:ind -= (l:CloseSum * 4 * &sw)
  endif

return l:ind
endfunction

" Returns the length of the line until a:str occur outside a string or
" comment. Search starts at string index a:startIdx.
" If a:str is a word also add word boundaries and case insensitivity.
" Note: rapidTodoComment and rapidDebugComment are not taken into account.
function s:RapidLenTilStr(lnum, str, startIdx) abort

let l:line = getline(a:lnum)
  let l:len  = strlen(l:line)
  let l:idx  = a:startIdx
  let l:str  = a:str
  if l:str =~ '^\k\+$'
    let l:str = '\c\<' . l:str . '\>'
  endif

while l:len > l:idx
    let l:idx = match(l:line, l:str, l:idx)
    if l:idx < 0
      " a:str not found
      return -1
    endif
    let l:synName = synIDattr(synID(a:lnum,l:idx+1,0),"name")
    if         l:synName != "rapidString"
          \&&  l:synName != "rapidConcealableString"
          \&& (l:synName != "rapidComment" || l:str =~ '^!')
      " a:str found outside string or line comment
      return l:idx
    endif
    " a:str is part of string or line comment
    let l:idx += 1 " continue search for a:str
  endwhile
  
  " a:str not found or l:len <= a:startIdx
  return -1
endfunction

" a:lchar should be one of (, ), [, ], { or }
" returns the number of opening/closing parentheses which have no
" closing/opening match in getline(a:lnum)
function s:RapidLoneParen(lnum,lchar) abort
  if a:lchar == "(" || a:lchar == ")"
    let l:opnParChar = "("
    let l:clsParChar = ")"
  elseif a:lchar == "[" || a:lchar == "]"
    let l:opnParChar = "["
    let l:clsParChar = "]"
  elseif a:lchar == "{" || a:lchar == "}"
    let l:opnParChar = "{"
    let l:clsParChar = "}"
  else
    return 0
  endif

let l:line = getline(a:lnum)

" look for the first ! which is not part of a string 
  let l:len = s:RapidLenTilStr(a:lnum,"!",0)
  if l:len == 0
    return 0 " first char is !; ignored
  endif

let l:opnParen = 0
  " count opening brackets
  let l:i = 0
  while l:i >= 0
    let l:i = s:RapidLenTilStr(a:lnum, l:opnParChar, l:i)
    if l:i >= 0
      let l:opnParen += 1
      let l:i += 1
    endif
  endwhile

let l:clsParen = 0
  " count closing brackets
  let l:i = 0
  while l:i >= 0
    let l:i = s:RapidLenTilStr(a:lnum, l:clsParChar, l:i)
    if l:i >= 0
      let l:clsParen += 1
      let l:i += 1
    endif
  endwhile

if (a:lchar == "(" || a:lchar == "[" || a:lchar == "{") && l:opnParen>l:clsParen
    return (l:opnParen-l:clsParen)
  elseif (a:lchar == ")" || a:lchar == "]" || a:lchar == "}") && l:clsParen>l:opnParen
    return (l:clsParen-l:opnParen)
  endif

return 0
endfunction

" This function works almost like prevnonblank() but handles %%%-headers and
" comments like blank lines
function s:RapidPreNoneBlank(lnum) abort

let nPreNoneBlank = prevnonblank(a:lnum)

while nPreNoneBlank>0 && getline(nPreNoneBlank) =~ '\v\c^\s*(\%\%\%|!)'
    " Previous none blank line irrelevant. Look further aback.
    let nPreNoneBlank = prevnonblank(nPreNoneBlank - 1)
  endwhile

return nPreNoneBlank
endfunction

let &cpo = s:keepcpo
unlet s:keepcpo

" vim:sw=2 sts=2 et

${this.title}

Code Editor : rapid.vim