focexec.vim (3527B)
1 " Vim syntax file 2 " Language: Focus Executable 3 " Maintainer: Rob Brady <robb@datatone.com> 4 " Last Change: $Date: 2004/06/13 15:38:04 $ 5 " URL: http://www.datatone.com/~robb/vim/syntax/focexec.vim 6 " $Revision: 1.1 $ 7 8 " this is a very simple syntax file - I will be improving it 9 " one thing is how to do computes 10 " I don't like that &vars and FUSE() functions highlight to the same color 11 " I think some of these things should get different highlights - 12 " should MODIFY commands look different than TABLE? 13 14 " quit when a syntax file was already loaded 15 if exists("b:current_syntax") 16 finish 17 endif 18 19 syn case match 20 21 " A bunch of useful keywords 22 syn keyword focexecTable TABLE SUM BY ACROSS END PRINT HOLD LIST NOPRINT 23 syn keyword focexecTable SUBFOOT SUBHEAD HEADING FOOTING PAGE-BREAK AS 24 syn keyword focexecTable WHERE AND OR NOSPLIT FORMAT 25 syn keyword focexecModify MODIFY DATA ON FIXFORM PROMPT MATCH COMPUTE 26 syn keyword focexecModify GOTO CASE ENDCASE TYPE NOMATCH REJECT INCLUDE 27 syn keyword focexecModify CONTINUE FROM 28 syn keyword focexecNormal CHECK FILE CREATE EX SET IF FILEDEF DEFINE 29 syn keyword focexecNormal REBUILD IF RECORDLIMIT FI EQ JOIN 30 syn keyword focexecJoin IN TO 31 syn keyword focexecFileDef DISK 32 syn keyword focexecSet MSG ALL 33 syn match focexecDash "-RUN" 34 syn match focexecDash "-PROMPT" 35 syn match focexecDash "-WINFORM" 36 37 " String and Character constants 38 syn region focexecString1 start=+"+ end=+"+ 39 syn region focexecString2 start=+'+ end=+'+ 40 41 "amper variables 42 syn match focexecAmperVar "&&\=[A-Z_]\+" 43 44 "fuse functions 45 syn keyword focexecFuse GETUSER GETUSR WHOAMI FEXERR ASIS GETTOK UPCASE LOCASE 46 syn keyword focexecFuse SUBSTR TODAY TODAYI POSIT HHMMSS BYTVAL EDAUT1 BITVAL 47 syn keyword focexecFuse BITSON FGETENV FPUTENV HEXBYT SPAWN YM YMI JULDAT 48 syn keyword focexecFuse JULDATI DOWK DOWKI DOWKLI CHGDAT CHGDATI FTOA ATODBL 49 syn keyword focexecFuse SOUNDEX RJUST REVERSE PARAG OVRLAY LJUST CTRFLD CTRAN 50 syn keyword focexecFuse CHKFMT ARGLEN GREGDT GREGDTI DTYMD DTYMDI DTDMY DTDMYI 51 syn keyword focexecFuse DTYDM DTYDMI DTMYD DTMYDI DTDYM DTDYMI DAYMD DAYMDI 52 syn keyword focexecFuse DAMDY DAMDYI DADMY DADMYI AYM AYMI AYMD AYMDI CHKPCK 53 syn keyword focexecFuse IMOD FMOD DMOD PCKOUT EXP BAR SPELLNM SPELLNUM RTCIVP 54 syn keyword focexecFuse PRDUNI PRDNOR RDNORM RDUNIF LCWORD ITOZ RLPHLD IBIPRO 55 syn keyword focexecFuse IBIPRW IBIPRC IBIPRU IBIRCP PTHDAT ITOPACK ITONUM 56 syn keyword focexecFuse DSMEXEC DSMEVAL DSMERRC MSMEXEC MSMEVAL MSMERRC EXTDXI 57 syn keyword focexecFuse BAANHASH EDAYSI DTOG GTOD HSETPT HPART HTIME HNAME 58 syn keyword focexecFuse HADD HDIFF HDATE HGETC HCNVRT HDTTM HMIDNT TEMPPATH 59 syn keyword focexecFuse DATEADD DATEDIF DATEMOV DATECVT EURHLD EURXCH FINDFOC 60 syn keyword focexecFuse FERRMES CNCTUSR CURRPATH USERPATH SYSTEM ASKYN 61 syn keyword focexecFuse FUSEMENU POPEDIT POPFILE 62 63 syn match focexecNumber "\<\d\+\>" 64 syn match focexecNumber "\<\d\+\.\d*\>" 65 66 syn match focexecComment "-\*.*" 67 68 " Define the default highlighting. 69 " Only when an item doesn't have highlighting yet 70 71 hi def link focexecString1 String 72 hi def link focexecString2 String 73 hi def link focexecNumber Number 74 hi def link focexecComment Comment 75 hi def link focexecTable Keyword 76 hi def link focexecModify Keyword 77 hi def link focexecNormal Keyword 78 hi def link focexecSet Keyword 79 hi def link focexecDash Keyword 80 hi def link focexecFileDef Keyword 81 hi def link focexecJoin Keyword 82 hi def link focexecAmperVar Identifier 83 hi def link focexecFuse Function 84 85 86 let b:current_syntax = "focexec" 87 88 " vim: ts=8