object TPersHolder
  P.Fileinfo =
   '----------------------------------------------------' +
   '--- Syntax highlighting for PROTON 3.2           ---' +
   '---                                              ---' +
   '--- Thanks to Timo Heinz for this submission     ---' +
   '--- Some adjustments by Max Schoefmann           ---' +
   '----------------------------------------------------'
  P.Name = 'Aptilis'
  P.SyntaxBlocks = <
    item
      Name = 'Default'
      ID = 0
      FIText = 0
      FIIntNum = 1
      FIFloatNum = 2
      FIHexNum = 3
      FIDirective = 4
      FISymbol = 9
      UseSymbols = True
      UseLineDirectives = False
      UseComments = True
      UseSingleLineComments = True
      UseMultiLineComments = True
      UseStrings = True
      UseSingleLineStrings = True
      UseNumbers = True
      UseSuffixedIdentifiers = True
      UseKeywords = True
      BlockDelimiters = <>
      SingleLineCommentDelimiters = <
        item
          FontID = 5
          LeftDelimiter = '#'
        end
        item
          FontID = 6
          LeftDelimiter = '//'
        end>
      MultiLineCommentDelimiters = <
        item
          FontID = 6
          LeftDelimiter = '/*'
          RightDelimiter = '*/'
        end>
      SingleLineStringDelimiters = <
        item
          FontID = 7
          LeftDelimiter = '"'
          RightDelimiter = '"'
        end>
      IdentSuffixes = <
        item
          LeftDelimiter = '$'
        end>
      KeywordSets = <
        item
          FontID = 8
          Name = 'reserved'
          Keywords =
            'break,case,continue,default,else,end,for,if,repeat,return,select,sub,until,while,template,var,import'
        end
        item
          FontID = 4
          Name = 'subs'
          Keywords =
            'abs,appendrecord,appendtofile,asc,atan,box,call,cat,' +
            'changedirectory,checkmark,chr,cleararray,clearbitmap,close,' +
            'cos,createbitmap,createdirectory,deletebitmap,dele' +
            'tedirectory,deletefile,deleterecord,dotime,ellipse,exp' +
            ',fileexist,fillform,filllocaltimearray,filltimearray,fill,forma' +
            't,getallfields,getallrecordsbykey,getallrecordsbynea,key,ge' +
            'tarraydimensions,getarraysize,getcharat,getcurrentdirectory,get' +
            'directorylist,getfield,getfiledate,getfilelastmodification,getf' +
            'ilelist,getfilesize,getfixedlengthfield,getlocalip,getnextkey,g' +
            'etnext,getpixel,getposition,getpreviouskey,getprevious,getrecor' +
            'dindexbykey,getrecor,indexbynearkey,getsmtpserver,getstringmetr' +
            'ics,getsubstring,gettime,getvariable,getxmlfield,getxmltagattri' +
            'butes,httpload,httppostload,hexcolor,input,instr,int,join,le' +
            'ft,len,line,ln,loaddatabase,loadfile,loadfile,loadpostfile,lock' +
            ',lower,makefixedlengthfield,makerecord,mark,match,mid,open,outp' +
            'utgifbitmap,output,parsedatabase,parsexml,printat,print,rgb,ran' +
            'dom,reademails,read,readline,renamefile,replace,r' +
            'eversearray,right,rinstr,savedatabase,savefile,savegiffile,' +
            'sendmimemessage,sendmail,separate,setarraydimensions,setarra' +
            'yindex,setbackground,setcolor,setfont,setpixel,setposition,sets' +
            'mtpserver,setthickness,sin,sleep,sortarray,sortdatabase,sqr,str' +
            'ing,stuff,takecalls,tan,trim,unlock,upper,write,makemimebundle,' +
            'gettemplate,getlocalvariableslist,getglobalvariableslist'
        end>
    end>
  P.FontTable = <
    item
      FontID = 0
      GlobalAttrID = 'Whitespace'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
    end
    item
      FontID = 1
      GlobalAttrID = 'Integer'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
    end
    item
      FontID = 2
      GlobalAttrID = 'Float'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
    end
    item
      FontID = 3
      GlobalAttrID = 'Integer'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
    end
    item
      FontID = 4
      GlobalAttrID = 'Defines'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = [fsBold]
    end
    item
      FontID = 5
      GlobalAttrID = 'Comment'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = [fsItalic]
    end
    item
      FontID = 6
      GlobalAttrID = 'Comment'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = [fsItalic]
    end
    item
      FontID = 7
      GlobalAttrID = 'String'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
    end
    item
      FontID = 8
      GlobalAttrID = 'Reserved words'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = [fsBold]
    end
    item
      FontID = 9
      GlobalAttrID = 'Delimiters'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
    end>
  P.SyntaxVersion = 3
end