Highlight Fortran syntax in ultraedit

The method should be the same. I use the green version of ultraedit 16.00.0.1032 and Windows 7.

Open the directory where ultraedit is located and create a new file under wordfiles. The content is as follows:

 

 

 

/L14 "Fortran 90" nocase line comment num = 2! Line comment alt = !! String chars = "'disablemls file extensions = f90 for FTN F

/Delimiters = ~ ! @ % ^ & * ()-+ = | // {} []:; "'<>,

/Function string = "^ (^ {subroutine ^} ^ {function ^} [^ t] + [A-Z0-9 _] + ^ )("

/Indent strings = "then" "else" "do" "forall" "case"

/Unindent strings = "else" "end if" "end do" "endif" "enddo" "End select"

/Open brace strings = "(""["

/Close brace strings = ")" "]"

/Open fold strings = "function" "module" "program" "subroutine" "then" "else" "do" "select"

/Close fold strings = "end function" "end module" "End program" "End subroutine" "else" "end if" "end do" "End select"

/C1 "statements"

Allocatable allocate assignment

Block

Call case character common complex contains continue cycle

Data deallocate dimension do double

Elemental else elseif elsewhere end enddo endif entry equivalence exit external

Forall format Function

Go GOTO

If implicit in inout inquire integer intent interface intrinsic

Logical

Module

Namelist none nullify

Only operator optional out

Parameter pointer precision Private Procedure program public pure

Real recursive result return

Save select sequence stop subroutine

Target then to type

Use

Where while

/C2 "intrinsic operators"

. And... Eq... eqv... false... Ge... gt... Le... lt... ne... neqv... not... or... true.

/C3 "functions + subroutines"

ABS Achar ACOs adjustl adjustr aimag aint all allocated anint any asin associated atan atan2

Bit_size btest

CARG ceiling char cmplx conjg cos cosh count cpu_time cshift

Date_and_time dble digits dim dot_product dprod

Eoshift Epsilon exp Exponent

Float floor Fraction

Huge

Iachar Iand ibclr ibits ibset ichar ieor iFIX index int ior ishft ishftc

Kind

Lbound Len len_trim lge lgt lle llT log log10 lshift

Matmul Max maxexponent maxloc maxval merge min minexponent minloc minval mod modulo mvbits

Nearest nint not null

Pack present product

Radix random_number random_seed range repeat reshape

Scale scan selected_int_kind selected_real_kind set_exponent shape sign sin Sinh size spacing spread SQRT

Sum system_clock

Tan Tanh tiny transfer transpose trim

Ubound unpack

Verify

/C4 "I/O statements"

Backspace

Close

Endfile

Open

Print

Read rewind

Write

/C5 "File status"

Access action apostrophe append Asis

Blank

Delim direct

Err exist

File FMT form formatted from

Iostat

Location

Name named new nextrec no number

Old opened

Pad position

Quote

Readwrite recl replace

Scratch sequential stat status

Unformatted unit unknown

Yes

Zero

/C6 "Preprocessor"

Include

/C7 "operators"

*

+

-

///

<

=

>

/C8 "Continue line"

&

 

 

 

 

Save it as Fortran. UEW: On the ultraedit page, select "advanced"-"configuration", select "highlighted Syntax" in "Editor" in "navigation", and browse the complete directory of the document, for example, D:/program files/ultraedit/wordfiles, select "enable syntax color display", and click OK.

Restart ultraedit and select View> View Mode (highlighted file type)> Fortran 90, OK!