# Euphoria syntax file for Code Genie 3.0
# written by John Ringland 15/11/2004

#this is false by default
#CaseInsensitive         false

KeywordGroup  key_words if end then else for 
    do elsif while constant to and or
    exit global by not include
    with without xor

#Format   key_words  b
FgColor  key_words  #0000ff

KeywordGroup  bright_key_words procedure return function type abort

Format   bright_key_words  b
FgColor  bright_key_words  #DF0000

KeywordGroup builtins length puts integer sequence position object
    append prepend print printf
    clear_screen floor getc gets get_key
    rand repeat atom compare find match
    time command_line open close trace getenv
    sqrt sin cos tan log system date remainder
    power machine_func machine_proc peek poke
    call sprintf arctan and_bits or_bits xor_bits
    not_bits pixel get_pixel mem_copy mem_set
    c_proc c_func routine_id call_proc call_func
    poke4 peek4s peek4u profile equal system_exec
    platform

#Format   builtins  b
FgColor  builtins  #DC00FF

BlockStart  comment      --
BlockEnd    comment      \n
FgColor     comment      #AB8244

BlockStart  quote        "
BlockEnd    quote        "
FgColor     quote        #D2B48C

Operator operators +-*/=<>&
FgColor operators #89A150

Operator others ,.
FgColor others #EB7F42

# I tried to colour the nested brackets but one can only nest blocks,
# and blocks colour everything inside and nesting two sequences,
# e.g. {{}} results in "{{}" plus "}". So no colouring by nesting level :(
# one can use ctrl+M to match parentheses.

Operator    sequence     {}
FgColor     sequence     #1CCF03

Operator    index        []
FgColor     index        #C9AD5A

Operator    bracket      ()
FgColor     bracket      #FF6820

Nest key_words
Nest bright_key_words
Nest builtins
Nest comment
Nest quote
Nest operators
Nest others
Nest sequence
Nest index
Nest bracket

#eof