<?xml version="1.0" encoding="windows-1251"?>
<SynUniHighlighter Version="2.0">
	<SyntaxColoring>
		<Info>
			<General Name="FoxPro 6" Extensions="prg" Version="1" Revision="0" Sample="*Operating System codes
#DEFINE DLLPATH_32S			&quot;\SYSTEM\&quot;		&amp;&amp;used for ODBC only
#DEFINE HKEY_CLASSES_ROOT           -2147483648  &amp;&amp; BITSET(0,31)
DEFINE CLASS registry AS custom
lLoadedINIs = .F.
PROCEDURE Init
DO CASE
CASE _DOS OR _UNIX OR _MAC
RETURN .F.
THIS.lhaderror = .T.
=MESSAGEBOX(MESSAGE())
IF TYPE(&quot;m.nRegKey&quot;) # &quot;N&quot; OR EMPTY(m.nRegKey)
m.nErrNum = THIS.OpenKey(m.cKeyPath,m.nUserKey)
IF m.nErrNum # ERROR_SUCCESS
ENDDEFINE" History=""/>
			<Author Name="Vitaly Nevzorov" Mail="nevzorov@yahoo.com" Web="www.delphist.com" Copyright="Copyright (c) Vitaly Nevzorov, 2002" Company="N/A" Remark=""/>
		</Info>
		<Schemes/>
		<Editor/>
		<MainRules Name="Root" Style="Root">
			<Attributes Foreground="clBlack" Background="clWhite"/>
			<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
			<SubRules>
				<Range Name="Remarks *" Style="Remarks *">
					<Attributes Foreground="$00A00000" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties CloseOnEol="True"/>
					<MultiTokens>
						<Tokens Open="*"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Remarks &amp;&amp;" Style="Remarks &amp;&amp;">
					<Attributes Foreground="$00A00000" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine="" PartOfTerm="Left"/>
					<CloseToken StartLine=""/>
					<Properties CloseOnEol="True"/>
					<MultiTokens>
						<Tokens Open="&amp;&amp;"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Compiler control" Style="Compiler control">
					<Attributes Foreground="$000080FF" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties CloseOnTerm="True"/>
					<MultiTokens>
						<Tokens Open="#"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<KeyList Name="Key words" Enabled="True" Style="" Words="ACCEPT
ACTIVATE
ACTIVATE
ALTERNATIVE
AMERICAN
AND
ANSI
APPEND
ARRAY
AUTOSAVE
AVERAGE
BAR
BELL
BLANK
BLICK
BLOCKSIZE
BOX
BORDER
BROWSE
BRSTATUS
BUILD
BUILD
EXE
BUILD
PROJECT
CALCULATE
CALL
CANCEL
CARRY
CASE
CENTURY
CHANGE
CLEAR
CLOCK
CLOSE
COLLATE
COLOR
COMMAND
COMPILE
COMPATABLE
CONFIRM
CONSOLE
CONTINUE
COPY
COUNT
CPCOMPILE
CPDIALOG
CREATE
CURRENCY
CURSOR
DATABASES
DATE
DEACTIVATE
DEBUG
DECIMALS
DECLARE
DEFAULT
DEFINE
DELETE
DELETED
DELIMITERS
DEVELOPMENT
DEVICE
DIMENSION
DIR
DIRECTORY
DISPLAY
DO

