4GL syntax coloring file for UltraEdit
Henk van der Geld
Does anybody know if there is a 4GL syntax coloring file for the
UltraEdit source editor. If there is, where can it be obtained.
Thanx,
Henk
Laurent COLLIGNON
try. It doesn't recognize more than 50% of the vocabulary but it's a
beginning.
I made it by extracting all the words of some of my programs (we use to
write keywords uppercase) and sort them as it's required.
You just have to add theses lines to your Wordfile.txt file or make your
own and use it in the Configuration menu.
If somebody knows a real one, think of me ...
Andrej Falout
This one (.4gl, .per, and .sql) is for GWD edit. C&P this to the syntax.hgl
Oh, http://www.gwdsoft.com/index.html
[Informix 4GL]
FilePattern=*.4gl;*.err
CaseSensitive=no
UnixTexKeywords=no
FortranComment=no
CobolCommentPos=0
CobolCommentChar=
FirstComment=#
MultiComment={ }
LineComment1=#
LineComment2=--
MaxLineLen=0
StringDelim="
CharDelim='
QuoteChar=
OpenCloseDelim=([ ])
Delimiters=,.:
Operators=-+=*/<>@
Preprocess=|
Words=0-9a-zA-Z_.
Numbers=-+0-9eE.
LineNumbers=yes
HTML=
Cobol=no
Keyword1=
Keyword2=atbyifinisnoofonorto
Keyword3=ALLandANYavgdayendESCforkeyletlogmaxmdyminnotredrowrunsetsumtop
Keyword4=blueBOLDcallcasecharcyandatedescDROPelseexitfileformFREEfromgotohelpHIDEHOLDHOURintolastleftlikelineloadLOCKmainmenuMODEnameNEEDnextnullopenpagePIPEquitREADrowsshowskipsortSTEPSTOPTEMPtextthenTIMEtrueWAITwhenwithWORKWRAPyear
Keyword5=afterarrayasciiBEGINblinkclearclosecountDEFERDIRTYerroreveryfalsefetchfieldfirstfloatgreenGROUPindexinputlabellinesmoneymonthorderouterpauseprintrightsleepspacestartTABLEtodayunionUNITSusingwhereWHILEwhite
Keyword6=ACCEPTbeforeborderbottomcolumncommitcreatecursordefinedeleteESCAPEexistsfinishformatHAVINGheaderinsertlengthlocatemarginMINUTEnormaloptionoutputPAGENOpromptrecordreportreturnSCREENscrollSECONDselectserialspacesstatusUNIQUEupdatevalueswindowyellow
Keyword7=betweenclippedcolumnscommandcommentCURRENTDECIMALdeclaredisplayexecuteforeachglobalsinfieldintegerMAGENTAmatchesmessageNUMERICoptionsprepareprinterprogramreversetrailerupshiftVARCHARwaitingwithout
Keyword8=ABSOLUTEcontinuedatabaseDATETIMEdefaultsDISTINCTEXTERNALFRACTIONfunctionINT_FLAGINTERVALNOTFOUNDpreviousROLLBACKsmallintwhenever
Keyword9=attributecommittedconstructdelimiterdownshiftexclusiveINTERRUPTISOLATIONotherwisequit_flagreturning
Keyword10=attributesinitializestatistics
Keyword11=fgl_lastkey
Keyword12=
Keyword13=fgl_lastkey()
Keyword14=
Keyword15=
Keyword16=
ColorComment=3
ColorPreproc=13
ColorString=6
ColorNumber=6
ColorDelim=14
ColorOperator=13
ColorKeyword=10
ColorText=0
ColorBackground=0
ColorLineNumbers=8
[Informix PER]
FilePattern=*.per
CaseSensitive=no
UnixTexKeywords=no
FortranComment=no
CobolCommentPos=0
CobolCommentChar=
FirstComment=
MultiComment={ }
LineComment1=
LineComment2=
MaxLineLen=0
StringDelim="
CharDelim=
QuoteChar=
OpenCloseDelim=([ ])
Delimiters=;,
Operators=-+=*/<>^
Preprocess=|
Words=0-9a-zA-Z_
Numbers=-+0-9eE.
LineNumbers=yes
HTML=
Cobol=no
Keyword1=
Keyword2=by
Keyword3=endred
Keyword4=bluecharcyandatekeyslikesizetype
Keyword5=blackcolorgreentodaywhite
Keyword6=formatrecordscreentablesyellow
Keyword7=defaultincludeintegermagentanoentrypicturereversethroughUPSHIFT
Keyword8=autonextcommentsCOMPRESSdatabaseformonlynoupdaterequiredsmallintWORDWRAP
Keyword9=characterdownshift
Keyword10=attributesdelimiters
Keyword11=
Keyword12=instructions
Keyword13=
Keyword14=
Keyword15=
Keyword16=
ColorComment=3
ColorPreproc=13
ColorString=6
ColorNumber=6
ColorDelim=13
ColorOperator=13
ColorKeyword=10
ColorText=0
ColorBackground=0
ColorLineNumbers=8
[Informix SQL]
FilePattern=*.sql
CaseSensitive=no
UnixTexKeywords=no
FortranComment=no
CobolCommentPos=0
CobolCommentChar=
FirstComment=
MultiComment={ }
LineComment1=rem
LineComment2=--
MaxLineLen=0
StringDelim="
CharDelim='
QuoteChar=
OpenCloseDelim=([ ])
Delimiters=:@.
Operators=-+=*/<>
Preprocess=
Words=0-9a-zA-Z_.
Numbers=-+0-9eE.
LineNumbers=yes
HTML=
Cobol=no
Keyword1=
Keyword2=asbyifinisnoofonorto
Keyword3=addallandanyavgdaydbaendforintkeyletlogmaxmdyminmodnewnotoldprerowsetsum
Keyword4=callchardatedropeachelifelseexitfilefromintolikeloadlockmodenullpostreadtemptextthenviewwaitwhenwithworkyear
Keyword5=alterbeginclosecountdebugdirtyfloatgrantgroupindexmoneymonthorderouterraisetabletodaytraceunionunitswherewhile
Keyword6=beforecommitcreatedefinedeleteexistsextendglobalinsertlengthminuteresumereturnrevokesecondselectserialsystemuniqueunloadupdatevalues
Keyword7=connectcurrentdecimaldefaultexecuteforeachforeignintegermatchesprimarysynonymtriggervarcharweekday
Keyword8=continuedatabasedatetimedocumentfractionintervalresourcerollbacksmallint
Keyword9=exceptionisolationprocedurereturning
Keyword10=constraintreferences
Keyword11=referencing
Keyword12=
Keyword13=
Keyword14=
Keyword15=
Keyword16=
ColorComment=3
ColorPreproc=13
ColorString=6
ColorNumber=6
ColorDelim=14
ColorOperator=7
ColorKeyword=10
ColorText=0
ColorBackground=0
ColorLineNumbers=8
Henk van der Geld <H.van.d...@net.HCC.nl> wrote:
>Hello,
>
>Does anybody know if there is a 4GL syntax coloring file for the
>UltraEdit source editor. If there is, where can it be obtained.
>
>Thanx,
>Henk
>
#--------------------------------------------------------------------------
globals "std_disclaimer.4gl"
case author
when "John McNally" return "Informix Unleashed",
"To develop with 4GL, developer does not have to be an expert programmer"
when "Norman Fischer" return "Wired 7.01",
"Real technology behind all our technologies is language"
when "Pablo Picasso" return NULL,
"Computers are useless. They can only give you answers"
when "Andrej Falout", return "afa...@ihug.co.nz",
"One and one is not two, but eleven"
end case
Frank Albe
<H.van.d...@net.HCC.nl> wrote:
>Hello,
>
>Does anybody know if there is a 4GL syntax coloring file for the
>UltraEdit source editor. If there is, where can it be obtained.
>
>Thanx,
>Henk
Here are my definitions for 4gl, sql and per. The per isn't very
good due to the interesting syntax quirks but it works for me.
--------------8< snip >8-----------------------
/L6"i4gl" Nocase Line Comment = # Block Comment On = { Block Comment
Off = } String Chars = "' File Extensions = 4gl
/Function String = "%function"
/Indent Strings = "then"
/Unindent Strings = "else" "end"
/C1
after at attribute
before border bottom by
call case clear clipped close column command construct continue cursor
database declare defaults defer define display
else end error every exit
field finish first for foreach form format function
header
if initialize input interrupt
key
last left let like line lines
main margin menu message
name need next
of on open option otherwise output
page print prompt
quit
report return returning right row run
skip start
then to top
using
when whenever while window with without wrap
/C2
create
delete drop
fetch from
group
insert into
order
prepare
select set
rowid
table temp
update
values
where
/C3
globals
/C4
arg_val
null
pageno
set_count sqlca.sqlcode status
time today
/C6
and
is
not
or
/C7
array
char
date decimal
integer
money
record
smallint
/L7"sql" Nocase Block Comment On = { Block Comment Off = } String
Chars = "' File Extensions = sql
/C1
create
delete drop
fetch from
group
index insert into
on order
prepare
select set
rowid
table temp
unique update
values
where
/C6
and
is
not
or
/C7
array
char
date decimal
integer
money
record
smallint
/L8"per" Nocase String Chars = "' File Extensions = per
/Marker Characters = "[]{}"
/C1
attributes autonext
comments
database delimiters
end
instructions
record reverse
screen
tables type
upshift
/C4
[]
/C7
array
char
date decimal
integer
money
record
smallint
--------------8< snip >8-----------------------