tde.shl

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

; 387
keyword fcos fprem1 fsin fsincos fucom fucomp fucompp
; P6 (686, PentiumPro, P2)
keyword fcmovb fcmovbe fcmove fcmovnb fcmovnbe fcmovne fcmovnu fcmovu fcomi
keyword fcomip fucomi fucomip fxrstor fxsave
; Prescott
keyword fisttp

; My macros and defines.

; Just because cxz can't be inverted doesn't mean cxnz shouldn't be.
; I created a macro to do just that.
keyword cxnz

; Additional pseudo-instructions
green dflg ib id iw dc d$ dz dln dl$ dlz CSTR STR$

; Inlined far call and jump
function icallf ijmpf

; Ignore inlined variable
comment  i

; Number processing
integer  hl bit

; Interrupts
function intr amis disk dos exit kbd mous mpx prch prnt$ vid win

; Suffixed instructions
keyword adcb adcw addb addw andb andw cmpb cmpw decb decw divb divw idivb idivw
keyword imulw imuld incb incw movb movw mulb mulw negb negw notb notw orb orw
keyword popw pushb pushw rclb rclw rcrb rcrw rolb rolw rorb rorw salb salw sarb
keyword sarw sbbb sbbw shlb shlw shrb shrw subb subw testb testw xorb xorw
keyword adcd  addd  andd cmpd decd divd  idivd
keyword imuld incd  movl muld negd notd  ord
keyword popd  pushd rcld rcrd rold rord  sald
keyword sard  sbbd  shll shrl subd testd xord
keyword callf jmpf

; "Enhanced" instructions
bright_magenta ld ldw ldd ldhl swap swapw swapd
bright_magenta sthl scs sds ses sfs sgs sss mmov mmovb mmovw mmovl mmovd
bright_magenta cmov cmovby cmovw cmovd
bright_magenta zero zerob zerow zerod isz iszb iszw iszd
bright_magenta jzr jzb jzw jzd jnzr jnzb jnzw jnzd
bright_magenta tflg sflg cflg iflg jflg jnflg
bright_magenta tbit tbits sbit cbit ibit cfbit
bright_magenta save savea restore uses return
bright_magenta retif retifb retifw retifd
bright_magenta jif jifb jifw jifd

; Control statements
brown ifz ifzb ifzw ifzd ifnz ifnzb ifnzw ifnzd
brown ifflg ifnflg
brown ifn if andif elif else fi
brown ifnb ifb andifb elifb fib
brown ifnw ifw andifw elifw fiw
brown ifnd ifd andifd elifd fid
brown repeat repeatr repeatb repeatw repeatd
brown until untilb untilw untild next nextb nextw nextd
brown repeat0 repeat0r repeat0b repeat0w repeat0d
brown rptlmt rptlmtb rptlmtw rptlmtd
brown for forb forw ford for0 for0b for0w for0d
brown do when while is whileb whilew whiled isb isw isd wend
brown whilst whilstb whilstw whilstd
brown break breakb breakw breakd cntnu cntnub cntnuw cntnud

; Pseudo-operators
symbol zr zb zw zd nzr nzb nzw nzd


;---------------------------------   Pascal   ---------------------------------

; Let's treat the TURBO Pascal {$ compiler directive as a preprocessor.
; These are the reserved words from Borland Pascal 7.0 (but GNU Pascal is
; probably very similar), as well as the predefined types.
language pascal
pattern *.pas *.p
case    ignore
keyword and          div      function        label    packed     string  while
keyword array        do       goto            library  procedure  then    with
keyword asm          downto   if              mod      program    to      xor
keyword begin        else     implementation  nil      record     type
keyword case         end      in              not      repeat     unit
keyword const        exports  inherited       object   set        until
keyword constructor  file     inline          of       shl        uses
keyword destructor   for      interface       or       shr        var
keyword absolute assembler export external far forward index interrupt near
keyword private public resident virtual
keyword break continue exit
keyword byte char integer longint pointer real shortint word
keyword boolean bytebool longbool wordbool
keyword false true maxint maxlongint
comment { }
comment (* *)
comment //
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