tssgm.vim (2787B)
1 " Vim syntax file 2 " Language: TSS (Thermal Synthesizer System) Geometry 3 " Maintainer: Adrian Nagle, anagle@ball.com 4 " Last Change: 2003 May 11 5 " Filenames: *.tssgm 6 " URL: http://www.naglenet.org/vim/syntax/tssgm.vim 7 " MAIN URL: http://www.naglenet.org/vim/ 8 9 10 11 " quit when a syntax file was already loaded 12 if exists("b:current_syntax") 13 finish 14 endif 15 16 17 18 " Ignore case 19 syn case ignore 20 21 22 23 " 24 " 25 " Begin syntax definitions for tss geomtery file. 26 " 27 28 " Define keywords for TSS 29 syn keyword tssgmParam units mirror param active sides submodel include 30 syn keyword tssgmParam iconductor nbeta ngamma optics material thickness color 31 syn keyword tssgmParam initial_temp 32 syn keyword tssgmParam initial_id node_ids node_add node_type 33 syn keyword tssgmParam gamma_boundaries gamma_add beta_boundaries 34 syn keyword tssgmParam p1 p2 p3 p4 p5 p6 rot1 rot2 rot3 tx ty tz 35 36 syn keyword tssgmSurfType rectangle trapezoid disc ellipse triangle 37 syn keyword tssgmSurfType polygon cylinder cone sphere ellipic-cone 38 syn keyword tssgmSurfType ogive torus box paraboloid hyperboloid ellipsoid 39 syn keyword tssgmSurfType quadrilateral trapeziod 40 41 syn keyword tssgmArgs OUT IN DOWN BOTH DOUBLE NONE SINGLE RADK CC FECC 42 syn keyword tssgmArgs white red blue green yellow orange violet pink 43 syn keyword tssgmArgs turquoise grey black 44 syn keyword tssgmArgs Arithmetic Boundary Heater 45 46 syn keyword tssgmDelim assembly 47 48 syn keyword tssgmEnd end 49 50 syn keyword tssgmUnits cm feet meters inches 51 syn keyword tssgmUnits Celsius Kelvin Fahrenheit Rankine 52 53 54 55 " Define matches for TSS 56 syn match tssgmDefault "^DEFAULT/LENGTH = \(ft\|in\|cm\|m\)" 57 syn match tssgmDefault "^DEFAULT/TEMP = [CKFR]" 58 59 syn match tssgmComment /comment \+= \+".*"/ contains=tssParam,tssgmCommentString 60 syn match tssgmCommentString /".*"/ contained 61 62 syn match tssgmSurfIdent " \S\+\.\d\+ \=$" 63 64 syn match tssgmString /"[^" ]\+"/ms=s+1,me=e-1 contains=ALLBUT,tssInteger 65 66 syn match tssgmArgs / = [xyz],"/ms=s+3,me=e-2 67 68 syn match tssgmInteger "-\=\<[0-9]*\>" 69 syn match tssgmFloat "-\=\<[0-9]*\.[0-9]*" 70 syn match tssgmScientific "-\=\<[0-9]*\.[0-9]*E[-+]\=[0-9]\+\>" 71 72 73 74 " Define the default highlighting 75 " Only when an item doesn't have highlighting yet 76 77 hi def link tssgmParam Statement 78 hi def link tssgmSurfType Type 79 hi def link tssgmArgs Special 80 hi def link tssgmDelim Typedef 81 hi def link tssgmEnd Macro 82 hi def link tssgmUnits Special 83 84 hi def link tssgmDefault SpecialComment 85 hi def link tssgmComment Statement 86 hi def link tssgmCommentString Comment 87 hi def link tssgmSurfIdent Identifier 88 hi def link tssgmString Delimiter 89 90 hi def link tssgmInteger Number 91 hi def link tssgmFloat Float 92 hi def link tssgmScientific Float 93 94 95 96 let b:current_syntax = "tssgm" 97 98 " vim: ts=8 sw=2