<!DOCTYPE Highlight>
<Highlight wildcards="*.cob; *.cbl; *.COB; *.CBL" name="Cobol">

 <Items>

  <text style="" color="#000000" />
  <greytext style="" color="#404040" />
  <comment style="" color="#808080" />
  <string style="" color="#008000" bgcolor="#F0FFF0" />
  <number style="" color="#000080" />

  <identification style="b" color="#600000" bgcolor="#F0F0FF" />
  <environment    style="b" color="#008000" bgcolor="#F0F0FF" />
  <configuration  style=""  color="#408000" bgcolor="#F0F0FF" />
  <inputoutput    style=""  color="#408000" bgcolor="#F0F0FF" />
  <data           style="b" color="#a00000" bgcolor="#F0F0FF" />
  <procedure      style="b" color="#000080" bgcolor="#F0F0FF" />

  <red style="" color="#ff0000" />
  <blue style="" color="#000080" />
  <darkRed style="" color="#a00000" />
  <lightBlue style="" color="#0000ff" />
  <keywordData style="" color="#800000" bgcolor="#FFFFF0" />
  <keywordData2 style="" color="#0000a0" />

 </Items>

 <Break>

  <identification>
   <citem item="" regexp="^\sENVIRONMENT\sDIVISION" mode="until, include" lineEndContent="environment" />
   <citem item="" regexp="$"  mode="until" />
  </identification>

  <environment>
   <citem item="" regexp="^\sDATA\sDIVISION" mode="until, include" lineEndContent="data" />
   <citem item="" regexp="$"  mode="until" />
  </environment>

  <data>
   <citem item="" regexp="^\sPROCEDURE\sDIVISION" mode="until, include" lineEndContent="procedure" />
   <citem item="" regexp="$"  mode="until" />
  </data>

  <procedure>
   <citem item="" regexp="^\sIDENTIFICATION\sDIVISION" mode="until, include" lineEndContent="identification" />
   <citem item="" regexp="$"  mode="until" />
  </procedure>

 </Break>

 <Contents>

  <identification>
    <citem item="identification" regexp="^\sIDENTIFICATION\sDIVISION.*\." mode="until, include" />
    <citem item="environment" regexp="^\sENVIRONMENT\sDIVISION.*\." mode="until, include" />
    <citem item="comment" regexp="\*.*" mode="first" />

    <citem item="text" regexp="\s+" lineEndContent="identification" />
    <citem item="lightBlue" regexp="\S+" keyword="PROGRAM-ID. AUTHOR. INSTALLATION. DATE-WRITTEN. DATE-COMPILED." caseSensitive="false" />
    <citem item="keywordData2" regexp="\S+" keyword="AS IS INITIAL PROGRAM RECURSIVE" caseSensitive="false" />

    <citem item="greytext" regexp="\S+" />
    <citem item="greytext" regexp="^$" lineEndContent="identification" />
  </identification>

  <environment>
    <citem item="data" regexp="^\sDATA\sDIVISION.*\." mode="until, include" />
    <citem item="comment" regexp="\*.*" mode="first" />

    <citem item="configuration" regexp="^\s+CONFIGURATION\s+SECTION\.*" mode="until, include" />
    <citem item="inputoutput" regexp="^\s+INPUT-OUTPUT\s+SECTION\.*" mode="until, include" />

    <citem item="text" regexp="\s+" lineEndContent="environment" />
    <citem item="lightBlue" regexp="\S+" keyword="SOURCE-COMPUTER. OBJECT-COMPUTER. SPECIAL-NAMES." caseSensitive="false" />
    <citem item="keywordData2" regexp="\S+" keyword="WITH DEBUGGING MODE DECIMAL-POINT IS COMMA NUMERIC SIGN LEADING SEPARATE CHARACTER TRAILING CURSOR CRT STATUS ON OFF STATUS TOP CONSOLE" caseSensitive="false" />

    <citem item="lightBlue" regexp="\S+" keyword="FILE-CONTROL. I-O-CONTROL." caseSensitive="false" />
    <citem item="keywordData" regexp="\S+" keyword="SELECT ASSIGN" caseSensitive="false" />
    <citem item="keywordData2" regexp="[^\s\.]+" keyword="OPTIONAL TO USING DYNAMIC ACCESS MODE IS RANDOM SEQUENTIAL INDEXED ORGANIZATION RELATIVE LINE RESERVE AREA AREAS FILE STATUS ALTERNATE RECORD KEY RELATIVE" caseSensitive="false" />

    <citem item="keywordData2" regexp="[^\s\.]+" keyword="SAME RECORD SORT SORT-MERGE AREA FOR" caseSensitive="false" />

    <citem item="string" regexp="&quot;[^&quot;]*&quot;" lineEndContent="environment" />

    <citem item="text" regexp="\S+" />
    <citem item="text" regexp="^$" mode="until" />
  </environment>

  <data>
    <citem item="procedure" regexp="^\sPROCEDURE\sDIVISION.*\." mode="until, include" />
    <citem item="comment" regexp="\*.*" mode="first" />

    <citem item="text" regexp="[\s\(\)]+" lineEndContent="data" />
    <citem item="lightBlue" regexp="\S+" keyword="FILE SECTION. WORKING-STORAGE LINKAGE SCREEN" caseSensitive="false" />
    <citem item="keywordData" regexp="[^\s\.]+" keyword="FD PICTURE PIC RENAMES VALUE VALUES RECORD" caseSensitive="false" />
    <citem item="keywordData2" regexp="[^\s\.]+" keyword="LABEL STANDARD BLOCK CONTAINS TO RECORDS CHARACTERS FILLER REDEFINES IS ARE BINARY BINARY-CHAR SIGNED UNSIGNED BINARY-SHORT BINARY-LONG BINARY-DOUBLE USAGE COMPUTATIONAL COMP COMPUTATIONAL-4 COMP-4 COMPUTATIONAL-5 COMP-5 COMPUTATIONAL-3 COMP-3 PACKED-DECIMAL DISPLAY INDEX SIGN LEADING SEPARATE CHARACTER TRAILING OCCURS TIMES DEPENDING ON ASCENDING KEY DESCENDING INDEXED BY SYNCHRONIZED RIGHT SYNC LEFT JUSTIFIED JUST BLANK WHEN ZERO ZEROS ZEROES VALUE THROUGH THRU PLUS MINUS LINE NUMBER COL COLUMN POSITION BLANK SCREEN END OF ERASE EOS EOL FULL AUTO SECURE REQUIRED BELL BEEP BLINK HIGHLIGHT HIGH LOWLIGHT LOW REVERSE-VIDEO UNDERLINE FOREGROUND-COLOR FOREGROUND-COLOUR BACKGROUND-COLOR BACKGROUND-COLOUR WHEN OCCURS TIMES USAGE DISPLAY PROMPT CHARACTER" caseSensitive="false" />
    <citem item="string" regexp="[^\s\.]+" keyword="SPACE" caseSensitive="false" />

    <citem item="number" regexp="\d+" />
    <citem item="string" regexp="&quot;[^&quot;]*&quot;" lineEndContent="data" />

    <citem item="text" regexp="[^\s\(\)]+" />
    <citem item="text" regexp="^$" mode="until" />
  </data>

  <procedure>
    <citem item="comment" regexp="\*.*" mode="first" />

    <citem item="text" regexp="[\s\(\)]+" lineEndContent="procedure" />
    <citem item="lightBlue" regexp="\S+" keyword="DECLARATIVES. SECTION. DISPLAY END-DISPLAY GOBACK. STOP RUN." caseSensitive="false" />
    <citem item="keywordData" regexp="[^\s\.]+" keyword="ACCEPT END-ACCEPT ADD END-ADD ALTER CALL END-CALL CANCEL CLOSE COMPUTE END-COMPUTE CONTINUE DELETE END-DELETE DIVIDE END-DIVIDE EVALUATE END-EVALUATE EXIT GO IF THEN ELSE END-IF INITIALIZE INSPECT MERGE MOVE MULTIPLY END-MULTIPLY OPEN PERFORM END-PERFORM READ END-READ RELEASE RETURN END-RETURN REWRITE END-REWRITE SEARCH END-SEARCH SET SORT START END-START STRING END-STRING SUBTRACT END-SUBTRACT UNSTRING END-UNSTRING USE WRITE END-WRITE" caseSensitive="false" />

    <citem item="keywordData2" regexp="[^\s\.]+" keyword="ADVANCING AFTER ALL ALSO ASCENDING AT AUTO AUTO-SKIP BACKGROUND-COLOR BACKGROUND-COLOUR BEEP BEFORE BELL BLANK BLINK BY CHARACTER CHARACTERS COL COLLATING COLUMN CONTENT CONVERTING CORR CORRESPONDING CRT DATA DATE DAY DAY-OF-WEEK DEFAULT DELIMITED DESCENDING DOWN DUPLICATES END END-OF-PAGE ERASE ERROR EOL EOP EOS EXCEPTION EXTEND FILLER FIRST FOR FOREGROUND-COLOR FOREGROUND-COLOUR FROM FULL GIVING GLOBAL HIGH HIGHLIGHT I-O INITIAL INPUT INTO INVALID KEY LEADING LENGTH LINE LOW LOWLIGHT NEXT NOT NUMBER OF OFF ON ORDER OTHER OUTPUT OVERFLOW PAGE POINTER POSITION PREVIOUS PROCEDURE PROCEED PROMPT RECORD REFERENCE REMAINDER REPLACING REQUIRED RETURNING REVERSE-VIDEO ROUNDED SCREEN SECURE SEQUENCE SIZE STANDARD TALLYING TEST THROUGH THRU TIME TIMES TO WITH UNDERLINE UNTIL UP UPON USING VALUE VARYING WHEN WITH" caseSensitive="false" />

    <citem item="darkRed" regexp="\S+" keyword="PARAGRAPH SECTION PROGRAM PERFORM CYCLE ABS ACOS ANNUITY ASIN ATAN BOOLEAN-OF-INTEGER BYTE-LENGTH CHAR CHAR-NATIONAL COS CURRENT-DATE DATE-OF-INTEGER DATE-TO-YYYYMMDD DAY-OF-INTEGER DAY-TO-YYYYDDD E DISPLAY-OF EXCEPTION-FILE EXCEPTION-LOCATION EXCEPTION-STATEMENT EXCEPTION-STATUS EXP EXP10 FACTORIAL FRACTION-PART HIGHEST-ALGEBRAIC INTEGER INTEGER-OF-BOOLEAN INTEGER-OF-DATE INTEGER-OF-DAY INTEGER-PART LENGTH LOCALE-COMPARE LOCALE-DATE LOCALE-TIME LOG LOG10 LOWER-CASE LOWEST-ALGEBRAIC MAX MEAN MEDIAN MIDRANGE MIN MOD NATIONAL-OF NUMVAL NUMVAL-C NUMVAL-F ORD ORD-MAX ORD-MIN PI PRESENT-VALUE RANDOM RANGE REM REVERSE SIGN SIN SQRT STANDARD-COMPARE STANDARD-DEVIATION SUM TAN TEST-DATE-YYYYMMDD TEST-DAY-YYYYDDD TEST-NUMVAL TEST-NUMVAL-C TEST-NUMVAL-F UPPER-CASE VARIANCE WHEN-COMPILED YEAR-TO-YYYY" caseSensitive="false" />
    <citem item="string" regexp="[^\s\.]+" keyword="TRUE FALSE ANY ALPHABETIC ALPHANUMERIC ALPHANUMERIC-EDITED NUMERIC NUMERIC-EDITED" caseSensitive="false" />

    <citem item="number" regexp="\d+" />
    <citem item="string" regexp="&quot;[^&quot;]*&quot;" lineEndContent="procedure" />

    <citem item="text" regexp="[^\s\(\)]+" />
    <citem item="text" regexp="^$" mode="until" />
  </procedure>

 </Contents>

</Highlight>