DOHISTORY
ECHO
EDIT
EJECT
ELSE
ENDCASE
ENDDO
ENDFOR
ENDSCAN
ENDTEXT
ENDIF
ENDPRINTJOB
ERASE
ERROR
ESCAPE
EXACT
EXCLUSIVE
EXIT
EXPORT
EXTENDED
EXTERNAL
FIELDS
FILES
FILER
FILL
FILTER
FIND
FIXED
FORMAT
FLUSH
FOR
FROM
FULLPATH
FUNCTION
FUNCTION
GATHER
GENERAL
GET
GETS
GETEXPR
GO
GOTO
HEADINGS
HELP
HELPFILTER
HIDE
HOURS
IF
IMPORT
INDEX
INDEXES
INPUT
INSERT
INTENSITY
JOIN
KEY
KEYBOARD
KEYCOMP
LABEL
LIBRARY
LIST
LOAD
LOCATE
LOCK
LOGERRORS
MACKEY
MACRO
MARGIN
MARK
MARK
MEMO
MEMOWIDTH
MENU
MESSAGE
MODIFY
MODULE
MOUSE
MOVE
MULTILOCKS
NEAR
NOCPTRANS
NORMALIZE
NOTE
NOTIFY
OBJECT
ODOMETER
OFF
ON
OPTIMIZE
ORDER
OTHERWISE
PAD
PAGE
PALETTE
PARAMETERS
PATH
PDSETUP
PICTURE
PLAY
POINT
POP
POPUP
PRINTER
PRINTJOB
PRIVATE
PROCEDURE
PROJECT
PROMPT
PUBLIC
PUSH
QUERY
READ
READBORDER
READERROR
RECALL
REGIONAL
REINDEX
RELEASE
RELEASE
RENAME
REPLACE
REPORT
RESTORE
RESUME
RETRY
RETURN
REFRESH
RELATION
RELATION
REPORT
REPROCESS
RESOURCE
RUN
SAFETY
SAVE
SAY
SCAN
SCATTER
SCHEME
SCOREBOARD
SCREEN
SEEK
SELECT
SELECTION
SEPERATOR
SET
SHADOWS
SHOW
SHUTDOWN
SIZE
SKIP
SORT
STATUS
STICKY
STEP
STORE
STRUCTURE
SUM
SUSPEND
SYSMENU
SQL
TABLE
TAG
TALK
TEXTMERGE
TEXT
TO
TOPIC
TOTAL
TRBETWEEN
TYPE
TYPEAHEAD
UDFPARAMS
UNIQUE
UNLOCK
UPDATE
USE
VIEW
WAIT
WHILE
WINDOW
WITH
ZAP
ZOOM
Enddefine
Endfunc
Endproc
Endwith
Hidden
Local
Lparameter
Lparameters
Protected
Next
Then
Additive
After
Again
Aindent
Alignright
All
Alt
Alternate
And
Ansi
Any
Aplabout
App
Array
As
Asc
Ascending
Ascii
At
Attributes
Automatic
Autosave
Avg
Bar
Before
Bell
Between
Bitmap
Blank
Blink
Blocksize
Border
Bottom
Brstatus
Bucket
Buffers
By
Candidate
Carry
Cascade
Catalog
Cdx
Center
Century
Cga
Character
Check
Classlib
Clock
Cnt
Codepage
Collate
Color
Com1
Com2
Command
Compact
Compatible
Compress
Confirm
Connection
Connections
Connstring
Console
Copies
Cpcompile
Cpdialog
Csv
Currency
Cycle
Databases
Datasource
Date
Db4
Dbc
Dbf
Dbmemo3
Debug
Decimals
Defaultsource
Deletetables
Delimited
Delimiters
Descending
Design
Development
Device
Dif
Disabled
Distinct
Dlls
Dohistory
Dos
Dosmem
Double
Driver
Duplex
Echo
Editwork
Ega25
Ega43
Ems
Ems64
Encrypt
Encryption
Environment
Escape
Events
Exact
Except
Exe
Exists
Expression
Extended
F
Fdow
Fetch
Field
Fields
File
Files
Fill
Fixed
Float
Foldconst
Font
Footer
Force
Foreign
Fox2x
Foxplus
Free
Freeze
From
Fullpath
Fw2
Fweek
Get
Gets
Global
Group
Grow
Halfheight
Having
Heading
Headings
Helpfilter
History
Hmemory
Hours
Id
In
Indexes
Information
Instruct
Int
Integer
Intensity
Intersect
Into
Is
Isometric
Key
Keycolumns
Keycomp
Keyset
Last
Ledit
Level
Library
Like
Linked
Lock
Logerrors
Long
Lpartition
Mac
Macdesktop
Machelp
Mackey
Macros
Mark
Master
Max
Maxmem
Mdi
Memlimit
Memory
Memos
Memowidth
Memvar
Menus
Messages
Middle
Min
Minimize
Minus
Mod
Modal
Module
Mono43
Movers
Multilocks
Mvarsiz
Mvcount
N
Near
Negotiate
Noalias
Noappend
Noclear
Noclose
Noconsole
Nocptrans
Nodata
Nodebug
Nodelete
Nodup
Noedit
Noeject
Noenvironment
Nofloat
Nofollow
Nogrow
Noinit
Nolgrid
Nolink
Nolock
Nomargin
Nomdi
Nomenu
Nominimize
Nomodify
Nomouse
None
Nooptimize
Nooverwrite
Noprojecthook
Noprompt
Noread
Norefresh
Norequery
Norgrid
Norm
Normal
Nosave
Noshadow
Noshow
Nospace
Not
Notab
Notify
Noupdate
Novalidate
Noverify
Nowait
Nowindow
Nowrap
Nozoom
Npv
Null
Number
Objects
Odometer
Of
Off
Oleobjects
Only
Optimize
Or
Orientation
Output
Outshow
Overlay
Overwrite
Pad
Palette
Paperlength
Papersize
Paperwidth
Password
Path
Pattern
Pause
Pdox
Pdsetup
Pen
Pfs
Pixels
Plain
Popups
Precision
Preference
Preview
Primary
Printer
Printquality
Procedures
Production
Program
Progwork
Project
Prompt
Query
Random
Range
Readborder
Readerror
Record
Recover
Redit
Reference
References
Relative
Remote
Reprocess
Resource
Rest
Restrict
Rgb
Right
Row
Rowset
Rpd
Runtime
Safety
Same
Sample
Say
Scale
Scheme
Scoreboard
Screen
Sdf
Seconds
Selection
Shadows
Shared
Sheet
Shell
Shift
Shutdown
Single
Some
Sortwork
Space
Sql
Standalone
Status
Std
Step
Sticky
String
Structure
Subclass
Summary
Sylk
Sysformats
Sysmenus
System
T
Tab
Tables
Talk
Tedit
Textmerge
Time
Timeout
Titles
Tmpfiles
To
Topic
Transaction
Trap
Trbetween
Trigger
Ttoption
Typeahead
Udfparms
Union
Unique
Userid
Users
Values
Var
Verb
Vga25
Vga50
Views
Volume
Where
Windows
Wk1
Wk3
Wks
Workarea
Wp
Wr1
Wrap
Wrk
Xcmdfile
Xl5
Xl8
Xls
Y
Yresolution
Zoom
">
					<Attributes Foreground="clGreen" Background="clWhite"/>
				</KeyList>
				<KeyList Name="Functions" Enabled="True" Style="" Words="ABS
