codekingpro/portable-devtools

1" Vim syntax file2" Language:     TSS (Thermal Synthesizer System) Geometry3" Maintainer:   Adrian Nagle, anagle@ball.com4" Last Change:  2003 May 115" Filenames:    *.tssgm6" URL:		http://www.naglenet.org/vim/syntax/tssgm.vim7" MAIN URL:     http://www.naglenet.org/vim/8 9 10 11" quit when a syntax file was already loaded12if exists("b:current_syntax")13  finish14endif15 16 17 18" Ignore case19syn case ignore20 21 22 23"24"25" Begin syntax definitions for tss geomtery file.26"27 28" Define keywords for TSS29syn keyword tssgmParam  units mirror param active sides submodel include30syn keyword tssgmParam  iconductor nbeta ngamma optics material thickness color31syn keyword tssgmParam  initial_temp32syn keyword tssgmParam  initial_id node_ids node_add node_type33syn keyword tssgmParam  gamma_boundaries gamma_add beta_boundaries34syn keyword tssgmParam  p1 p2 p3 p4 p5 p6 rot1 rot2 rot3 tx ty tz35 36syn keyword tssgmSurfType  rectangle trapezoid disc ellipse triangle37syn keyword tssgmSurfType  polygon cylinder cone sphere ellipic-cone38syn keyword tssgmSurfType  ogive torus box paraboloid hyperboloid ellipsoid39syn keyword tssgmSurfType  quadrilateral trapeziod40 41syn keyword tssgmArgs   OUT IN DOWN BOTH DOUBLE NONE SINGLE RADK CC FECC42syn keyword tssgmArgs   white red blue green yellow orange violet pink43syn keyword tssgmArgs   turquoise grey black44syn keyword tssgmArgs   Arithmetic Boundary Heater45 46syn keyword tssgmDelim  assembly47 48syn keyword tssgmEnd    end49 50syn keyword tssgmUnits  cm feet meters inches51syn keyword tssgmUnits  Celsius Kelvin Fahrenheit Rankine52 53 54 55" Define matches for TSS56syn match  tssgmDefault     "^DEFAULT/LENGTH = \(ft\|in\|cm\|m\)"57syn match  tssgmDefault     "^DEFAULT/TEMP = [CKFR]"58 59syn match  tssgmComment       /comment \+= \+".*"/ contains=tssParam,tssgmCommentString60syn match  tssgmCommentString /".*"/ contained61 62syn match  tssgmSurfIdent   " \S\+\.\d\+ \=$"63 64syn match  tssgmString      /"[^" ]\+"/ms=s+1,me=e-1 contains=ALLBUT,tssInteger65 66syn match  tssgmArgs	    / = [xyz],"/ms=s+3,me=e-267 68syn match  tssgmInteger     "-\=\<[0-9]*\>"69syn match  tssgmFloat       "-\=\<[0-9]*\.[0-9]*"70syn match  tssgmScientific  "-\=\<[0-9]*\.[0-9]*E[-+]\=[0-9]\+\>"71 72 73 74" Define the default highlighting75" Only when an item doesn't have highlighting yet76 77hi def link tssgmParam		Statement78hi def link tssgmSurfType		Type79hi def link tssgmArgs		Special80hi def link tssgmDelim		Typedef81hi def link tssgmEnd		Macro82hi def link tssgmUnits		Special83 84hi def link tssgmDefault		SpecialComment85hi def link tssgmComment		Statement86hi def link tssgmCommentString	Comment87hi def link tssgmSurfIdent		Identifier88hi def link tssgmString		Delimiter89 90hi def link tssgmInteger		Number91hi def link tssgmFloat		Float92hi def link tssgmScientific	Float93 94 95 96let b:current_syntax = "tssgm"97 98" vim: ts=8 sw=299