runtime/syntax/lscript.vim

   1 " Vim syntax file
   2 " Language:     LotusScript
   3 " Maintainer:   Taryn East (taryneast@hotmail.com)
   4 " Last Change:  2003 May 11
   5
   6 " This is a rough  amalgamation of the visual basic syntax file, and the UltraEdit
   7 " and Textpad syntax highlighters.
   8 " It's not too brilliant given that a) I've never written a syntax.vim file before
   9 " and b) I'm not so crash hot at LotusScript either. If you see any problems
  10 " feel free to email me with them.
  11
  12 " For version 5.x: Clear all syntax items
  13 " For version 6.x: Quit when a syntax file was already loaded
  14 if version < 600
  15   syntax clear
  16 elseif exists("b:current_syntax")
  17   finish
  18 endif
  19
  20 " LotusScript is case insensitive
  21 syn case ignore
  22
  23 " These are Notes thingies that had an equivalent in the vb highlighter
  24 " or I was already familiar with them
  25 syn keyword lscriptStatement ActivateApp As And Base Beep Call Case ChDir ChDrive Class
  26 syn keyword lscriptStatement Const Dim Declare DefCur DefDbl DefInt DefLng DefSng DefStr
  27 syn keyword lscriptStatement DefVar Do Else %Else ElseIf %ElseIf End %End Erase Event Exit
  28 syn keyword lscriptStatement Explicit FileCopy FALSE For ForAll Function Get GoTo GoSub
  29 syn keyword lscriptStatement If %If In Is Kill Let List Lock Loop MkDir
  30 syn keyword lscriptStatement Name Next New NoCase NoPitch Not Nothing NULL
  31 syn keyword lscriptStatement On Option Or PI Pitch Preserve Private Public
  32 syn keyword lscriptStatement Property Public Put
  33 syn keyword lscriptStatement Randomize ReDim Reset Resume Return RmDir
  34 syn keyword lscriptStatement Select SendKeys SetFileAttr Set Static Sub Then To TRUE
  35 syn keyword lscriptStatement Type Unlock Until While WEnd With Write XOr
  36
  37 syn keyword lscriptDatatype Array Currency Double Integer Long Single String String$ Variant
  38
  39 syn keyword lscriptNotesType Field Button Navigator
  40 syn keyword lscriptNotesType NotesACL NotesACLEntry NotesAgent NotesDatabase NotesDateRange
  41 syn keyword lscriptNotesType NotesDateTime NotesDbDirectory NotesDocument
  42 syn keyword lscriptNotesType NotesDocumentCollection NotesEmbeddedObject NotesForm
  43 syn keyword lscriptNotesType NotesInternational NotesItem NotesLog NotesName NotesNewsLetter
  44 syn keyword lscriptNotesType NotesMIMEEntry NotesOutline NotesOutlineEntry NotesRegistration
  45 syn keyword lscriptNotesType NotesReplication NotesRichTextItem NotesRichTextParagraphStyle
  46 syn keyword lscriptNotesType NotesRichTextStyle NotesRichTextTab
  47 syn keyword lscriptNotesType NotesSession NotesTimer NotesView NotesViewColumn NotesViewEntry
  48 syn keyword lscriptNotesType NotesViewEntryCollection NotesViewNavigator NotesUIDatabase
  49 syn keyword lscriptNotesType NotesUIDocument NotesUIView NotesUIWorkspace
  50
  51 syn keyword lscriptNotesConst ACLLEVEL_AUTHOR ACLLEVEL_DEPOSITOR ACLLEVEL_DESIGNER
  52 syn keyword lscriptNotesConst ACLLEVEL_EDITOR ACLLEVEL_MANAGER ACLLEVEL_NOACCESS
  53 syn keyword lscriptNotesConst ACLLEVEL_READER ACLTYPE_MIXED_GROUP ACLTYPE_PERSON
  54 syn keyword lscriptNotesConst ACLTYPE_PERSON_GROUP ACLTYPE_SERVER ACLTYPE_SERVER_GROUP
  55 syn keyword lscriptNotesConst ACLTYPE_UNSPECIFIED ACTIONCD ALIGN_CENTER
  56 syn keyword lscriptNotesConst ALIGN_FULL ALIGN_LEFT ALIGN_NOWRAP ALIGN_RIGHT
  57 syn keyword lscriptNotesConst ASSISTANTINFO ATTACHMENT AUTHORS COLOR_BLACK
  58 syn keyword lscriptNotesConst COLOR_BLUE COLOR_CYAN COLOR_DARK_BLUE COLOR_DARK_CYAN
  59 syn keyword lscriptNotesConst COLOR_DARK_GREEN COLOR_DARK_MAGENTA COLOR_DARK_RED
  60 syn keyword lscriptNotesConst COLOR_DARK_YELLOW COLOR_GRAY COLOR_GREEN COLOR_LIGHT_GRAY
  61 syn keyword lscriptNotesConst COLOR_MAGENTA COLOR_RED COLOR_WHITE COLOR_YELLOW
  62 syn keyword lscriptNotesConst DATABASE DATETIMES DB_REPLICATION_PRIORITY_HIGH
  63 syn keyword lscriptNotesConst DB_REPLICATION_PRIORITY_LOW DB_REPLICATION_PRIORITY_MED
  64 syn keyword lscriptNotesConst DB_REPLICATION_PRIORITY_NOTSET EFFECTS_EMBOSS
  65 syn keyword lscriptNotesConst EFFECTS_EXTRUDE EFFECTS_NONE EFFECTS_SHADOW
  66 syn keyword lscriptNotesConst EFFECTS_SUBSCRIPT EFFECTS_SUPERSCRIPT EMBED_ATTACHMENT
  67 syn keyword lscriptNotesConst EMBED_OBJECT EMBED_OBJECTLINK EMBEDDEDOBJECT ERRORITEM
  68 syn keyword lscriptNotesConst EV_ALARM EV_COMM EV_MAIL EV_MISC EV_REPLICA EV_RESOURCE
  69 syn keyword lscriptNotesConst EV_SECURITY EV_SERVER EV_UNKNOWN EV_UPDATE FONT_COURIER
  70 syn keyword lscriptNotesConst FONT_HELV FONT_ROMAN FORMULA FT_DATABASE FT_DATE_ASC
  71 syn keyword lscriptNotesConst FT_DATE_DES FT_FILESYSTEM FT_FUZZY FT_SCORES FT_STEMS
  72 syn keyword lscriptNotesConst FT_THESAURUS HTML ICON ID_CERTIFIER ID_FLAT
  73 syn keyword lscriptNotesConst ID_HIERARCHICAL LSOBJECT MIME_PART NAMES NOTESLINKS
  74 syn keyword lscriptNotesConst NOTEREFS NOTES_DESKTOP_CLIENT NOTES_FULL_CLIENT
  75 syn keyword lscriptNotesConst NOTES_LIMITED_CLIENT NUMBERS OTHEROBJECT
  76 syn keyword lscriptNotesConst OUTLINE_CLASS_DATABASE OUTLINE_CLASS_DOCUMENT
  77 syn keyword lscriptNotesConst OUTLINE_CLASS_FOLDER OUTLINE_CLASS_FORM
  78 syn keyword lscriptNotesConst OUTLINE_CLASS_FRAMESET OUTLINE_CLASS_NAVIGATOR
  79 syn keyword lscriptNotesConst OUTLINE_CLASS_PAGE OUTLINE_CLASS_UNKNOWN
  80 syn keyword lscriptNotesConst OUTLINE_CLASS_VIEW OUTLINE_OTHER_FOLDERS_TYPE
  81 syn keyword lscriptNotesConst OUTLINE_OTHER_UNKNOWN_TYPE OUTLINE_OTHER_VIEWS_TYPE
  82 syn keyword lscriptNotesConst OUTLINE_TYPE_ACTION OUTLINE_TYPE_NAMEDELEMENT
  83 syn keyword lscriptNotesConst OUTLINE_TYPE_NOTELINK OUTLINE_TYPE_URL PAGINATE_BEFORE
  84 syn keyword lscriptNotesConst PAGINATE_DEFAULT PAGINATE_KEEP_TOGETHER
  85 syn keyword lscriptNotesConst PAGINATE_KEEP_WITH_NEXT PICKLIST_CUSTOM PICKLIST_NAMES
  86 syn keyword lscriptNotesConst PICKLIST_RESOURCES PICKLIST_ROOMS PROMPT_OK PROMPT_OKCANCELCOMBO
  87 syn keyword lscriptNotesConst PROMPT_OKCANCELEDIT PROMPT_OKCANCELEDITCOMBO PROMPT_OKCANCELLIST
  88 syn keyword lscriptNotesConst PROMPT_OKCANCELLISTMULT PROMPT_PASSWORD PROMPT_YESNO
  89 syn keyword lscriptNotesConst PROMPT_YESNOCANCEL QUERYCD READERS REPLICA_CANDIDATE
  90 syn keyword lscriptNotesConst RICHTEXT RULER_ONE_CENTIMETER RULER_ONE_INCH SEV_FAILURE
  91 syn keyword lscriptNotesConst SEV_FATAL SEV_NORMAL SEV_WARNING1 SEV_WARNING2
  92 syn keyword lscriptNotesConst SIGNATURE SPACING_DOUBLE SPACING_ONE_POINT_50
  93 syn keyword lscriptNotesConst SPACING_SINGLE STYLE_NO_CHANGE TAB_CENTER TAB_DECIMAL
  94 syn keyword lscriptNotesConst TAB_LEFT TAB_RIGHT TARGET_ALL_DOCS TARGET_ALL_DOCS_IN_VIEW
  95 syn keyword lscriptNotesConst TARGET_NEW_DOCS TARGET_NEW_OR_MODIFIED_DOCS TARGET_NONE
  96 syn keyword lscriptNotesConst TARGET_RUN_ONCE TARGET_SELECTED_DOCS TARGET_UNREAD_DOCS_IN_VIEW
  97 syn keyword lscriptNotesConst TEMPLATE TEMPLATE_CANDIDATE TEXT TRIGGER_AFTER_MAIL_DELIVERY
  98 syn keyword lscriptNotesConst TRIGGER_BEFORE_MAIL_DELIVERY TRIGGER_DOC_PASTED
  99 syn keyword lscriptNotesConst TRIGGER_DOC_UPDATE TRIGGER_MANUAL TRIGGER_NONE
 100 syn keyword lscriptNotesConst TRIGGER_SCHEDULED UNAVAILABLE UNKNOWN USERDATA
 101 syn keyword lscriptNotesConst USERID VC_ALIGN_CENTER VC_ALIGN_LEFT VC_ALIGN_RIGHT
 102 syn keyword lscriptNotesConst VC_ATTR_PARENS VC_ATTR_PUNCTUATED VC_ATTR_PERCENT
 103 syn keyword lscriptNotesConst VC_FMT_ALWAYS VC_FMT_CURRENCY VC_FMT_DATE VC_FMT_DATETIME
 104 syn keyword lscriptNotesConst VC_FMT_FIXED VC_FMT_GENERAL VC_FMT_HM VC_FMT_HMS
 105 syn keyword lscriptNotesConst VC_FMT_MD VC_FMT_NEVER VC_FMT_SCIENTIFIC
 106 syn keyword lscriptNotesConst VC_FMT_SOMETIMES VC_FMT_TIME VC_FMT_TODAYTIME VC_FMT_YM
 107 syn keyword lscriptNotesConst VC_FMT_YMD VC_FMT_Y4M VC_FONT_BOLD VC_FONT_ITALIC
 108 syn keyword lscriptNotesConst VC_FONT_STRIKEOUT VC_FONT_UNDERLINE VC_SEP_COMMA
 109 syn keyword lscriptNotesConst VC_SEP_NEWLINE VC_SEP_SEMICOLON VC_SEP_SPACE
 110 syn keyword lscriptNotesConst VIEWMAPDATA VIEWMAPLAYOUT VW_SPACING_DOUBLE
 111 syn keyword lscriptNotesConst VW_SPACING_ONE_POINT_25 VW_SPACING_ONE_POINT_50
 112 syn keyword lscriptNotesConst VW_SPACING_ONE_POINT_75 VW_SPACING_SINGLE
 113
 114 syn keyword lscriptFunction Abs Asc Atn Atn2 ACos ASin
 115 syn keyword lscriptFunction CCur CDat CDbl Chr Chr$ CInt CLng Command Command$
 116 syn keyword lscriptFunction Cos CSng CStr
 117 syn keyword lscriptFunction CurDir CurDir$ CVar Date Date$ DateNumber DateSerial DateValue
 118 syn keyword lscriptFunction Day Dir Dir$ Environ$ Environ EOF Error Error$ Evaluate Exp
 119 syn keyword lscriptFunction FileAttr FileDateTime FileLen Fix Format Format$ FreeFile
 120 syn keyword lscriptFunction GetFileAttr GetThreadInfo Hex Hex$ Hour
 121 syn keyword lscriptFunction IMESetMode IMEStatus Input Input$ InputB InputB$
 122 syn keyword lscriptFunction InputBP InputBP$ InputBox InputBox$ InStr InStrB InStrBP InstrC
 123 syn keyword lscriptFunction IsA IsArray IsDate IsElement IsList IsNumeric
 124 syn keyword lscriptFunction IsObject IsResponse IsScalar IsUnknown LCase LCase$
 125 syn keyword lscriptFunction Left Left$ LeftB LeftB$ LeftC
 126 syn keyword lscriptFunction LeftBP LeftBP$ Len LenB LenBP LenC Loc LOF Log
 127 syn keyword lscriptFunction LSet LTrim LTrim$ MessageBox Mid Mid$ MidB MidB$ MidC
 128 syn keyword lscriptFunction Minute Month Now Oct Oct$ Responses Right Right$
 129 syn keyword lscriptFunction RightB RightB$ RightBP RightBP$ RightC Round Rnd RSet RTrim RTrim$
 130 syn keyword lscriptFunction Second Seek Sgn Shell Sin Sleep Space Space$ Spc Sqr Str Str$
 131 syn keyword lscriptFunction StrConv StrLeft StrleftBack StrRight StrRightBack
 132 syn keyword lscriptFunction StrCompare Tab Tan Time Time$ TimeNumber Timer
 133 syn keyword lscriptFunction TimeValue Trim Trim$ Today TypeName UCase UCase$
 134 syn keyword lscriptFunction UniversalID Val Weekday Year
 135
 136 syn keyword lscriptMethods AppendToTextList ArrayAppend ArrayReplace ArrayGetIndex
 137 syn keyword lscriptMethods Append Bind Close
 138 "syn keyword lscriptMethods Contains
 139 syn keyword lscriptMethods CopyToDatabase CopyAllItems Count CurrentDatabase Delete Execute
 140 syn keyword lscriptMethods GetAllDocumentsByKey GetDatabase GetDocumentByKey
 141 syn keyword lscriptMethods GetDocumentByUNID GetFirstDocument GetFirstItem
 142 syn keyword lscriptMethods GetItems GetItemValue GetNthDocument GetView
 143 syn keyword lscriptMethods IsEmpty IsNull %Include Items
 144 syn keyword lscriptMethods Line LBound LoadMsgText Open Print
 145 syn keyword lscriptMethods RaiseEvent ReplaceItemValue Remove RemoveItem Responses
 146 syn keyword lscriptMethods Save Stop UBound UnprocessedDocuments Write
 147
 148 syn keyword lscriptEvents Compare OnError
 149
 150 "*************************************************************************************
 151 "These are Notes thingies that I'm not sure how to classify as they had no vb equivalent
 152 " At a wild guess I'd put them as Functions...
 153 " if anyone sees something really out of place... tell me!
 154
 155 syn keyword lscriptFunction Access Alias Any Bin Bin$ Binary ByVal
 156 syn keyword lscriptFunction CodeLock CodeLockCheck CodeUnlock CreateLock
 157 syn keyword lscriptFunction CurDrive CurDrive$ DataType DestroyLock Eqv
 158 syn keyword lscriptFunction Erl Err Fraction From FromFunction FullTrim
 159 syn keyword lscriptFunction Imp Int Lib Like ListTag LMBCS LSServer Me
 160 syn keyword lscriptFunction Mod MsgDescription MsgText Output Published
 161 syn keyword lscriptFunction Random Read Shared Step UChr UChr$ Uni Unicode
 162 syn keyword lscriptFunction Until Use UseLSX UString UString$ Width Yield
 163
 164
 165 syn keyword lscriptTodo contained       TODO
 166
 167 "integer number, or floating point number without a dot.
 168 syn match  lscriptNumber                "\<\d\+\>"
 169 "floating point number, with dot
 170 syn match  lscriptNumber                "\<\d\+\.\d*\>"
 171 "floating point number, starting with a dot
 172 syn match  lscriptNumber                "\.\d\+\>"
 173
 174 " String and Character constants
 175 syn region  lscriptString               start=+"+  end=+"+
 176 syn region  lscriptComment              start="REM" end="$" contains=lscriptTodo
 177 syn region  lscriptComment              start="'"   end="$" contains=lscriptTodo
 178 syn region  lscriptLineNumber   start="^\d" end="\s"
 179 syn match   lscriptTypeSpecifier        "[a-zA-Z0-9][\$%&!#]"ms=s+1
 180
 181 " Define the default highlighting.
 182 " For version 5.7 and earlier: only when not done already
 183 " For version 5.8 and later: only when an item doesn't have highlighting yet
 184 if version >= 508 || !exists("did_lscript_syntax_inits")
 185   if version < 508
 186     let did_lscript_syntax_inits = 1
 187     command -nargs=+ HiLink hi link <args>
 188   else
 189     command -nargs=+ HiLink hi def link <args>
 190   endif
 191
 192   hi lscriptNotesType   term=underline ctermfg=DarkGreen guifg=SeaGreen gui=bold
 193
 194   HiLink lscriptNotesConst      lscriptNotesType
 195   HiLink lscriptLineNumber      Comment
 196   HiLink lscriptDatatype        Type
 197   HiLink lscriptNumber          Number
 198   HiLink lscriptError           Error
 199   HiLink lscriptStatement       Statement
 200   HiLink lscriptString          String
 201   HiLink lscriptComment         Comment
 202   HiLink lscriptTodo            Todo
 203   HiLink lscriptFunction        Identifier
 204   HiLink lscriptMethods         PreProc
 205   HiLink lscriptEvents          Special
 206   HiLink lscriptTypeSpecifier   Type
 207
 208   delcommand HiLink
 209 endif
 210
 211 let b:current_syntax = "lscript"
 212
 213 " vim: ts=8