Ultraedit perfectly displays Lua

/L20 "Lua" Block comment on = -- [[block Comment off =] block comment on ALT = -- escape char = \ string chars = "'file extensions = Lua Bin
/Delimiters = ~! @ % ^ & * ()-+ = |\/ {} []:; "'<> ,.?
/Function string 1 = "function [] ++ [A-Za-Z] *)"
/Function string 2 = "function [] ++ ([A-Za-Z] *)"
/Open fold strings = "function" "if" "while" ""
/Close fold strings = "end"
/C1 "Key Words"
And
Break
Do
Else
Elseif
End
Function
If in
Local
Nil not
Or
Repeat return
Then
Until
While
/C2
ABS ACOs appendto ASCII asin assert atan atan2
Call Ceil clock collectgarbage copytagmethods cos
Date deg dofile dostring
Error execute exit
False find floor foreach foreachvar format frexp
Getbinmethod getenv getglobal gettagmethod gfind gmatch gsub
Insert ipairs
Ldexp log log10
Match Max min mod
Newtag next nextvar
OS
Pairs print
Rad random randomseed rawgetglobal rawgettable rawsetglobal rawsettable read
Readfrom remove rename
Seterrormethod setglobal setlocale settag settagmethod sin SQRT strbyte sub
Strchar strfind string strlen strlower strrep strsub strupper
Table tag tan tmpname tonumber tostring True Type
Write writeto
/C3
$ Debug
$ Else
$ End
$ Endinput
$ If
$ Ifnot
$ Nodebug
/C4
Pi
_ INPUT _ output _ stderr _ stdin _ stdout
/C5
+
-
*
///
^
<
>
=
~
%
.
:
/C6
;
,
(
)
{
}
[
]
/C7
CGI cgilua cgilua_url char2hexa chdir
Dbluaerrorfb dblua_escape decode default_script
Encodecgi encodetable escape
Filetype
Getvalue
Hexa hexa2char html_mask
Includehtml insertfield
Lua_mask
Maketable map mkurl
Nopipe
Preprocess
Redirect relativeurl relative_url
Saveluavar savestate script_path script_pdir script_vdir stateerrormethod
Statefile stdin strsplit
Unescape
/C8
Dbclose dbexec dbopen dbrow