" Vim syntax file" Language:	Focus Executable" Maintainer:	Rob Brady <robb@datatone.com>" Last Change:	$Date: 2004/06/13 15:38:04 $" URL:		http://www.datatone.com/~robb/vim/syntax/focexec.vim" $Revision: 1.1 $ " this is a very simple syntax file - I will be improving it" one thing is how to do computes" I don't like that &vars and FUSE() functions highlight to the same color" I think some of these things should get different hilights -"  should MODIFY commands look different than TABLE? " For version 5.x: Clear all syntax items" For version 6.x: Quit when a syntax file was already loadedif version < 600  syntax clearelseif exists("b:current_syntax")  finishendif syn case match " A bunch of useful keywordssyn keyword focexecTable	TABLE SUM BY ACROSS END PRINT HOLD LIST NOPRINTsyn keyword focexecTable	SUBFOOT SUBHEAD HEADING FOOTING PAGE-BREAK ASsyn keyword focexecTable	WHERE AND OR NOSPLIT FORMATsyn keyword focexecModify	MODIFY DATA ON FIXFORM PROMPT MATCH COMPUTEsyn keyword focexecModify	GOTO CASE ENDCASE TYPE NOMATCH REJECT INCLUDEsyn keyword focexecModify	CONTINUE FROMsyn keyword focexecNormal	CHECK FILE CREATE EX SET IF FILEDEF DEFINEsyn keyword focexecNormal	REBUILD IF RECORDLIMIT FI EQ JOINsyn keyword focexecJoin		IN TOsyn keyword focexecFileDef	DISKsyn keyword focexecSet		MSG ALLsyn match   focexecDash		"-RUN"syn match   focexecDash		"-PROMPT"syn match   focexecDash		"-WINFORM" " String and Character constantssyn region  focexecString1	start=+"+ end=+"+syn region  focexecString2	start=+'+ end=+'+ "amper variablessyn match   focexecAmperVar	"&&\=[A-Z_]\+" "fuse functionssyn keyword focexecFuse GETUSER GETUSR WHOAMI FEXERR ASIS GETTOK UPCASE LOCASEsyn keyword focexecFuse SUBSTR TODAY TODAYI POSIT HHMMSS BYTVAL EDAUT1 BITVALsyn keyword focexecFuse BITSON FGETENV FPUTENV HEXBYT SPAWN YM YMI JULDATsyn keyword focexecFuse JULDATI DOWK DOWKI DOWKLI CHGDAT CHGDATI FTOA ATODBLsyn keyword focexecFuse SOUNDEX RJUST REVERSE PARAG OVRLAY LJUST CTRFLD CTRANsyn keyword focexecFuse CHKFMT ARGLEN GREGDT GREGDTI DTYMD DTYMDI DTDMY DTDMYIsyn keyword focexecFuse DTYDM DTYDMI DTMYD DTMYDI DTDYM DTDYMI DAYMD DAYMDIsyn keyword focexecFuse DAMDY DAMDYI DADMY DADMYI AYM AYMI AYMD AYMDI CHKPCKsyn keyword focexecFuse IMOD FMOD DMOD PCKOUT EXP BAR SPELLNM SPELLNUM RTCIVPsyn keyword focexecFuse PRDUNI PRDNOR RDNORM RDUNIF LCWORD ITOZ RLPHLD IBIPROsyn keyword focexecFuse IBIPRW IBIPRC IBIPRU IBIRCP PTHDAT ITOPACK ITONUMsyn keyword focexecFuse DSMEXEC DSMEVAL DSMERRC MSMEXEC MSMEVAL MSMERRC EXTDXIsyn keyword focexecFuse BAANHASH EDAYSI DTOG GTOD HSETPT HPART HTIME HNAMEsyn keyword focexecFuse HADD HDIFF HDATE HGETC HCNVRT HDTTM HMIDNT TEMPPATHsyn keyword focexecFuse DATEADD DATEDIF DATEMOV DATECVT EURHLD EURXCH FINDFOCsyn keyword focexecFuse FERRMES CNCTUSR CURRPATH USERPATH SYSTEM ASKYNsyn keyword focexecFuse FUSEMENU POPEDIT POPFILE syn match   focexecNumber	"\<\d\+\>"syn match   focexecNumber	"\<\d\+\.\d*\>" syn match   focexecComment	"-\*.*" " Define the default highlighting." For version 5.7 and earlier: only when not done already" For version 5.8 and later: only when an item doesn't have highlighting yetif version >= 508 || !exists("did_focexec_syntax_inits")  if version < 508    let did_focexec_syntax_inits = 1    command -nargs=+ HiLink hi link <args>  else    command -nargs=+ HiLink hi def link <args>  endif   HiLink focexecString1		String  HiLink focexecString2		String  HiLink focexecNumber		Number  HiLink focexecComment		Comment  HiLink focexecTable		Keyword  HiLink focexecModify		Keyword  HiLink focexecNormal		Keyword  HiLink focexecSet		Keyword  HiLink focexecDash		Keyword  HiLink focexecFileDef		Keyword  HiLink focexecJoin		Keyword  HiLink focexecAmperVar	Identifier  HiLink focexecFuse		Function   delcommand HiLinkendif let b:current_syntax = "focexec" " vim: ts=8