*
*  Syntax coloring when working in reverse video
*


*
*  C and C++ files
*
filetype c c++ h cpp c1 c2 c3 c4 c5 c6 rul cxx hpp hxx c% h%
  comment steelblue c
  string forestgreen c
  case respect
  keyword coral asm auto bad_cast bad_typeid break case catch char class const const_cast continue default delete do double else entry enum except extern finally float for friend goto if inline int long new operator private protected public register reinterpret_cast return short signed sizeof static static_cast struct switch template this throw try type_info typedef typeid union unsigned using virtual void volatile while xalloc
  match  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
  cpp  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end

*
*  YACC files
*
filetype y
  comment steelblue c
  string forestgreen c
  case respect
  keyword coral token type left right
  match  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
  cpp  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end


*
*  S/REXX Unix scripts
*
firstline srexx xsrexx msrexx wsrexx
  comment steelblue rexx
  string forestgreen  rexx
  case ignore
  keyword coral ADDRESS ARG BY CALL DIGITS DO DROP ELSE END ENGINEERING EXIT EXPOSE FOR FOREVE R FORM FUZZ IF INTERPRET ITERATE LEAVE LINEIN NOP NUMERIC OFF ON OTHERWISE PARSE PROCEDURE PULL PUSH QUEUE RETURN SAY SAYN SAYX SAYR SCIENTIFIC SELECT SIGNAL SOURCE THEN TO TRACE UNTIL UPPER VALUE VAR VERSION WHILE WITH WHEN ERROR FAILURE HALT NOVALUE SYNTAX TEMPLATE ENVIRON LOWER CD FUNCTION NAME NOTREADY SFUNCTION IN OPTION MIXED SETENV UNSETENV LOAD NOLOAD GLOBALV NOGLOBALV FOREVER
  match red blue maroon lemonchiffon lightcyan lightgoldenrod lightgoldenrodyellow lightseagreen orchid rosybrown sienna springgreen
end

*
*  S/REXX Windows script
*
filetype srx
  comment steelblue rexx
  string forestgreen  rexx
  case ignore
  keyword coral ADDRESS ARG BY CALL DIGITS DO DROP ELSE END ENGINEERING EXIT EXPOSE FOR FOREVE R FORM FUZZ IF INTERPRET ITERATE LEAVE LINEIN NOP NUMERIC OFF ON OTHERWISE PARSE PROCEDURE PULL PUSH QUEUE RETURN SAY SAYN SAYX SAYR SCIENTIFIC SELECT SIGNAL SOURCE THEN TO TRACE UNTIL UPPER VALUE VAR VERSION WHILE WITH WHEN ERROR FAILURE HALT NOVALUE SYNTAX TEMPLATE ENVIRON LOWER CD FUNCTION NAME NOTREADY SFUNCTION IN OPTION MIXED SETENV UNSETENV LOAD NOLOAD GLOBALV NOGLOBALV FOREVER
  match red blue maroon lemonchiffon lightcyan lightgoldenrod lightgoldenrodyellow lightseagreen orchid rosybrown sienna springgreen
end

*
*  S/REXX SEDIT macros
*
filetype sedit flist
  comment steelblue rexx
  string forestgreen  rexx
  case ignore
  keyword coral ADDRESS ARG BY CALL DIGITS DO DROP ELSE END ENGINEERING EXIT EXPOSE FOR FOREVE R FORM FUZZ IF INTERPRET ITERATE LEAVE LINEIN NOP NUMERIC OFF ON OTHERWISE PARSE PROCEDURE PULL PUSH QUEUE RETURN SAY SAYN SAYX SAYR SCIENTIFIC SELECT SIGNAL SOURCE THEN TO TRACE UNTIL UPPER VALUE VAR VERSION WHILE WITH WHEN ERROR FAILURE HALT NOVALUE SYNTAX TEMPLATE ENVIRON LOWER CD FUNCTION NAME NOTREADY SFUNCTION IN OPTION MIXED SETENV UNSETENV LOAD NOLOAD GLOBALV NOGLOBALV FOREVER
  match red blue maroon lemonchiffon lightcyan lightgoldenrod lightgoldenrodyellow lightseagreen orchid rosybrown sienna springgreen
