tdedist.shl

一个开源著名的TDE编辑器源代码

preprocessor {$
function  (
string    '
hex       $-
startword _
inword    _
innumber  #


;----------------------------------   Ada   -----------------------------------

; Ada and Ada 95
; Contributed by Zhu QunYing ([e-mail])
; some common predefined types are added as keyword after "xor"
language ada
pattern *.ad[abs]
case    ignore
comment --
keyword abort abs abstract accept access aliased all and array at
keyword begin body
keyword case constant
keyword declare delay delta digits do
keyword else elsif end entry exception exit
keyword for function
keyword generic goto
keyword if in is
keyword limited loop
keyword mod
keyword new not null
keyword of or others out
keyword package pragma private procedure protected
keyword raise range record rem renames requeue return reverse
keyword select separate subtype
keyword tagged task terminate then type
keyword until use
keyword when while with
keyword xor
keyword Boolean Character Wide_Character Integer Float Duration File_type
keyword String Wide_String Natural Positive
; function will also highlight arrays - jmh
function  (
inword    _'
character '
string    """"
; Based numbers will be displayed as integers or reals and won't be tested for
; correctness - "2#123#", "2#001" will not be shown as bad. Integer exponents
; will be shown as real.
innumber _#a-f


;---------------------------------   Batch   ----------------------------------

; DOS/Windows batch files. Treat labels as preprocessor statements and : as
; comment (for :: lines, but it's also inword so it won't affect paths).
language batch
pattern  *.bat *.cmd
case     ignore
; Internal commands
comment  rem
keyword  break   del         for       path    shift
keyword  call    dir         goto      pause   time
keyword  cd      do          if        prompt  ver
keyword  chcp    echo        lh        rd      verify
keyword  chdir   erase       loadhigh  ren     vol
keyword  cls     errorlevel  md        rename
keyword  copy    exist       mkdir     rmdir
keyword  date    exit        not       set
; Since . is inword (for filenames) need another keyword
keyword  echo.
; Additional keywords for CMD.EXE
keyword  else defined setlocal endlocal
keyword   enableextensions  enabledelayedexpansion
keyword  disableextensions disabledelayedexpansion
keyword  equ neq lss leq gtr geq
; Common external commands
keyword  choice deltree mode move xcopy

preprocessor :
comment      :  ; stuffs up :eof, but you can't have everything
string    """"
startword \_
inword    :\_~.
innumber  a-z


;----------------------------------   4DOS   ----------------------------------

; 4DOS batch files. Taken from RHIDE's syntaxhl.shl file.
language 4dos
pattern  *.btm
case     ignore
string   `
preprocessor :
startword \_
inword    :\_~.
innumber  a-z
comment  rem
Keyword  alias and attrib beep break by call cancel cd cdd chcp chdir cls
Keyword  color copy ctty date delay del describe dirs dir do drawbox
Keyword  drawhline drawvline  echos echo else elseiff enddo endiff endlocal
Keyword  erase errorlevel eset except exist exit fc find format for free
Keyword  global gosub goto history iff if inkey input iterate keybd leave
Keyword  lh list loadbtm loadhigh log md memory mem mkdir mode more move
Keyword  not on or path pause popd print prompt pushd quit rd reboot rename
Keyword  ren replace return rmdir screen scrput select setdos setlocal
Keyword  setver set shift sort start subst sys tee text then timer time to
Keyword  tree type unalias undelete unset until verify ver vol vscrput while
Keyword  window xcopy xor


;----------------------------------   HTML   ----------------------------------

; Originally from Elvis, I've updated it with HTML 4.0, Netscape and Microsoft
; extensions, from the "Bare Bones Guide to HTML" by Kevin Werbach.
language html
pattern *.html *.htm
case    ignore
comment   <!-- -->
startword <
inword    / -
keyword <a </a <abbr </abbr <acronym </acronym <address </address
keyword <applet </applet <area
keyword <b </b <base <basefont <bdo </bdo <bgsound <big </big <blink </blink
keyword <blockquote </blockquote <body </body <br <button </button
keyword <caption </caption <center </center <cite </cite <code </code
keyword <col </col <colgroup </colgroup
keyword <dd <del </del <dfn </dfn <dir </dir <div </div <dl </dl <dt
keyword <em </em <embed
keyword <fieldset </fieldset <font </font <form </form <frame </frame
keyword <frameset </frameset
keyword <h1 </h1 <h2 </h2 <h3 </h3 <h4 </h4 <h5 </h5 <h6 </h6
keyword <head </head <hr <html </html
keyword <i </i <iframe </iframe <ilayer </ilayer <img <input <ins </ins <isindex
keyword <kbd </kbd
keyword <label </label <large </large <layer </layer <legend </legend <li </li
keyword <link </link
keyword <map </map <marquee </marquee <menu </menu <meta <multicol </multicol
keyword <nobr </nobr <noframes </noframes <nolayer </nolayer
keyword <noscript </noscript
keyword <object </object <ol </ol <optgroup </optgroup <option
keyword <p </p <param <pre </pre
keyword <q </q
keyword <s </s <samp </samp <script </script <select </select <server </server
keyword <small </small <spacer <span </span <strike </strike <strong </strong
keyword <style </style <sub </sub <sup </sup
keyword <table </table <tbody </tbody <td </td <textarea <tfoot </tfoot <th </th
keyword <thead </thead <title </title <tr </tr <tt </tt
keyword <u </u <ul </ul
keyword <var </var
keyword <wbr
keyword <xmp </xmp
innumber  a-z
function  =
;character ' 0  newline         ; too much interference from apostrophe
character &; 6                  ; may cause problems with '&' by itself
string    """" newline


;----------------------------------   Java   ----------------------------------

; Note that ".jav" is offered as a possible file name extension for
; folks who're still using MS-DOS or Windows 3.1.
language java
pattern *.java *.jav
keyword abstract boolean break byte byvalue case cast catch char class
keyword const continue default do double else extends false final finally
keyword float for future generic goto if implements import inner instanceof
keyword int interface long native new null operator outer package private
keyword protected public rest return short static super switch synchronized
keyword this throw throws transient true try var void volatile while
comment //
comment /* */
function (
string    """"
character ' 0
escape    \
octal     0-
hex       0x-
startword _
inword    _
innumber  dflu


;----------------------------------   PHP   -----------------------------------

; This version contributed by Eric Pement. The keyword list is not exhaustive.
language php

; Include files temporarily assigned to PHP
pattern *.php *.inc

keyword __LINE__ __FILE__ PHP_OS PHP_VERSION TRUE FALSE NULL E_ERROR E_NOTICE
keyword E_PARSE E_WARNING E_ALL E_USER_ERROR E_USER_WARNING E_USER_NOTICE
keyword DEFAULT_INCLUDE_PATH PHP_BINDIR PHP_LIBDIR PHP_DATADIR PHP_SYSCONFDIR
keyword PHP_LOCALSTATEDIR PHP_CONFIG_FILE_PATH SORT_ASC SORT_DESC SORT_STRING
keyword SORT_REGULAR SORT_NUMERIC LOCK_SH LOCK_EX LOCK_UN LOCK_NB ENT_COMPAT
keyword HTML_SPECIALCHARS HTML_ENTITIES INFO_GENERAL INFO_CREDITS INFO_ALL
keyword INFO_VARIABLES INFO_LICENSE PHP_OUTPUT_HANDLER_START STR_PAD_RIGHT
keyword STR_PAD_LEFT STR_PAD_BOTH PHP_OUTPUT_HANDLER_CONT ENT_QUOTES
keyword PHP_OUTPUT_HANDLER_END ENT_NOQUOTES LC_CTYPE LC_NUMERIC LC_TIME
keyword LC_COLLATE LC_MONETARY LC_ALL LC_MESSAGES
keyword and as break case class continue declare do echo else elseif endfor
keyword endforeach endif endswitch endwhile exit extends default for foreach
keyword global if include include_once next or require require_once return
keyword static switch then var while xor private throw catch try instanceof
keyword print
; Assorted keywords for PHP types
keyword array bool boolean char const double float int integer long mixed
keyword object real string
; PHP superglobal variables
symbol _GET _POST _COOKIE _SESSION _ENV GLOBALS SERVER _FILES _REQUEST
;
comment   #
comment   //
comment   /* */
comment   <!-- -->
function  (
startword $
inword    _
string    """" newline
character ' 0 newline
escape    \
innumber  .


;--------------------------------   VBScript   --------------------------------

; Contributed by Eric Pement (eric.pement [at] moody [dot] edu)
language vbscript
; jmh - use it for BASIC, too.
pattern *.asp *.vbs *.bas
case    ignore
keyword Call Case Const Dim Do Each Else ElseIf End Erase Error Exit Explicit
keyword For keyword Function If In Loop Next On Option Public Private Randomize
keyword ReDim Resume Select Set Step Sub To Then Wend While
keyword Empty False Nothing Null True And Eqv Imp Is Mod Not Or Xor
keyword Abs Array Asc Atn CBool CByte CCur CDate CDbl Chr Cint CLng Cos
keyword CreateObject CSng CStr Date DateAdd DateDiff DatePart DateSerial
keyword DateValue Day Exp Filter Fix FormatCurrency FormatDateTime FormatNumber
keyword FormatPercent GetObject Hex Hour InputBox InStr InStr InStrRev Int
keyword IsArray IsDate IsEmpty IsNull IsNumeric IsObject Join LBound LCase Left
keyword Len LoadPicture Log LTrim Mid Minute Month MonthName MsgBox Now Oct
keyword Replace RGB Right Rnd Round RTrim ScriptEngine ScriptEngineBuildVersion
keyword ScriptEngineMajorVersion ScriptEngineMinorVersion Second Sgn Sin Space
keyword Split Sqr StrComp String StrReverse Tan Time TimeSerial TimeValue Trim
keyword TypeName UBound UCase VarType Weekday WeekdayName Year
keyword Dictionary Err Add AddFolders BuildPath Clear Close Copy CopyFile
keyword CopyFolder CreateFolder CreateTextFile Delete DeleteFile DeleteFolder
keyword DriveExists Exists Write WriteBlankLines WriteLine AtEndOfLine
keyword AtEndOfStream Attributes AvailableSpace Column CompareMode Count
keyword DateCreated DateLastAccessed DateLastModified Description Drive
keyword DriveLetter Drives DriveType Type VolumeName
comment  '
function (
string   """" newline
inword   _


;----------------------------------   AWK   -----------------------------------

; This is actually for Thompson Automation's AWK compiler, which is
; somewhat beefier than the standard AWK interpretter.
language awk
pattern *.awk
keyword BEGIN BEGINFILE END ENDFILE INIT break continue do else for function
keyword global if in local next return while
comment #
function (
string """" spanline \
escape \


;-------------------------------   Make files   -------------------------------

; Imakefiles.  This one is interesting because '#' is both the preprocessor
; character and the comment character.  A '#' in the first column is displayed
; as a preprocessor directive, and anywhere else as the start of a comment.
language imakefile
pattern  *Imakefile.*
comment  #
comment  /* */
preprocessor #
startword /.$
inword    /.$()


; Makefiles.  Note that file names like "Makefile" & "makefile" are recognized.
; The keywords listed here are actually just common names for pseudo-targets.
; The word characters include anything that's commonly used in a filename.
; Any word followed by a : will be displayed in the function color.
language  make
pattern   *[mM]akefile *[mM]akefile.*
keyword   all clean depend install uninstall
comment   #
startword /\.$_
inword    /\.$()_
function  :