了解知识
方法应该是一样的,我的是绿色版的UltraEdit 16.00.0.1032版本,windows 7系统
打开UltraEdit所在的目录,在wordfiles此目录下新建一个文件,内容如下:
 
 
 
/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"
&
 
 
 
 
然后将其保存为fortran.uew,在UltraEdit界面中选择“”高级“-》”配置“,在”导航“中选择”编辑器显示“中的”语法亮亮“,浏览文档的完整目录,比如D:/Program Files/UltraEdit/wordfiles,选中”启用语法彩色显示“,确定。
重新启动UltraEdit,选择“视图”--“查看方式(高亮文件类型)”--“Fortran 90”,OK!
标签: Fortran
扩展知识