<TrueTpl>
  <Language File="*.отд" ignoreCase="0" Desc="Глагол" Compiler="ПГ" CP="2">
    <Bracket Pattern="ЕСЛИ .+"    Match="КОН;?"/>
    <Bracket Pattern="ВЫБРАТЬ .+" Match="КОН;?"/>
    <Bracket Pattern="ПОКА .+"    Match="КОН;?"/>
    <Bracket Pattern="ПОВТОРЯТЬ"  Match="ДО .+"/>
    <Bracket Pattern="КОЛЬЦО"     Match="КОН;?"/>
    <Bracket Pattern="ОТ .+"      Match="КОН;?"/>
    <Bracket Pattern="ДЛЯ .+"     Match="КОН;?"/>

    <Indent Pattern="ПОСТ"              Next="1"/>
    <Indent Pattern="ВИД"               Next="1"/>
    <Indent Pattern="ПЕР"               Next="1"/>
    <Indent Pattern="УКАЗ"              Next="1"/>
    <Indent Pattern="АЕСЛИ .+" Line="0" Next="1" Relative="ЕСЛИ .+"/>
    <Indent Pattern="ИНАЧЕ"             Next="1"/>
    <Indent Pattern="\| .+"    Line="0" Next="1" Relative="ВЫБРАТЬ .+"/>

    <Expand Pattern="ОТДЕЛ" Init="1" To="\?'Название'"
      "(***************************************************************************)\n"
      "                              ОТДЕЛ \0;\n\["
      "(****************************************************************************\n"
      " * НАЗНАЧЕНИЕ: \p\n"
      "****************************************************************************)\n"
      "\n\[ИСПОЛЬЗУЕТ ;\n\nУКАЗ\n\nКОН \0."/>
    <Expand Pattern="З|АДАЧА"    At="Begin" To="\?'Название'\["
      "(***************************************************************************)\n"
      "ЗАДАЧА \0();\n"
      "(* Цель:  \p\n"
      " * До:    <> - \n"
      "* После: <> - \n"
      "* Ответ: \n"
      "*)\n\["
      "УКАЗ\n\nКОН \0;\n"/>
    <Expand Pattern="\(\*\*" Imm="*" At=".*\p" To=
      "\p(*************************************************************************)"/>
    <Expand Pattern="ВО|ЗВРАТ"              To="ВОЗВРАТ "/>
    <Expand Pattern="УВ|ЕЛИЧИТЬ"            To="УВЕЛИЧИТЬ(\p);"/>
    <Expand Pattern="УМ|ЕНЬШИТЬ"            To="УМЕНЬШИТЬ(\p);"/>
    <Expand Pattern="Е|СЛИ"                 To="ЕСЛИ \p ТО\nКОН;"/>
    <Expand Pattern="А|ЕСЛИ"                To="АЕСЛИ \p ТО"/>
    <Expand Pattern="ВЫ|БРАТЬ"              To="ВЫБРАТЬ \p ИЗ\n| :\nИНАЧЕ\nКОН;"/>
    <Expand Pattern="П|ОКА"                 To="ПОКА \p ВЫП\nКОН;"/>
    <Expand Pattern="ПОВ|ТОРЯТЬ"            To="ПОВТОРЯТЬ\nДО\^\]\r"/>
    <Expand Pattern="ПР|ОВЕРИТЬ"            To="ПРОВЕРИТЬ(\p);"/>
    <Expand Pattern="К|ОЛЬЦО"               To="КОЛЬЦО\nКОН;\^\]\r"/>
    <Expand Pattern="О|Т"                   To="ОТ \p:= ДО  ВЫП\nКОН;"/>
    <Expand Pattern="Д|ЛЯ"                  To="ДЛЯ \p ВИДА\nКОН;"/>

    <Comment Pattern="\'.*\'"/>
    <Comment Pattern="".*""/>
    <Comment Pattern="\(\*.*\*\)"/>
    <Comment Pattern="<\*.*\*>"/>

    <Exec Title="Глагол" Command="D:\Глагол\Службы\ПГ =F" Compiler="ПГ"
              Save="Current" Jump="First"/>
    <Compiler Name="ПГ"   Error="^(.*)\((\d+):(\d+)\) - (.+)" File="1" Line="2" Col="3"/>
  </Language>
</TrueTpl>