<?xml version="1.0" encoding="UTF-8"?><!DOCTYPE language><language name="ANS-Forth94" version="8" kateversion="5.62" section="Sources" extensions="*.4th;*.4TH;*.f;*.F;*.frt;*.FRT;*.fs;*.FS;*.fth;*.FTH;*.seq;*.SEQ" mimetype="" author="Mark Corbin (mark@dibsco.co.uk)" license="LGPLv2.1+" priority="5"><highlighting><list name="core-keywords"><item>!</item><item>#</item><item>#></item><item>#S</item><item>'</item><item>(</item><item>*</item><item>*/</item><item>*/MOD</item><item>+</item><item>+!</item><item>+LOOP</item><item>,</item><item>-</item><item>.</item><item>."</item><item>/</item><item>/MOD</item><item>0&lt;</item><item>0=</item><item>1+</item><item>1-</item><item>2!</item><item>2*</item><item>2/</item><item>2@</item><item>2DROP</item><item>2DUP</item><item>2OVER</item><item>2SWAP</item><item>:</item><item>;</item><item>&lt;</item><item>&lt;#</item><item>=</item><item>></item><item>>BODY</item><item>>IN</item><item>>NUMBER</item><item>>R</item><item>?DUP</item><item>@</item><item>ABORT</item><item>ABORT"</item><item>ABS</item><item>ACCEPT</item><item>ALIGN</item><item>ALIGNED</item><item>ALLOT</item><item>AND</item><item>BASE</item><item>BEGIN</item><item>BL</item><item>C!</item><item>C,</item><item>C@</item><item>CELL+</item><item>CELLS</item><item>CHAR</item><item>CHAR+</item><item>CHARS</item><item>CONSTANT</item><item>COUNT</item><item>CR</item><item>CREATE</item><item>DECIMAL</item><item>DEPTH</item><item>DO</item><item>DOES></item><item>DROP</item><item>DUP</item><item>ELSE</item><item>EMIT</item><item>ENVIRONMENT?</item><item>EVALUATE</item><item>EXECUTE</item><item>EXIT</item><item>FILL</item><item>FIND</item><item>FM/MOD</item><item>HERE</item><item>HOLD</item><item>I</item><item>IF</item><item>IMMEDIATE</item><item>INVERT</item><item>J</item><item>KEY</item><item>LEAVE</item><item>LITERAL</item><item>LOOP</item><item>LSHIFT</item><item>M*</item><item>MAX</item><item>MIN</item><item>MOD</item><item>MOVE</item><item>NEGATE</item><item>OR</item><item>OVER</item><item>POSTPONE</item><item>QUIT</item><item>R></item><item>R@</item><item>RECURSE</item><item>REPEAT</item><item>ROT</item><item>RSHIFT</item><item>S"</item><item>S>D</item><item>SIGN</item><item>SM/REM</item><item>SOURCE</item><item>SPACE</item><item>SPACES</item><item>STATE</item><item>SWAP</item><item>THEN</item><item>TYPE</item><item>U.</item><item>U&lt;</item><item>UM*</item><item>UM/MOD</item><item>UNLOOP</item><item>UNTIL</item><item>VARIABLE</item><item>WHILE</item><item>WORD</item><item>XOR</item><item>[</item><item>[']</item><item>[CHAR]</item><item>]</item></list><list name="core-ext-keywords"><item>.(</item><item>.R</item><item>0&lt;></item><item>0></item><item>2>R</item><item>2R></item><item>2R@</item><item>:NONAME</item><item>&lt;></item><item>?DO</item><item>AGAIN</item><item>C"</item><item>CASE</item><item>COMPILE,</item><item>ENDCASE</item><item>ENDOF</item><item>ERASE</item><item>FALSE</item><item>HEX</item><item>MARKER</item><item>NIP</item><item>OF</item><item>PAD</item><item>PARSE</item><item>PICK</item><item>REFILL</item><item>RESTORE-INPUT</item><item>ROLL</item><item>SAVE-INPUT</item><item>SOURCE-ID</item><item>TO</item><item>TRUE</item><item>TUCK</item><item>U.R</item><item>U></item><item>UNUSED</item><item>VALUE</item><item>WITHIN</item><item>[COMPILE]</item><item>\</item></list><list name="obsolete-core-ext-keywords"><item>#TIB</item><item>CONVERT</item><item>EXPECT</item><item>QUERY</item><item>SPAN</item><item>TIB</item></list><list name="block-keywords"><item>BLK</item><item>BLOCK</item><item>BUFFER</item><item>EVALUATE</item><item>FLUSH</item><item>LOAD</item><item>SAVE-BUFFERS</item><item>UPDATE</item></list><list name="block-ext-keywords"><item>EMPTY-BUFFERS</item><item>LIST</item><item>REFILL</item><item>SCR</item><item>THRU</item><item>\</item></list><list name="double-keywords"><item>2CONSTANT</item><item>2LITERAL</item><item>2VARIABLE</item><item>D+</item><item>D-</item><item>D.</item><item>D.R</item><item>D0&lt;</item><item>D0=</item><item>D2*</item><item>D2/</item><item>D&lt;</item><item>D=</item><item>D>S</item><item>DABS</item><item>DMAX</item><item>DMIN</item><item>DNEGATE</item><item>M*/</item><item>M+</item></list><list name="double-ext-keywords"><item>2ROT</item><item>DU&lt;</item></list><list name="exception-keywords"><item>CATCH</item><item>THROW</item></list><list name="exception-ext-keywords"><item>ABORT</item><item>ABORT"</item></list><list name="facility-keywords"><item>AT-XY</item><item>KEY?</item><item>PAGE</item></list><list name="facility-ext-keywords"><item>EKEY</item><item>EKEY>CHAR</item><item>EKEY?</item><item>EMIT?</item><item>MS</item><item>TIME&amp;DATE</item></list><list name="file-keywords"><item>(</item><item>BIN</item><item>CLOSE-FILE</item><item>CREATE-FILE</item><item>DELETE-FILE</item><item>FILE-POSITION</item><item>FILE-SIZE</item><item>INCLUDE-FILE</item><item>INCLUDED</item><item>OPEN-FILE</item><item>R/O</item><item>R/W</item><item>READ-FILE</item><item>READ-LINE</item><item>REPOSITION-FILE</item><item>RESIZE-FILE</item><item>S"</item><item>SOURCE-ID</item><item>W/O</item><item>WRITE-FILE</item><item>WRITE-LINE</item></list><list name="file-ext-keywords"><item>FILE-STATUS</item><item>FLUSH-FILE</item><item>REFILL</item><item>RENAME-FILE</item></list><list name="floating-keywords"><item>>FLOAT</item><item>D>F</item><item>F!</item><item>F*</item><item>F+</item><item>F-</item><item>F/</item><item>F0&lt;</item><item>F0=</item><item>F&lt;</item><item>F>D</item><item>F@</item><item>FALIGN</item><item>FALIGNED</item><item>FCONSTANT</item><item>FDEPTH</item><item>FDROP</item><item>FDUP</item><item>FLITERAL</item><item>FLOAT+</item><item>FLOATS</item><item>FLOOR</item><item>FMAX</item><item>FMIN</item><item>FNEGATE</item><item>FOVER</item><item>FROT</item><item>FROUND</item><item>FSWAP</item><item>FVARIABLE</item><item>REPRESENT</item></list><list name="floating-ext-keywords"><item>DF!</item><item>DF@</item><item>DFALIGN</item><item>DFALIGNED</item><item>DFLOAT+</item><item>DFLOATS</item><item>F**</item><item>F.</item><item>FABS</item><item>FACOS</item><item>FACOSH</item><item>FALOG</item><item>FASIN</item><item>FASINH</item><item>FATAN</item><item>FATAN2</item><item>FATANH</item><item>FCOS</item><item>FCOSH</item><item>FE.</item><item>FEXP</item><item>FEXPM1</item><item>FLN</item><item>FLNP1</item><item>FLOG</item><item>FS.</item><item>FSIN</item><item>FSINCOS</item><item>FSINH</item><item>FSQRT</item><item>FTAN</item><item>FTANH</item><item>F~</item><item>PRECISION</item><item>SET-PRECISION</item><item>SF!</item><item>SF@</item><item>SFALIGN</item><item>SFALIGNED</item><item>SFLOAT+</item><item>SFLOATS</item></list><list name="local-keywords"><item>(LOCAL)</item><item>TO</item></list><list name="local-ext-keywords"><item>LOCALS|</item></list><list name="memory-keywords"><item>ALLOCATE</item><item>FREE</item><item>RESIZE</item></list><list name="tools-keywords"><item>.S</item><item>?</item><item>DUMP</item><item>SEE</item><item>WORDS</item></list><list name="tools-ext-keywords"><item>;CODE</item><item>AHEAD</item><item>ASSEMBLER</item><item>BYE</item><item>CODE</item><item>CS-PICK</item><item>CS-ROLL</item><item>EDITOR</item><item>STATE</item><item>[ELSE]</item><item>[IF]</item><item>[THEN]</item></list><list name="obsolete-tools-ext-keywords"><item>FORGET</item></list><list name="search-keywords"><item>DEFINITIONS</item><item>FIND</item><item>FORTH-WORDLIST</item><item>GET-CURRENT</item><item>GET-ORDER</item><item>SEARCH-WORDLIST</item><item>SET-CURRENT</item><item>SET-ORDER</item><item>WORDLIST</item></list><list name="search-ext-keywords"><item>ALSO</item><item>FORTH</item><item>ONLY</item><item>ORDER</item><item>PREVIOUS</item></list><list name="string-keywords"><item>-TRAILING</item><item>/STRING</item><item>BLANK</item><item>CMOVE</item><item>CMOVE></item><item>COMPARE</item><item>SEARCH</item><item>SLITERAL</item></list><contexts><context name="Normal" attribute="Normal Text"><DetectSpaces/><RegExpr String="(^|\s+)[\(]($|\s+)" attribute="Core Keyword" context="Comment" beginRegion="comment"/><RegExpr String="(^|\s+)(CHAR|[[]CHAR[]])($|\s+)" attribute="Core Keyword" context="Char" insensitive="1"/><RegExpr String="(^|\s+)(BEGIN|DO|IF)($|\s+)" attribute="Core Keyword" beginRegion="block" insensitive="1"/><RegExpr String="(^|\s+)([;]|LOOP|[+]LOOP|THEN|REPEAT|UNTIL)($|\s+)" attribute="Core Keyword" endRegion="block" insensitive="1"/><RegExpr String="(^|\s+)([:])($|\s+)" attribute="Core Keyword" context="Word" beginRegion="block" insensitive="1"/><RegExpr String="(^|\s+)([']|CREATE|POSTPONE)($|\s+)" attribute="Core Keyword" context="Word" insensitive="1"/><RegExpr String="(^|\s+)ELSE($|\s+)" attribute="Core Keyword" beginRegion="block" endRegion="block" insensitive="1"/><RegExpr String='(^|\s+)([.]"|ABORT"|S")($|\s+)' attribute="Core Keyword" context="String" insensitive="1"/><RegExpr String="(^|\s+)(WORD)($|\s+)" attribute="Core Keyword" context="Parse String" insensitive="1"/><RegExpr String="(^|\s+)(CONSTANT)($|\s+)" attribute="Core Keyword" context="Constant" insensitive="1"/><RegExpr String="(^|\s+)(VARIABLE)($|\s+)" attribute="Core Keyword" context="Variable" insensitive="1"/><RegExpr String="(^|\s+)[\\]($|\s+)" attribute="Core Ext Keyword" context="Single Comment"/><RegExpr String="(^|\s+)([?]DO|CASE|OF)($|\s+)" attribute="Core Ext Keyword" beginRegion="block" insensitive="1"/><RegExpr String="(^|\s+)(AGAIN|ENDCASE|ENDOF)($|\s+)" attribute="Core Ext Keyword" endRegion="block" insensitive="1"/><RegExpr String="(^|\s+)(MARKER|[[]COMPILE[]])($|\s+)" attribute="Core Ext Keyword" context="Word" insensitive="1"/><RegExpr String='(^|\s+)(C")($|\s+)' attribute="Core Ext Keyword" context="String" insensitive="1"/><RegExpr String="(^|\s+)(PARSE)($|\s+)" attribute="Core Ext Keyword" context="Parse String" insensitive="1"/><RegExpr String="(^|\s+)([\.][\(])($|\s+)" attribute="Core Ext Keyword" context="Display String"/><RegExpr String="(^|\s+)(TO|VALUE)($|\s+)" attribute="Core Ext Keyword" context="Variable" insensitive="1"/><RegExpr String="(^|\s+)(2CONSTANT)($|\s+)" attribute="Double Keyword" context="Constant" insensitive="1"/><RegExpr String="(^|\s+)(2VARIABLE)($|\s+)" attribute="Double Keyword" context="Variable" insensitive="1"/><RegExpr String="(^|\s+)(FCONSTANT)($|\s+)" attribute="Floating Keyword" context="Constant" insensitive="1"/><RegExpr String="(^|\s+)(FVARIABLE)($|\s+)" attribute="Floating Keyword" context="Variable" insensitive="1"/><RegExpr String="(^|\s+)(LOCALS\|)($|\s+)" attribute="Local Ext Keyword" context="Local" insensitive="1"/><RegExpr String="(^|\s+)(SEE)($|\s+)" attribute="Tools Keyword" context="Word" insensitive="1"/><RegExpr String="(^|\s+)(CODE)($|\s+)" attribute="Tools Ext Keyword" context="Word" insensitive="1"/><RegExpr String="(^|\s+)(FORGET)($|\s+)" attribute="Obs Tools Ext Keyword" context="Word" insensitive="1"/><keyword String="core-keywords" attribute="Core Keyword"/><keyword String="core-ext-keywords" attribute="Core Ext Keyword"/><keyword String="obsolete-core-ext-keywords" attribute="Obs Core Ext Keyword"/><keyword String="block-keywords" attribute="Block Keyword"/><keyword String="block-ext-keywords" attribute="Block Ext Keyword"/><keyword String="double-keywords" attribute="Double Keyword"/><keyword String="double-ext-keywords" attribute="Double Ext Keyword"/><keyword String="exception-keywords" attribute="Exception Keyword"/><keyword String="exception-ext-keywords" attribute="Exception Ext Keyword"/><keyword String="facility-keywords" attribute="Facility Keyword"/><keyword String="facility-ext-keywords" attribute="Facility Ext Keyword"/><keyword String="file-keywords" attribute="File Keyword"/><keyword String="file-ext-keywords" attribute="File Ext Keyword"/><keyword String="floating-keywords" attribute="Floating Keyword"/><keyword String="floating-ext-keywords" attribute="Floating Ext Keyword"/><keyword String="local-keywords" attribute="Local Keyword"/><keyword String="local-ext-keywords" attribute="Local Ext Keyword"/><keyword String="memory-keywords" attribute="Memory Keyword"/><keyword String="tools-keywords" attribute="Tools Keyword"/><keyword String="tools-ext-keywords" attribute="Tools Ext Keyword"/><keyword String="obsolete-tools-ext-keywords" attribute="Obs Tools Ext Keyword"/><keyword String="search-keywords" attribute="Search Keyword"/><keyword String="search-ext-keywords" attribute="Search Ext Keyword"/><keyword String="string-keywords" attribute="String Keyword"/><RegExpr String="(^|\s+)([-]?[0-9]+)($|\s+)" attribute="Single Number"/><RegExpr String="(^|\s+)([-]?[0-9]+[.][0-9]*)($|\s+)" attribute="Double Number"/><RegExpr String="(^|\s+)([+]|[-])?([0-9]+[.]?[0-9]*)(E|e)([+]|[-])?([0-9]*)($|\s+)" attribute="Float"/></context><context name="Word" attribute="Word" lineEndContext="#pop"><DetectChar char=" " attribute="Word" context="#pop"/></context><context name="Variable" attribute="Variable" lineEndContext="#pop"><DetectChar char=" " attribute="Variable" context="#pop"/></context><context name="Constant" attribute="Constant" lineEndContext="#pop"><DetectChar char=" " attribute="Constant" context="#pop"/></context><context name="Parse String" attribute="String" lineEndContext="#pop"><DetectChar char=" " attribute="Core Keyword" context="#pop"/></context><context name="String" attribute="String"><DetectChar char='"' attribute="Core Keyword" context="#pop"/></context><context name="Char" attribute="Char" lineEndContext="#pop"><DetectChar char=" " attribute="Char" context="#pop"/></context><context name="Comment" attribute="Comment"><DetectChar char=")" attribute="Core Keyword" context="#pop" endRegion="comment"/><IncludeRules context="##Comments"/></context><context name="Display String" attribute="String"><DetectChar char=")" attribute="Core Keyword" context="#pop"/></context><context name="Local" attribute="Local Variable" lineEndContext="#pop"><DetectChar char="|" attribute="Local Ext Keyword" context="#pop"/></context><context name="Single Comment" attribute="Comment" lineEndContext="#pop"><IncludeRules context="##Comments"/></context></contexts><itemDatas><itemData name="Normal Text" defStyleNum="dsNormal" spellChecking="0"/><itemData name="Core Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Core Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Obs Core Ext Keyword" defStyleNum="dsWarning" bold="1" spellChecking="0"/><itemData name="Block Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Block Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Double Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Double Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Exception Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Exception Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Facility Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Facility Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="File Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="File Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Floating Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Floating Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Local Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Local Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Memory Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Tools Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Tools Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Obs Tools Ext Keyword" defStyleNum="dsWarning" bold="1" spellChecking="0"/><itemData name="Search Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Search Ext Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="String Keyword" defStyleNum="dsKeyword" spellChecking="0"/><itemData name="Single Number" defStyleNum="dsBaseN" spellChecking="0"/><itemData name="Double Number" defStyleNum="dsBaseN" spellChecking="0"/><itemData name="Float" defStyleNum="dsFloat" spellChecking="0"/><itemData name="Comment" defStyleNum="dsComment"/><itemData name="String" defStyleNum="dsString"/><itemData name="Word" defStyleNum="dsFunction" spellChecking="0"/><itemData name="Char" defStyleNum="dsChar" spellChecking="0"/><itemData name="Constant" defStyleNum="dsDataType" spellChecking="0"/><itemData name="Variable" defStyleNum="dsDataType" spellChecking="0"/><itemData name="Local Variable" defStyleNum="dsDataType" spellChecking="0"/></itemDatas></highlighting><general><keywords casesensitive="0" weakDeliminator="!£$%^&amp;#'~|\(){}*+,-./=@:;&lt;>&#34;?[]"/><comments><comment name="multiLine" start="( " end=")" region="comment"/><comment name="singleLine" start="\ "/></comments></general></language>