runtime/syntax/kix.vim

   1 " Vim syntax file
   2 " Language:     KixTart 95, Kix2001 Windows script language http://kixtart.org/
   3 " Maintainer:   Richard Howarth <rhowarth@sgb.co.uk>
   4 " Last Change:  2003 May 11
   5 " URL:          http://www.howsoft.demon.co.uk/
   6
   7 " KixTart files identified by *.kix extension.
   8
   9 " Amendment History:
  10 " 26 April 2001: RMH
  11 "    Removed development comments from distro version
  12 "    Renamed "Kix*" to "kix*" for consistancy
  13 "    Changes made in preperation for VIM version 5.8/6.00
  14
  15 " TODO:
  16 "       Handle arrays highlighting
  17 "       Handle object highlighting
  18 " The next two may not be possible:
  19 "       Work out how to error too many "(", i.e. (() should be an error.
  20 "       Similarly, "if" without "endif" and similar constructs should error.
  21
  22 " Clear legacy syntax rules for version 5.x, exit if already processed for version 6+
  23 if version < 600
  24         syn clear
  25 elseif exists("b:current_syntax")
  26         finish
  27 endif
  28
  29 syn case match
  30 syn keyword kixTODO             TODO FIX XXX contained
  31
  32 " Case insensitive language.
  33 syn case ignore
  34
  35 " Kix statements
  36 syn match   kixStatement        "?"
  37 syn keyword kixStatement        beep big break
  38 syn keyword kixStatement        call cd cls color cookie1 copy
  39 syn keyword kixStatement        del dim display
  40 syn keyword kixStatement        exit
  41 syn keyword kixStatement        flushkb
  42 syn keyword kixStatement        get gets global go gosub goto
  43 syn keyword kixStatement        md
  44 syn keyword kixStatement        password play
  45 syn keyword kixStatement        quit
  46 syn keyword kixStatement        rd return run
  47 syn keyword kixStatement        set setl setm settime shell sleep small
  48 syn keyword kixStatement        use
  49
  50 " Kix2001
  51 syn keyword kixStatement        debug function endfunction redim
  52
  53 " Simple variables
  54 syn match   kixNotVar           "\$\$\|@@\|%%" transparent contains=NONE
  55 syn match   kixLocalVar         "\$\w\+"
  56 syn match   kixMacro            "@\w\+"
  57 syn match   kixEnvVar           "%\w\+"
  58
  59 " Destination labels
  60 syn match   kixLabel            ":\w\+\>"
  61
  62 " Identify strings, trap unterminated strings
  63 syn match   kixStringError      +".*\|'.*+
  64 syn region  kixDoubleString     oneline start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=kixLocalVar,kixMacro,kixEnvVar,kixNotVar
  65 syn region  kixSingleString     oneline start=+'+ skip=+\\\\\|\\'+ end=+'+ contains=kixLocalVar,kixMacro,kixEnvVar,kixNotVar
  66
  67 " Operators
  68 syn match   kixOperator         "+\|-\|\*\|/\|=\|&\||"
  69 syn keyword kixOperator         and or
  70 " Kix2001
  71 syn match   kixOperator         "=="
  72 syn keyword kixOperator         not
  73
  74 " Numeric constants
  75 syn match   kixInteger          "-\=\<\d\+\>" contains=NONE
  76 syn match   kixFloat            "-\=\.\d\+\>\|-\=\<\d\+\.\d\+\>" contains=NONE
  77
  78 " Hex numeric constants
  79 syn match   kixHex              "\&\x\+\>" contains=NONE
  80
  81 " Other contants
  82 " Kix2001
  83 syn keyword kixConstant         on off
  84
  85 " Comments
  86 syn match   kixComment          ";.*$" contains=kixTODO
  87
  88 " Trap unmatched parenthesis
  89 syn match   kixParenCloseError  ")"
  90 syn region  kixParen            oneline transparent start="(" end=")" contains=ALLBUT,kixParenCloseError
  91
  92 " Functions (Builtin + UDF)
  93 syn match   kixFunction         "\w\+("he=e-1,me=e-1 contains=ALL
  94
  95 " Trap unmatched brackets
  96 syn match   kixBrackCloseError  "\]"
  97 syn region  kixBrack            transparent start="\[" end="\]" contains=ALLBUT,kixBrackCloseError
  98
  99 " Clusters for ALLBUT shorthand
 100 syn cluster kixIfBut            contains=kixIfError,kixSelectOK,kixDoOK,kixWhileOK,kixForEachOK,kixForNextOK
 101 syn cluster kixSelectBut        contains=kixSelectError,kixIfOK,kixDoOK,kixWhileOK,kixForEachOK,kixForNextOK
 102 syn cluster kixDoBut            contains=kixDoError,kixSelectOK,kixIfOK,kixWhileOK,kixForEachOK,kixForNextOK
 103 syn cluster kixWhileBut         contains=kixWhileError,kixSelectOK,kixIfOK,kixDoOK,kixForEachOK,kixForNextOK
 104 syn cluster kixForEachBut       contains=kixForEachError,kixSelectOK,kixIfOK,kixDoOK,kixForNextOK,kixWhileOK
 105 syn cluster kixForNextBut       contains=kixForNextError,kixSelectOK,kixIfOK,kixDoOK,kixForEachOK,kixWhileOK
 106 " Condtional construct errors.
 107 syn match   kixIfError          "\<if\>\|\<else\>\|\<endif\>"
 108 syn match   kixIfOK             contained "\<if\>\|\<else\>\|\<endif\>"
 109 syn region  kixIf               transparent matchgroup=kixIfOK start="\<if\>" end="\<endif\>" contains=ALLBUT,@kixIfBut
 110 syn match   kixSelectError      "\<select\>\|\<case\>\|\<endselect\>"
 111 syn match   kixSelectOK         contained "\<select\>\|\<case\>\|\<endselect\>"
 112 syn region  kixSelect           transparent matchgroup=kixSelectOK start="\<select\>" end="\<endselect\>" contains=ALLBUT,@kixSelectBut
 113
 114 " Program control constructs.
 115 syn match   kixDoError          "\<do\>\|\<until\>"
 116 syn match   kixDoOK             contained "\<do\>\|\<until\>"
 117 syn region  kixDo               transparent matchgroup=kixDoOK start="\<do\>" end="\<until\>" contains=ALLBUT,@kixDoBut
 118 syn match   kixWhileError       "\<while\>\|\<loop\>"
 119 syn match   kixWhileOK          contained "\<while\>\|\<loop\>"
 120 syn region  kixWhile            transparent matchgroup=kixWhileOK start="\<while\>" end="\<loop\>" contains=ALLBUT,@kixWhileBut
 121 syn match   kixForNextError     "\<for\>\|\<to\>\|\<step\>\|\<next\>"
 122 syn match   kixForNextOK        contained "\<for\>\|\<to\>\|\<step\>\|\<next\>"
 123 syn region  kixForNext          transparent matchgroup=kixForNextOK start="\<for\>" end="\<next\>" contains=ALLBUT,@kixForBut
 124 syn match   kixForEachError     "\<for each\>\|\<in\>\|\<next\>"
 125 syn match   kixForEachOK        contained "\<for each\>\|\<in\>\|\<next\>"
 126 syn region  kixForEach          transparent matchgroup=kixForEachOK start="\<for each\>" end="\<next\>" contains=ALLBUT,@kixForEachBut
 127
 128 " Expressions
 129 syn match   kixExpression       "<\|>\|<=\|>=\|<>"
 130
 131
 132 " Default highlighting.
 133 " Version < 5.8 set default highlight if file not already processed.
 134 " Version >= 5.8 set default highlight only if it doesn't already have a value.
 135 if version > 508 || !exists("did_kix_syn_inits")
 136         if version < 508
 137                 let did_kix_syn_inits=1
 138                 command -nargs=+ HiLink hi link <args>
 139         else
 140                 command -nargs=+ HiLink hi def link <args>
 141         endif
 142
 143         HiLink kixDoubleString          String
 144         HiLink kixSingleString          String
 145         HiLink kixStatement             Statement
 146         HiLink kixRepeat                Repeat
 147         HiLink kixComment               Comment
 148         HiLink kixBuiltin               Function
 149         HiLink kixLocalVar              Special
 150         HiLink kixMacro                 Special
 151         HiLink kixEnvVar                Special
 152         HiLink kixLabel                 Type
 153         HiLink kixFunction              Function
 154         HiLink kixInteger               Number
 155         HiLink kixHex                   Number
 156         HiLink kixFloat                 Number
 157         HiLink kixOperator              Operator
 158         HiLink kixExpression            Operator
 159
 160         HiLink kixParenCloseError       Error
 161         HiLink kixBrackCloseError       Error
 162         HiLink kixStringError           Error
 163
 164         HiLink kixWhileError            Error
 165         HiLink kixWhileOK               Conditional
 166         HiLink kixDoError               Error
 167         HiLink kixDoOK                  Conditional
 168         HiLink kixIfError               Error
 169         HiLink kixIfOK                  Conditional
 170         HiLink kixSelectError           Error
 171         HiLink kixSelectOK              Conditional
 172         HiLink kixForNextError          Error
 173         HiLink kixForNextOK             Conditional
 174         HiLink kixForEachError          Error
 175         HiLink kixForEachOK             Conditional
 176
 177         delcommand HiLink
 178 endif
 179
 180 let b:current_syntax = "kix"
 181
 182 " vim: ts=8 sw=2