end

#
# Internal SEDIT macros
#
filetype x
  comment steelblue sh
end

*
* C-SHELL scripts
*
firstline csh sh ksh tcsh
  comment steelblue sh
  string forestgreen  c
  case ignore
  keyword coral if then else do forever endif foreach end case esac echo set fi while done
  match red blue maroon lemonchiffon lightcyan lightgoldenrod lightgoldenrodyellow lightseagreen orchid rosybrown sienna springgreen
end

*
* WINDOWS C-SHELL scripts
*
filetype csh
  comment steelblue sh
  string forestgreen  c
  case ignore
  keyword coral if then else do forever endif foreach end case esac echo set fi while
  match red blue maroon lemonchiffon lightcyan lightgoldenrod lightgoldenrodyellow lightseagreen orchid rosybrown sienna springgreen
end

*
* FORTRAN FILES
*
filetype f F for fortran f90
  comment steelblue fortran
  string forestgreen fortran
  case ignore
  keyword coral allocate assign automatic backspace block byte call case character close common complex continue cycle data deallocate default dimension do double doublecomplex doubleprecision eject else elseif end enddo endfile endif entry equivalence exit external format function go goto if implicit include inquire integer intrinsic logical namelist open parameter pause precision print program read real record return rewind save select stop structure subroutine then to union while write until find wait goto if else then endif call do elseif enddo stop
  match  maroon lemonchiffon red orchid deeppink lightcyan rosybrown lightseagreen cyan sienna springgreen  lightgoldenrod sienna
  cpp  maroon lemonchiffon red orchid deeppink lightcyan rosybrown lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end

*
* LATEX files
*
filetype tex lat latex
  comment steelblue latex
  keyword coral  \documentstyle \grave \parindent \parskip \oddsidemargin \topmargin \textwidth \textheight \pagestyle \newcommand \font \begin \hspace \sr \ce \rightskip \leftskip \normalsize \rm \hfill \vspace \sq \french \hf \end \lb \ns \he \hg \nextp \npl \ss \bf \centerline \large \small \magstep \linebreak \em
  match  maroon lemonchiffon red orchid deeppink lightcyan rosybrown lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end

*
*  Java
*
filetype j jav java
  comment steelblue c
  string forestgreen c
  case respect
  variable object
  keyword coral abstract boolean break byte byvalue case cast catch char class const continue default do double else extends false final finally float for future generic goto if implements import inner instanceof int interface long native new null operator outer package private protected public rest return short static string super switch synchronized this threadsafe throw throws transient true try var void volatile while  match
  cpp  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end



*
*  Windows resource files
*
filetype rc dlg
  comment steelblue c
  string forestgreen c
  case ignore
  keyword coral accelerators auto3state autocheckbox autoradiobutton bitmap caption characteristics checkbox class combobox control ctext cursor defpushbutton dialog dialogex edittext exstyle font groupbox icon language listbox ltext menu menuex menuitem messagetable popup pushbox pushbutton radiobutton rcdata rtext scrollbar state stringtable style version versioninfo block value fileversion productversion fileflagsmask fileflags fileos filetype filesubtype discardable preload loadoncall fixed moveable pure impure begin end rcinclude dlginclude separator
  match  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
  cpp  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end

*
* APL functions
*
apl
  comment steelblue apl
  string forestgreen apl
  case respect
  match maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
* All XXXX are keywords, but we need one to specify the color
  keyword coral SHADOW
end


*
*  Cobol
*
filetype cbl
  comment steelblue cobol
  string forestgreen cobol
  case ignore
  keyword coral if or and go to move perform compute rounded thru through pic picture comp computational
  match  maroon lemonchiffon red orchid lightcyan rosybrown deeppink lightseagreen cyan sienna springgreen  lightgoldenrod sienna
end
