codekingpro/portable-devtools

1"""2    pygments.lexers.foxpro3    ~~~~~~~~~~~~~~~~~~~~~~4 5    Simple lexer for Microsoft Visual FoxPro source code.6 7    :copyright: Copyright 2006-present by the Pygments team, see AUTHORS.8    :license: BSD, see LICENSE for details.9"""10 11import re12 13from pygments.lexer import RegexLexer14from pygments.token import Punctuation, Text, Comment, Operator, Keyword, \15    Name, String16 17__all__ = ['FoxProLexer']18 19 20class FoxProLexer(RegexLexer):21    """Lexer for Microsoft Visual FoxPro language.22 23    FoxPro syntax allows to shorten all keywords and function names24    to 4 characters.  Shortened forms are not recognized by this lexer.25    """26 27    name = 'FoxPro'28    aliases = ['foxpro', 'vfp', 'clipper', 'xbase']29    filenames = ['*.PRG', '*.prg']30    version_added = '1.6'31    mimetype = []32    url = 'https://learn.microsoft.com/en-us/previous-versions/visualstudio/foxpro'33 34    flags = re.IGNORECASE | re.MULTILINE35 36    tokens = {37        'root': [38            (r';\s*\n', Punctuation),  # consume newline39            (r'(^|\n)\s*', Text, 'newline'),40 41            # Square brackets may be used for array indices42            # and for string literal.  Look for arrays43            # before matching string literals.44            (r'(?<=\w)\[[0-9, ]+\]', Text),45            (r'\'[^\'\n]*\'|"[^"\n]*"|\[[^]*]\]', String),46            (r'(^\s*\*|&&|&amp;&amp;).*?\n', Comment.Single),47 48            (r'(ABS|ACLASS|ACOPY|ACOS|ADATABASES|ADBOBJECTS|ADDBS|'49             r'ADDPROPERTY|ADEL|ADIR|ADLLS|ADOCKSTATE|AELEMENT|AERROR|'50             r'AEVENTS|AFIELDS|AFONT|AGETCLASS|AGETFILEVERSION|AINS|'51             r'AINSTANCE|ALANGUAGE|ALEN|ALIAS|ALINES|ALLTRIM|'52             r'AMEMBERS|AMOUSEOBJ|ANETRESOURCES|APRINTERS|APROCINFO|'53             r'ASC|ASCAN|ASELOBJ|ASESSIONS|ASIN|ASORT|ASQLHANDLES|'54             r'ASTACKINFO|ASUBSCRIPT|AT|AT_C|ATAGINFO|ATAN|ATC|ATCC|'55             r'ATCLINE|ATLINE|ATN2|AUSED|AVCXCLASSES|BAR|BARCOUNT|'56             r'BARPROMPT|BETWEEN|BINDEVENT|BINTOC|BITAND|BITCLEAR|'57             r'BITLSHIFT|BITNOT|BITOR|BITRSHIFT|BITSET|BITTEST|BITXOR|'58             r'BOF|CANDIDATE|CAPSLOCK|CAST|CDOW|CDX|CEILING|CHR|CHRSAW|'59             r'CHRTRAN|CHRTRANC|CLEARRESULTSET|CMONTH|CNTBAR|CNTPAD|COL|'60             r'COM|Functions|COMARRAY|COMCLASSINFO|COMPOBJ|COMPROP|'61             r'COMRETURNERROR|COS|CPCONVERT|CPCURRENT|CPDBF|CREATEBINARY|'62             r'CREATEOBJECT|CREATEOBJECTEX|CREATEOFFLINE|CTOBIN|CTOD|'63             r'CTOT|CURDIR|CURSORGETPROP|CURSORSETPROP|CURSORTOXML|'64             r'CURVAL|DATE|DATETIME|DAY|DBC|DBF|DBGETPROP|DBSETPROP|'65             r'DBUSED|DDEAbortTrans|DDEAdvise|DDEEnabled|DDEExecute|'66             r'DDEInitiate|DDELastError|DDEPoke|DDERequest|DDESetOption|'67             r'DDESetService|DDESetTopic|DDETerminate|DEFAULTEXT|'68             r'DELETED|DESCENDING|DIFFERENCE|DIRECTORY|DISKSPACE|'69             r'DisplayPath|DMY|DODEFAULT|DOW|DRIVETYPE|DROPOFFLINE|'70             r'DTOC|DTOR|DTOS|DTOT|EDITSOURCE|EMPTY|EOF|ERROR|EVAL(UATE)?|'71             r'EVENTHANDLER|EVL|EXECSCRIPT|EXP|FCHSIZE|FCLOSE|FCOUNT|'72             r'FCREATE|FDATE|FEOF|FERROR|FFLUSH|FGETS|FIELD|FILE|'73             r'FILETOSTR|FILTER|FKLABEL|FKMAX|FLDLIST|FLOCK|FLOOR|'74             r'FONTMETRIC|FOPEN|FOR|FORCEEXT|FORCEPATH|FOUND|FPUTS|'75             r'FREAD|FSEEK|FSIZE|FTIME|FULLPATH|FV|FWRITE|'76             r'GETAUTOINCVALUE|GETBAR|GETCOLOR|GETCP|GETDIR|GETENV|'77             r'GETFILE|GETFLDSTATE|GETFONT|GETINTERFACE|'78             r'GETNEXTMODIFIED|GETOBJECT|GETPAD|GETPEM|GETPICT|'79             r'GETPRINTER|GETRESULTSET|GETWORDCOUNT|GETWORDNUM|'80             r'GETCURSORADAPTER|GOMONTH|HEADER|HOME|HOUR|ICASE|'81             r'IDXCOLLATE|IIF|IMESTATUS|INDBC|INDEXSEEK|INKEY|INLIST|'82             r'INPUTBOX|INSMODE|INT|ISALPHA|ISBLANK|ISCOLOR|ISDIGIT|'83             r'ISEXCLUSIVE|ISFLOCKED|ISLEADBYTE|ISLOWER|ISMEMOFETCHED|'84             r'ISMOUSE|ISNULL|ISPEN|ISREADONLY|ISRLOCKED|'85             r'ISTRANSACTABLE|ISUPPER|JUSTDRIVE|JUSTEXT|JUSTFNAME|'86             r'JUSTPATH|JUSTSTEM|KEY|KEYMATCH|LASTKEY|LEFT|LEFTC|LEN|'87             r'LENC|LIKE|LIKEC|LINENO|LOADPICTURE|LOCFILE|LOCK|LOG|'88             r'LOG10|LOOKUP|LOWER|LTRIM|LUPDATE|MAKETRANSACTABLE|MAX|'89             r'MCOL|MDOWN|MDX|MDY|MEMLINES|MEMORY|MENU|MESSAGE|'90             r'MESSAGEBOX|MIN|MINUTE|MLINE|MOD|MONTH|MRKBAR|MRKPAD|'91             r'MROW|MTON|MWINDOW|NDX|NEWOBJECT|NORMALIZE|NTOM|NUMLOCK|'92             r'NVL|OBJNUM|OBJTOCLIENT|OBJVAR|OCCURS|OEMTOANSI|OLDVAL|'93             r'ON|ORDER|OS|PAD|PADL|PARAMETERS|PAYMENT|PCOL|PCOUNT|'94             r'PEMSTATUS|PI|POPUP|PRIMARY|PRINTSTATUS|PRMBAR|PRMPAD|'95             r'PROGRAM|PROMPT|PROPER|PROW|PRTINFO|PUTFILE|PV|QUARTER|'96             r'RAISEEVENT|RAND|RAT|RATC|RATLINE|RDLEVEL|READKEY|RECCOUNT|'97             r'RECNO|RECSIZE|REFRESH|RELATION|REPLICATE|REQUERY|RGB|'98             r'RGBSCHEME|RIGHT|RIGHTC|RLOCK|ROUND|ROW|RTOD|RTRIM|'99             r'SAVEPICTURE|SCHEME|SCOLS|SEC|SECONDS|SEEK|SELECT|SET|'100             r'SETFLDSTATE|SETRESULTSET|SIGN|SIN|SKPBAR|SKPPAD|SOUNDEX|'101             r'SPACE|SQLCANCEL|SQLCOLUMNS|SQLCOMMIT|SQLCONNECT|'102             r'SQLDISCONNECT|SQLEXEC|SQLGETPROP|SQLIDLEDISCONNECT|'103             r'SQLMORERESULTS|SQLPREPARE|SQLROLLBACK|SQLSETPROP|'104             r'SQLSTRINGCONNECT|SQLTABLES|SQRT|SROWS|STR|STRCONV|'105             r'STREXTRACT|STRTOFILE|STRTRAN|STUFF|STUFFC|SUBSTR|'106             r'SUBSTRC|SYS|SYSMETRIC|TABLEREVERT|TABLEUPDATE|TAG|'107             r'TAGCOUNT|TAGNO|TAN|TARGET|TEXTMERGE|TIME|TRANSFORM|'108             r'TRIM|TTOC|TTOD|TXNLEVEL|TXTWIDTH|TYPE|UNBINDEVENTS|'109             r'UNIQUE|UPDATED|UPPER|USED|VAL|VARREAD|VARTYPE|VERSION|'110             r'WBORDER|WCHILD|WCOLS|WDOCKABLE|WEEK|WEXIST|WFONT|WLAST|'111             r'WLCOL|WLROW|WMAXIMUM|WMINIMUM|WONTOP|WOUTPUT|WPARENT|'112             r'WREAD|WROWS|WTITLE|WVISIBLE|XMLTOCURSOR|XMLUPDATEGRAM|'113             r'YEAR)(?=\s*\()', Name.Function),114 115            (r'_ALIGNMENT|_ASCIICOLS|_ASCIIROWS|_ASSIST|_BEAUTIFY|_BOX|'116             r'_BROWSER|_BUILDER|_CALCMEM|_CALCVALUE|_CLIPTEXT|_CONVERTER|'117             r'_COVERAGE|_CUROBJ|_DBLCLICK|_DIARYDATE|_DOS|_FOXDOC|_FOXREF|'118             r'_GALLERY|_GENGRAPH|_GENHTML|_GENMENU|_GENPD|_GENSCRN|'119             r'_GENXTAB|_GETEXPR|_INCLUDE|_INCSEEK|_INDENT|_LMARGIN|_MAC|'120             r'_MENUDESIGNER|_MLINE|_PADVANCE|_PAGENO|_PAGETOTAL|_PBPAGE|'121             r'_PCOLNO|_PCOPIES|_PDRIVER|_PDSETUP|_PECODE|_PEJECT|_PEPAGE|'122             r'_PLENGTH|_PLINENO|_PLOFFSET|_PPITCH|_PQUALITY|_PRETEXT|'123             r'_PSCODE|_PSPACING|_PWAIT|_RMARGIN|_REPORTBUILDER|'124             r'_REPORTOUTPUT|_REPORTPREVIEW|_SAMPLES|_SCCTEXT|_SCREEN|'125             r'_SHELL|_SPELLCHK|_STARTUP|_TABS|_TALLY|_TASKPANE|_TEXT|'126             r'_THROTTLE|_TOOLBOX|_TOOLTIPTIMEOUT|_TRANSPORT|_TRIGGERLEVEL|'127             r'_UNIX|_VFP|_WINDOWS|_WIZARD|_WRAP', Keyword.Pseudo),128 129            (r'THISFORMSET|THISFORM|THIS', Name.Builtin),130 131            (r'Application|CheckBox|Collection|Column|ComboBox|'132             r'CommandButton|CommandGroup|Container|Control|CursorAdapter|'133             r'Cursor|Custom|DataEnvironment|DataObject|EditBox|'134             r'Empty|Exception|Fields|Files|File|FormSet|Form|FoxCode|'135             r'Grid|Header|Hyperlink|Image|Label|Line|ListBox|Objects|'136             r'OptionButton|OptionGroup|PageFrame|Page|ProjectHook|Projects|'137             r'Project|Relation|ReportListener|Separator|Servers|Server|'138             r'Session|Shape|Spinner|Tables|TextBox|Timer|ToolBar|'139             r'XMLAdapter|XMLField|XMLTable', Name.Class),140 141            (r'm\.[a-z_]\w*', Name.Variable),142            (r'\.(F|T|AND|OR|NOT|NULL)\.|\b(AND|OR|NOT|NULL)\b', Operator.Word),143 144            (r'\.(ActiveColumn|ActiveControl|ActiveForm|ActivePage|'145             r'ActiveProject|ActiveRow|AddLineFeeds|ADOCodePage|Alias|'146             r'Alignment|Align|AllowAddNew|AllowAutoColumnFit|'147             r'AllowCellSelection|AllowDelete|AllowHeaderSizing|'148             r'AllowInsert|AllowModalMessages|AllowOutput|AllowRowSizing|'149             r'AllowSimultaneousFetch|AllowTabs|AllowUpdate|'150             r'AlwaysOnBottom|AlwaysOnTop|Anchor|Application|'151             r'AutoActivate|AutoCenter|AutoCloseTables|AutoComplete|'152             r'AutoCompSource|AutoCompTable|AutoHideScrollBar|'153             r'AutoIncrement|AutoOpenTables|AutoRelease|AutoSize|'154             r'AutoVerbMenu|AutoYield|BackColor|ForeColor|BackStyle|'155             r'BaseClass|BatchUpdateCount|BindControls|BorderColor|'156             r'BorderStyle|BorderWidth|BoundColumn|BoundTo|Bound|'157             r'BreakOnError|BufferModeOverride|BufferMode|'158             r'BuildDateTime|ButtonCount|Buttons|Cancel|Caption|'159             r'Centered|Century|ChildAlias|ChildOrder|ChildTable|'160             r'ClassLibrary|Class|ClipControls|Closable|CLSID|CodePage|'161             r'ColorScheme|ColorSource|ColumnCount|ColumnLines|'162             r'ColumnOrder|Columns|ColumnWidths|CommandClauses|'163             r'Comment|CompareMemo|ConflictCheckCmd|ConflictCheckType|'164             r'ContinuousScroll|ControlBox|ControlCount|Controls|'165             r'ControlSource|ConversionFunc|Count|CurrentControl|'166             r'CurrentDataSession|CurrentPass|CurrentX|CurrentY|'167             r'CursorSchema|CursorSource|CursorStatus|Curvature|'168             r'Database|DataSessionID|DataSession|DataSourceType|'169             r'DataSource|DataType|DateFormat|DateMark|Debug|'170             r'DeclareXMLPrefix|DEClassLibrary|DEClass|DefaultFilePath|'171             r'Default|DefOLELCID|DeleteCmdDataSourceType|DeleteCmdDataSource|'172             r'DeleteCmd|DeleteMark|Description|Desktop|'173             r'Details|DisabledBackColor|DisabledForeColor|'174             r'DisabledItemBackColor|DisabledItemForeColor|'175             r'DisabledPicture|DisableEncode|DisplayCount|'176             r'DisplayValue|Dockable|Docked|DockPosition|'177             r'DocumentFile|DownPicture|DragIcon|DragMode|DrawMode|'178             r'DrawStyle|DrawWidth|DynamicAlignment|DynamicBackColor|'179             r'DynamicForeColor|DynamicCurrentControl|DynamicFontBold|'180             r'DynamicFontItalic|DynamicFontStrikethru|'181             r'DynamicFontUnderline|DynamicFontName|DynamicFontOutline|'182             r'DynamicFontShadow|DynamicFontSize|DynamicInputMask|'183             r'DynamicLineHeight|EditorOptions|Enabled|'184             r'EnableHyperlinks|Encrypted|ErrorNo|Exclude|Exclusive|'185             r'FetchAsNeeded|FetchMemoCmdList|FetchMemoDataSourceType|'186             r'FetchMemoDataSource|FetchMemo|FetchSize|'187             r'FileClassLibrary|FileClass|FillColor|FillStyle|Filter|'188             r'FirstElement|FirstNestedTable|Flags|FontBold|FontItalic|'189             r'FontStrikethru|FontUnderline|FontCharSet|FontCondense|'190             r'FontExtend|FontName|FontOutline|FontShadow|FontSize|'191             r'ForceCloseTag|Format|FormCount|FormattedOutput|Forms|'192             r'FractionDigits|FRXDataSession|FullName|GDIPlusGraphics|'193             r'GridLineColor|GridLines|GridLineWidth|HalfHeightCaption|'194             r'HeaderClassLibrary|HeaderClass|HeaderHeight|Height|'195             r'HelpContextID|HideSelection|HighlightBackColor|'196             r'HighlightForeColor|HighlightStyle|HighlightRowLineWidth|'197             r'HighlightRow|Highlight|HomeDir|Hours|HostName|'198             r'HScrollSmallChange|hWnd|Icon|IncrementalSearch|Increment|'199             r'InitialSelectedAlias|InputMask|InsertCmdDataSourceType|'200             r'InsertCmdDataSource|InsertCmdRefreshCmd|'201             r'InsertCmdRefreshFieldList|InsertCmdRefreshKeyFieldList|'202             r'InsertCmd|Instancing|IntegralHeight|'203             r'Interval|IMEMode|IsAttribute|IsBase64|IsBinary|IsNull|'204             r'IsDiffGram|IsLoaded|ItemBackColor,|ItemData|ItemIDData|'205             r'ItemTips|IXMLDOMElement|KeyboardHighValue|KeyboardLowValue|'206             r'Keyfield|KeyFieldList|KeyPreview|KeySort|LanguageOptions|'207             r'LeftColumn|Left|LineContents|LineNo|LineSlant|LinkMaster|'208             r'ListCount|ListenerType|ListIndex|ListItemID|ListItem|'209             r'List|LockColumnsLeft|LockColumns|LockScreen|MacDesktop|'210             r'MainFile|MapN19_4ToCurrency|MapBinary|MapVarchar|Margin|'211             r'MaxButton|MaxHeight|MaxLeft|MaxLength|MaxRecords|MaxTop|'212             r'MaxWidth|MDIForm|MemberClassLibrary|MemberClass|'213             r'MemoWindow|Message|MinButton|MinHeight|MinWidth|'214             r'MouseIcon|MousePointer|Movable|MoverBars|MultiSelect|'215             r'Name|NestedInto|NewIndex|NewItemID|NextSiblingTable|'216             r'NoCpTrans|NoDataOnLoad|NoData|NullDisplay|'217             r'NumberOfElements|Object|OLEClass|OLEDragMode|'218             r'OLEDragPicture|OLEDropEffects|OLEDropHasData|'219             r'OLEDropMode|OLEDropTextInsertion|OLELCID|'220             r'OLERequestPendingTimeout|OLEServerBusyRaiseError|'221             r'OLEServerBusyTimeout|OLETypeAllowed|OneToMany|'222             r'OpenViews|OpenWindow|Optimize|OrderDirection|Order|'223             r'OutputPageCount|OutputType|PageCount|PageHeight|'224             r'PageNo|PageOrder|Pages|PageTotal|PageWidth|'225             r'PanelLink|Panel|ParentAlias|ParentClass|ParentTable|'226             r'Parent|Partition|PasswordChar|PictureMargin|'227             r'PicturePosition|PictureSpacing|PictureSelectionDisplay|'228             r'PictureVal|Picture|Prepared|'229             r'PolyPoints|PreserveWhiteSpace|PreviewContainer|'230             r'PrintJobName|Procedure|PROCESSID|ProgID|ProjectHookClass|'231             r'ProjectHookLibrary|ProjectHook|QuietMode|'232             r'ReadCycle|ReadLock|ReadMouse|ReadObject|ReadOnly|'233             r'ReadSave|ReadTimeout|RecordMark|RecordSourceType|'234             r'RecordSource|RefreshAlias|'235             r'RefreshCmdDataSourceType|RefreshCmdDataSource|RefreshCmd|'236             r'RefreshIgnoreFieldList|RefreshTimeStamp|RelationalExpr|'237             r'RelativeColumn|RelativeRow|ReleaseType|Resizable|'238             r'RespectCursorCP|RespectNesting|RightToLeft|RotateFlip|'239             r'Rotation|RowColChange|RowHeight|RowSourceType|'240             r'RowSource|ScaleMode|SCCProvider|SCCStatus|ScrollBars|'241             r'Seconds|SelectCmd|SelectedID|'242             r'SelectedItemBackColor|SelectedItemForeColor|Selected|'243             r'SelectionNamespaces|SelectOnEntry|SelLength|SelStart|'244             r'SelText|SendGDIPlusImage|SendUpdates|ServerClassLibrary|'245             r'ServerClass|ServerHelpFile|ServerName|'246             r'ServerProject|ShowTips|ShowInTaskbar|ShowWindow|'247             r'Sizable|SizeBox|SOM|Sorted|Sparse|SpecialEffect|'248             r'SpinnerHighValue|SpinnerLowValue|SplitBar|StackLevel|'249             r'StartMode|StatusBarText|StatusBar|Stretch|StrictDateEntry|'250             r'Style|TabIndex|Tables|TabOrientation|Tabs|TabStop|'251             r'TabStretch|TabStyle|Tag|TerminateRead|Text|Themes|'252             r'ThreadID|TimestampFieldList|TitleBar|ToolTipText|'253             r'TopIndex|TopItemID|Top|TwoPassProcess|TypeLibCLSID|'254             r'TypeLibDesc|TypeLibName|Type|Unicode|UpdatableFieldList|'255             r'UpdateCmdDataSourceType|UpdateCmdDataSource|'256             r'UpdateCmdRefreshCmd|UpdateCmdRefreshFieldList|'257             r'UpdateCmdRefreshKeyFieldList|UpdateCmd|'258             r'UpdateGramSchemaLocation|UpdateGram|UpdateNameList|UpdateType|'259             r'UseCodePage|UseCursorSchema|UseDeDataSource|UseMemoSize|'260             r'UserValue|UseTransactions|UTF8Encoded|Value|VersionComments|'261             r'VersionCompany|VersionCopyright|VersionDescription|'262             r'VersionNumber|VersionProduct|VersionTrademarks|Version|'263             r'VFPXMLProgID|ViewPortHeight|ViewPortLeft|'264             r'ViewPortTop|ViewPortWidth|VScrollSmallChange|View|Visible|'265             r'VisualEffect|WhatsThisButton|WhatsThisHelpID|WhatsThisHelp|'266             r'WhereType|Width|WindowList|WindowState|WindowType|WordWrap|'267             r'WrapCharInCDATA|WrapInCDATA|WrapMemoInCDATA|XMLAdapter|'268             r'XMLConstraints|XMLNameIsXPath|XMLNamespace|XMLName|'269             r'XMLPrefix|XMLSchemaLocation|XMLTable|XMLType|'270             r'XSDfractionDigits|XSDmaxLength|XSDtotalDigits|'271             r'XSDtype|ZoomBox)', Name.Attribute),272 273            (r'\.(ActivateCell|AddColumn|AddItem|AddListItem|AddObject|'274             r'AddProperty|AddTableSchema|AddToSCC|Add|'275             r'ApplyDiffgram|Attach|AutoFit|AutoOpen|Box|Build|'276             r'CancelReport|ChangesToCursor|CheckIn|CheckOut|Circle|'277             r'CleanUp|ClearData|ClearStatus|Clear|CloneObject|CloseTables|'278             r'Close|Cls|CursorAttach|CursorDetach|CursorFill|'279             r'CursorRefresh|DataToClip|DelayedMemoFetch|DeleteColumn|'280             r'Dock|DoMessage|DoScroll|DoStatus|DoVerb|Drag|Draw|Eval|'281             r'GetData|GetDockState|GetFormat|GetKey|GetLatestVersion|'282             r'GetPageHeight|GetPageWidth|Help|Hide|IncludePageInOutput|'283             r'IndexToItemID|ItemIDToIndex|Item|LoadXML|Line|Modify|'284             r'MoveItem|Move|Nest|OLEDrag|OnPreviewClose|OutputPage|'285             r'Point|Print|PSet|Quit|ReadExpression|ReadMethod|'286             r'RecordRefresh|Refresh|ReleaseXML|Release|RemoveFromSCC|'287             r'RemoveItem|RemoveListItem|RemoveObject|Remove|'288             r'Render|Requery|RequestData|ResetToDefault|Reset|Run|'289             r'SaveAsClass|SaveAs|SetAll|SetData|SetFocus|SetFormat|'290             r'SetMain|SetVar|SetViewPort|ShowWhatsThis|Show|'291             r'SupportsListenerType|TextHeight|TextWidth|ToCursor|'292             r'ToXML|UndoCheckOut|Unnest|UpdateStatus|WhatsThisMode|'293             r'WriteExpression|WriteMethod|ZOrder)', Name.Function),294 295            (r'\.(Activate|AdjustObjectSize|AfterBand|AfterBuild|'296             r'AfterCloseTables|AfterCursorAttach|AfterCursorClose|'297             r'AfterCursorDetach|AfterCursorFill|AfterCursorRefresh|'298             r'AfterCursorUpdate|AfterDelete|AfterInsert|'299             r'AfterRecordRefresh|AfterUpdate|AfterDock|AfterReport|'300             r'AfterRowColChange|BeforeBand|BeforeCursorAttach|'301             r'BeforeCursorClose|BeforeCursorDetach|BeforeCursorFill|'302             r'BeforeCursorRefresh|BeforeCursorUpdate|BeforeDelete|'303             r'BeforeInsert|BeforeDock|BeforeOpenTables|'304             r'BeforeRecordRefresh|BeforeReport|BeforeRowColChange|'305             r'BeforeUpdate|Click|dbc_Activate|dbc_AfterAddTable|'306             r'dbc_AfterAppendProc|dbc_AfterCloseTable|dbc_AfterCopyProc|'307             r'dbc_AfterCreateConnection|dbc_AfterCreateOffline|'308             r'dbc_AfterCreateTable|dbc_AfterCreateView|dbc_AfterDBGetProp|'309             r'dbc_AfterDBSetProp|dbc_AfterDeleteConnection|'310             r'dbc_AfterDropOffline|dbc_AfterDropTable|'311             r'dbc_AfterModifyConnection|dbc_AfterModifyProc|'312             r'dbc_AfterModifyTable|dbc_AfterModifyView|dbc_AfterOpenTable|'313             r'dbc_AfterRemoveTable|dbc_AfterRenameConnection|'314             r'dbc_AfterRenameTable|dbc_AfterRenameView|'315             r'dbc_AfterValidateData|dbc_BeforeAddTable|'316             r'dbc_BeforeAppendProc|dbc_BeforeCloseTable|'317             r'dbc_BeforeCopyProc|dbc_BeforeCreateConnection|'318             r'dbc_BeforeCreateOffline|dbc_BeforeCreateTable|'319             r'dbc_BeforeCreateView|dbc_BeforeDBGetProp|'320             r'dbc_BeforeDBSetProp|dbc_BeforeDeleteConnection|'321             r'dbc_BeforeDropOffline|dbc_BeforeDropTable|'322             r'dbc_BeforeModifyConnection|dbc_BeforeModifyProc|'323             r'dbc_BeforeModifyTable|dbc_BeforeModifyView|'324             r'dbc_BeforeOpenTable|dbc_BeforeRemoveTable|'325             r'dbc_BeforeRenameConnection|dbc_BeforeRenameTable|'326             r'dbc_BeforeRenameView|dbc_BeforeValidateData|'327             r'dbc_CloseData|dbc_Deactivate|dbc_ModifyData|dbc_OpenData|'328             r'dbc_PackData|DblClick|Deactivate|Deleted|Destroy|DoCmd|'329             r'DownClick|DragDrop|DragOver|DropDown|ErrorMessage|Error|'330             r'EvaluateContents|GotFocus|Init|InteractiveChange|KeyPress|'331             r'LoadReport|Load|LostFocus|Message|MiddleClick|MouseDown|'332             r'MouseEnter|MouseLeave|MouseMove|MouseUp|MouseWheel|Moved|'333             r'OLECompleteDrag|OLEDragOver|OLEGiveFeedback|OLESetData|'334             r'OLEStartDrag|OnMoveItem|Paint|ProgrammaticChange|'335             r'QueryAddFile|QueryModifyFile|QueryNewFile|QueryRemoveFile|'336             r'QueryRunFile|QueryUnload|RangeHigh|RangeLow|ReadActivate|'337             r'ReadDeactivate|ReadShow|ReadValid|ReadWhen|Resize|'338             r'RightClick|SCCInit|SCCDestroy|Scrolled|Timer|UIEnable|'339             r'UnDock|UnloadReport|Unload|UpClick|Valid|When)', Name.Function),340 341            (r'\s+', Text),342            # everything else is not colored343            (r'.', Text),344        ],345        'newline': [346            (r'\*.*?$', Comment.Single, '#pop'),347            (r'(ACCEPT|ACTIVATE\s*MENU|ACTIVATE\s*POPUP|ACTIVATE\s*SCREEN|'348             r'ACTIVATE\s*WINDOW|APPEND|APPEND\s*FROM|APPEND\s*FROM\s*ARRAY|'349             r'APPEND\s*GENERAL|APPEND\s*MEMO|ASSIST|AVERAGE|BLANK|BROWSE|'350             r'BUILD\s*APP|BUILD\s*EXE|BUILD\s*PROJECT|CALCULATE|CALL|'351             r'CANCEL|CHANGE|CLEAR|CLOSE|CLOSE\s*MEMO|COMPILE|CONTINUE|'352             r'COPY\s*FILE|COPY\s*INDEXES|COPY\s*MEMO|COPY\s*STRUCTURE|'353             r'COPY\s*STRUCTURE\s*EXTENDED|COPY\s*TAG|COPY\s*TO|'354             r'COPY\s*TO\s*ARRAY|COUNT|CREATE|CREATE\s*COLOR\s*SET|'355             r'CREATE\s*CURSOR|CREATE\s*FROM|CREATE\s*LABEL|CREATE\s*MENU|'356             r'CREATE\s*PROJECT|CREATE\s*QUERY|CREATE\s*REPORT|'357             r'CREATE\s*SCREEN|CREATE\s*TABLE|CREATE\s*VIEW|DDE|'358             r'DEACTIVATE\s*MENU|DEACTIVATE\s*POPUP|DEACTIVATE\s*WINDOW|'359             r'DECLARE|DEFINE\s*BAR|DEFINE\s*BOX|DEFINE\s*MENU|'360             r'DEFINE\s*PAD|DEFINE\s*POPUP|DEFINE\s*WINDOW|DELETE|'361             r'DELETE\s*FILE|DELETE\s*TAG|DIMENSION|DIRECTORY|DISPLAY|'362             r'DISPLAY\s*FILES|DISPLAY\s*MEMORY|DISPLAY\s*STATUS|'363             r'DISPLAY\s*STRUCTURE|DO|EDIT|EJECT|EJECT\s*PAGE|ERASE|'364             r'EXIT|EXPORT|EXTERNAL|FILER|FIND|FLUSH|FUNCTION|GATHER|'365             r'GETEXPR|GO|GOTO|HELP|HIDE\s*MENU|HIDE\s*POPUP|'366             r'HIDE\s*WINDOW|IMPORT|INDEX|INPUT|INSERT|JOIN|KEYBOARD|'367             r'LABEL|LIST|LOAD|LOCATE|LOOP|MENU|MENU\s*TO|MODIFY\s*COMMAND|'368             r'MODIFY\s*FILE|MODIFY\s*GENERAL|MODIFY\s*LABEL|MODIFY\s*MEMO|'369             r'MODIFY\s*MENU|MODIFY\s*PROJECT|MODIFY\s*QUERY|'370             r'MODIFY\s*REPORT|MODIFY\s*SCREEN|MODIFY\s*STRUCTURE|'371             r'MODIFY\s*WINDOW|MOVE\s*POPUP|MOVE\s*WINDOW|NOTE|'372             r'ON\s*APLABOUT|ON\s*BAR|ON\s*ERROR|ON\s*ESCAPE|'373             r'ON\s*EXIT\s*BAR|ON\s*EXIT\s*MENU|ON\s*EXIT\s*PAD|'374             r'ON\s*EXIT\s*POPUP|ON\s*KEY|ON\s*KEY\s*=|ON\s*KEY\s*LABEL|'375             r'ON\s*MACHELP|ON\s*PAD|ON\s*PAGE|ON\s*READERROR|'376             r'ON\s*SELECTION\s*BAR|ON\s*SELECTION\s*MENU|'377             r'ON\s*SELECTION\s*PAD|ON\s*SELECTION\s*POPUP|ON\s*SHUTDOWN|'378             r'PACK|PARAMETERS|PLAY\s*MACRO|POP\s*KEY|POP\s*MENU|'379             r'POP\s*POPUP|PRIVATE|PROCEDURE|PUBLIC|PUSH\s*KEY|'380             r'PUSH\s*MENU|PUSH\s*POPUP|QUIT|READ|READ\s*MENU|RECALL|'381             r'REINDEX|RELEASE|RELEASE\s*MODULE|RENAME|REPLACE|'382             r'REPLACE\s*FROM\s*ARRAY|REPORT|RESTORE\s*FROM|'383             r'RESTORE\s*MACROS|RESTORE\s*SCREEN|RESTORE\s*WINDOW|'384             r'RESUME|RETRY|RETURN|RUN|RUN\s*\/N"|RUNSCRIPT|'385             r'SAVE\s*MACROS|SAVE\s*SCREEN|SAVE\s*TO|SAVE\s*WINDOWS|'386             r'SCATTER|SCROLL|SEEK|SELECT|SET|SET\s*ALTERNATE|'387             r'SET\s*ANSI|SET\s*APLABOUT|SET\s*AUTOSAVE|SET\s*BELL|'388             r'SET\s*BLINK|SET\s*BLOCKSIZE|SET\s*BORDER|SET\s*BRSTATUS|'389             r'SET\s*CARRY|SET\s*CENTURY|SET\s*CLEAR|SET\s*CLOCK|'390             r'SET\s*COLLATE|SET\s*COLOR\s*OF|SET\s*COLOR\s*OF\s*SCHEME|'391             r'SET\s*COLOR\s*SET|SET\s*COLOR\s*TO|SET\s*COMPATIBLE|'392             r'SET\s*CONFIRM|SET\s*CONSOLE|SET\s*CURRENCY|SET\s*CURSOR|'393             r'SET\s*DATE|SET\s*DEBUG|SET\s*DECIMALS|SET\s*DEFAULT|'394             r'SET\s*DELETED|SET\s*DELIMITERS|SET\s*DEVELOPMENT|'395             r'SET\s*DEVICE|SET\s*DISPLAY|SET\s*DOHISTORY|SET\s*ECHO|'396             r'SET\s*ESCAPE|SET\s*EXACT|SET\s*EXCLUSIVE|SET\s*FIELDS|'397             r'SET\s*FILTER|SET\s*FIXED|SET\s*FORMAT|SET\s*FULLPATH|'398             r'SET\s*FUNCTION|SET\s*HEADINGS|SET\s*HELP|SET\s*HELPFILTER|'399             r'SET\s*HOURS|SET\s*INDEX|SET\s*INTENSITY|SET\s*KEY|'400             r'SET\s*KEYCOMP|SET\s*LIBRARY|SET\s*LOCK|SET\s*LOGERRORS|'401             r'SET\s*MACDESKTOP|SET\s*MACHELP|SET\s*MACKEY|SET\s*MARGIN|'402             r'SET\s*MARK\s*OF|SET\s*MARK\s*TO|SET\s*MEMOWIDTH|'403             r'SET\s*MESSAGE|SET\s*MOUSE|SET\s*MULTILOCKS|SET\s*NEAR|'404             r'SET\s*NOCPTRANS|SET\s*NOTIFY|SET\s*ODOMETER|SET\s*OPTIMIZE|'405             r'SET\s*ORDER|SET\s*PALETTE|SET\s*PATH|SET\s*PDSETUP|'406             r'SET\s*POINT|SET\s*PRINTER|SET\s*PROCEDURE|SET\s*READBORDER|'407             r'SET\s*REFRESH|SET\s*RELATION|SET\s*RELATION\s*OFF|'408             r'SET\s*REPROCESS|SET\s*RESOURCE|SET\s*SAFETY|SET\s*SCOREBOARD|'409             r'SET\s*SEPARATOR|SET\s*SHADOWS|SET\s*SKIP|SET\s*SKIP\s*OF|'410             r'SET\s*SPACE|SET\s*STATUS|SET\s*STATUS\s*BAR|SET\s*STEP|'411             r'SET\s*STICKY|SET\s*SYSMENU|SET\s*TALK|SET\s*TEXTMERGE|'412             r'SET\s*TEXTMERGE\s*DELIMITERS|SET\s*TOPIC|SET\s*TRBETWEEN|'413             r'SET\s*TYPEAHEAD|SET\s*UDFPARMS|SET\s*UNIQUE|SET\s*VIEW|'414             r'SET\s*VOLUME|SET\s*WINDOW\s*OF\s*MEMO|SET\s*XCMDFILE|'415             r'SHOW\s*GET|SHOW\s*GETS|SHOW\s*MENU|SHOW\s*OBJECT|'416             r'SHOW\s*POPUP|SHOW\s*WINDOW|SIZE\s*POPUP|SKIP|SORT|'417             r'STORE|SUM|SUSPEND|TOTAL|TYPE|UNLOCK|UPDATE|USE|WAIT|'418             r'ZAP|ZOOM\s*WINDOW|DO\s*CASE|CASE|OTHERWISE|ENDCASE|'419             r'DO\s*WHILE|ENDDO|FOR|ENDFOR|NEXT|IF|ELSE|ENDIF|PRINTJOB|'420             r'ENDPRINTJOB|SCAN|ENDSCAN|TEXT|ENDTEXT|=)',421                Keyword.Reserved, '#pop'),422            (r'#\s*(IF|ELIF|ELSE|ENDIF|DEFINE|IFDEF|IFNDEF|INCLUDE)',423                Comment.Preproc, '#pop'),424            (r'(m\.)?[a-z_]\w*', Name.Variable, '#pop'),425            (r'.', Text, '#pop'),426        ],427    }428