ACOPY
ACOS
ADEL
ADIR
AELEMENT
AFIELDS
AFONT
AINS
ALEN
ALIAS
ALLTRIM
ANSITOOEM
ASC
ASCAN
ASIN
ASORT
ASUBSCRIPT
AT
ATAN
ATC
ATCLINE
ATLINE
ATN2
BAR
BETWEEN
BOF
CAPSLOCK
CDOW
CDX
CEILING
CHR
CHRSAW
CHRTRAN
CMONTH
CNTBAR
CNTPAD
COL
COS
CPCONVERT
CPCURRENT
CPDBF
CTOD
CURDIR
DATE
DAY
DBF
DDE
DDEAbortTrans
DDEAdvise
DDEEnabled
DDEExecute
DDEInitiate
DDELastError
DDEPoke
DDERequest
DDESetOption
DDESetService
DDESetTopic
DDETerminate
DELETED
DESCENDING
DIFFERENCE
DISKSPACE
DMY
DOW
DTOC
DTOR
DTOS
EMPTY
EOF
ERROR
EVALUATE
EXP
FCHSIZE
FCLOSE
FCOUNT
FCREATE
FEOF
FERROR
FFLUSH
FGETS
FIELD
FILE
FILTER
FKLABEL
FKMAX
FLOCK
FLOOR
FONTMETRIC
FOPEN
FOR
FOUND
FPUTS
FREAD
FSEEK
FSIZE
FULLPATH
FV
FWRITE
GETBAR
GETDIR
GETENV
GETFILE
GETFONT
GETPAD
GOMONTH
HEADER
HOME
IDXCOLLATE
IIF
INKEY
INLIST
INSMODE
INT
ISALPHA
ISBLANK
ISCOLOR
ISDIGIT
ISLOWER
ISREADONLY
ISUPPER
KEY
KEYMATCH
LASTKEY
LEFT
LEN
LIKE
LINENO
LOCFILE
LOCK
LOG
LOG10
LOOKUP
LOWER
LTRIM
LUPDATE
MAX
MCOL
MDOWN
MDX
MDY
MEMLINES
MEMORY
MENU
MESSAGE
MIN
MLINE
MOD
MONTH
MRKBAR
MRKPAD
MROW(
MWINDOW
NDX
NUMLOCK
OBJNUM
OBJVAR
OCCURS
OEMTOANSI
ON
ORDER
OS
PACK
PAD
PADC
PADL
PADR
PARAMETERS
PAYMENT
PCOL
PI
POPUP
PRINTSTATUS
PRMBAR
PRMPAD
PROGRAM
PROMPT
PROPER
PROW
PRTINFO?PUTFILE
PV
QUIT
RAND
RAT
RATLINE
RDLEVEL
READKEY
RECCOUNT
RECNO
RECSIZE
RELATION
REPLICATE
RGBSCHEME
RIGHT
RLOCK
ROUND
ROW
RTOD
RTRIM
SCHEME
SCOLS
SCROLL
SECONDS
SEEK
SELECT
SET
SIGN
SIN
SIZE
POPUP
SKPBAR
SKPPAD
SOUNDEX
SPACE
SQRT
SROWS
STR
STRTRAN
STUFF
SUBSTR
SYS
SYS(0)
SYS(1)
SYS(2)
SYS(3)
SYS(5)
SYS(6)
SYS(7)
SYS(9)
SYS(10)
SYS(11)
SYS(12)
SYS(13)
SYS(14)
SYS(15)
SYS(16)
SYS(17)
SYS(18)
SYS(20)
SYS(21)
SYS(22)
SYS(23)
SYS(24)
SYS(100)
SYS(101)
SYS(102)
SYS(103)
SYS(1001)
SYS(1016)
SYS(1037)
SYS(2000)
SYS(2001)
SYS(2002)
SYS(2003)
SYS(2004)
SYS(2005)
SYS(2006)
SYS(2007)
SYS(2008)
SYS(2009)
SYS(2010)
SYS(2011)
SYS(2012)
SYS(2013)
SYS(2014)
SYS(2015)
SYS(2016)
SYS(2017)
SYS(2018)
SYS(2019)
SYS(2020)
SYS(2021)
SYS(2022)
SYS(2023)
SYSMETRIC(
TAG
TAN
TARGET
TIME
TRANSFORM
TRIM
TXTWIDTH
TYPE
UPDATED
UPPER
USED
VAL
VALID
VARREAD
VERSION
WBORDER
WCHILD
WCOLS
WEXIST
WFONT
WLAST
WLCOL
WLROW
WMAXIMUM
WMINIMUM
WONTOP
WOUTPUT
WPARENT
WREAD
WROWS
WTITLE
WVISIBLE
YEAR
Access
Aclass
Adatabases
Adbobjects
Addbs
Addrelationtoenv
Addtabletoenv
Aerror
Agetclass
Agetfileversion
Ainstance
Align
Alines
Alter
Amembers
Amouseobj
Anetresources
Aprinters
Aselobj
Assert
Asserts
Assist
Asynchronous
At_c
Atcc
Aused
Autoform
Autoreport
Avcxclasses
BarCount
BarPrompt
BatchMode
BatchUpdateCount
Begin
BellSound
BinToC
Bintoc
Bitand
Bitclear
Bitlshift
Bitnot
Bitor
Bitrshift
Bitset
Bittest
Bitxor
BrowseRefresh
Buffering
BuilderLock
COMArray
COMReturnError
CToBin
Cd
CentralChar
Chdir
Chrtranc
Comclassinfo
CommandTargetQuery
Completed
Compobj
Compute
Concat
ConnectBusy
ConnectHandle
ConnectName
ConnectString
ConnectTimeOut
ContainerReleaseType
Cot
Coverage
Cpnotrans
CreateBinary
Createobject
Createobjectex
Createoffline
CrsBuffering
CrsFetchMemo
CrsFetchSize
CrsMaxRows
CrsMethodUsed
CrsNumBatch
CrsShareConnection
CrsUseMemoSize
CrsWhereClause
Ctobin
Ctot
Curdate
CurrLeft
CurrSymbol
CursorGetProp
CursorSetProp
Curtime
Curval
DBGetProp
DBSetProp
DB_BufLockRow
DB_BufLockTable
DB_BufOff
DB_BufOptRow
DB_BufOptTable
DB_Complette
DB_DeleteInsert
DB_KeyAndModified
DB_KeyAndTimestamp
DB_KeyAndUpdatable
DB_LocalSQL
DB_NoPrompt
DB_Prompt
DB_RemoteSQL
DB_TransAuto
DB_TransManual
DB_TransNone
DB_Update
Datetime
Dayname
Dayofmonth
Dayofweek
Dayofyear
Dbalias
Dbused
Debugout
DefOLELCid
DefaultValue
Defaultext
Degrees
DeleteTrigger
Desc
Description
DispLogin
DispWarnings
Dll
DoDefault
DoEvents
Doc
Doevents